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

⟦56153fa61⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0330       | 0  |		.CONST	0x0330								; 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 007c       | |  |		.CONST	0x007c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0016       |    |		.CONST	0x0016								; Number of locals
000b			INIT_0008:
000b 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated
000d 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated
000f 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
0011 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated
0013 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated
0015 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated
0017 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated
0019 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
001b 00bf       |    |		Action	Accept_Activation
001c e002       |    |		Load	0x0,0x2
001d 0266       | f  |		Execute	Discrete,Bounds
001e 00e1       |    |		Load_Encached	Boolean_Cache
001f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0020 4801       |H   |		Short_Literal	0x1
0021 035d       | ]  |		Declare_Type	Array,Defined
0022 00d8       |    |		Load_Top	At_Offset_0
0023 0337       | 7  |		Declare_Variable	Array
0024 487a       |Hz  |		Short_Literal	0x7a
0025 4861       |Ha  |		Short_Literal	0x61
0026 4801       |H   |		Short_Literal	0x1
0027 00d9       |    |		Load_Top	At_Offset_1
0028 e216       |    |		Load	0x1,0x16
0029 01d6       |    |		Execute	Vector,Field_Write
002a 3ffb       |?   |		Loop_Increasing	0x26
002b 485a       |HZ  |		Short_Literal	0x5a
002c 4841       |HA  |		Short_Literal	0x41
002d 4801       |H   |		Short_Literal	0x1
002e 00d9       |    |		Load_Top	At_Offset_1
002f e216       |    |		Load	0x1,0x16
0030 01d6       |    |		Execute	Vector,Field_Write
0031 3ffb       |?   |		Loop_Increasing	0x2d
0032 4839       |H9  |		Short_Literal	0x39
0033 4830       |H0  |		Short_Literal	0x30
0034 4801       |H   |		Short_Literal	0x1
0035 00d9       |    |		Load_Top	At_Offset_1
0036 e216       |    |		Load	0x1,0x16
0037 01d6       |    |		Execute	Vector,Field_Write
0038 3ffb       |?   |		Loop_Increasing	0x34
0039 4801       |H   |		Short_Literal	0x1
003a 482d       |H-  |		Short_Literal	0x2d
003b 00da       |    |		Load_Top	At_Offset_2
003c 01d6       |    |		Execute	Vector,Field_Write
003d 4801       |H   |		Short_Literal	0x1
003e 485f       |H_  |		Short_Literal	0x5f
003f 00da       |    |		Load_Top	At_Offset_2
0040 01d6       |    |		Execute	Vector,Field_Write
0041 482c       |H,  |		Short_Literal	0x2c
0042 4800       |H   |		Short_Literal	0x0
0043 4800       |H   |		Short_Literal	0x0
0044 00d9       |    |		Load_Top	At_Offset_1
0045 e216       |    |		Load	0x1,0x16
0046 01d6       |    |		Execute	Vector,Field_Write
0047 3ffb       |?   |		Loop_Increasing	0x43
0048 4800       |H   |		Short_Literal	0x0
0049 482e       |H.  |		Short_Literal	0x2e
004a 00da       |    |		Load_Top	At_Offset_2
004b 01d6       |    |		Execute	Vector,Field_Write
004c 4800       |H   |		Short_Literal	0x0
004d 482f       |H/  |		Short_Literal	0x2f
004e 00da       |    |		Load_Top	At_Offset_2
004f 01d6       |    |		Execute	Vector,Field_Write
0050 4840       |H@  |		Short_Literal	0x40
0051 483a       |H:  |		Short_Literal	0x3a
0052 4800       |H   |		Short_Literal	0x0
0053 00d9       |    |		Load_Top	At_Offset_1
0054 e216       |    |		Load	0x1,0x16
0055 01d6       |    |		Execute	Vector,Field_Write
0056 3ffb       |?   |		Loop_Increasing	0x52
0057 485e       |H^  |		Short_Literal	0x5e
0058 485b       |H[  |		Short_Literal	0x5b
0059 4800       |H   |		Short_Literal	0x0
005a 00d9       |    |		Load_Top	At_Offset_1
005b e216       |    |		Load	0x1,0x16
005c 01d6       |    |		Execute	Vector,Field_Write
005d 3ffb       |?   |		Loop_Increasing	0x59
005e 4800       |H   |		Short_Literal	0x0
005f 4860       |H`  |		Short_Literal	0x60
0060 00da       |    |		Load_Top	At_Offset_2
0061 01d6       |    |		Execute	Vector,Field_Write
0062 48ff       |H   |		Short_Literal	0xff
0063 487b       |H{  |		Short_Literal	0x7b
0064 4800       |H   |		Short_Literal	0x0
0065 00d9       |    |		Load_Top	At_Offset_1
0066 e216       |    |		Load	0x1,0x16
0067 01d6       |    |		Execute	Vector,Field_Write
0068 3ffb       |?   |		Loop_Increasing	0x64
0069 00d9       |    |		Load_Top	At_Offset_1
006a 01c3       |    |		Execute	Vector,Check_In_Type
006b 0007       |    |		Action	Break_Optional
006c 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
006d 00c7       |    |		Action	Elaborate_Subprogram
006e 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
006f 00c7       |    |		Action	Elaborate_Subprogram
0070 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0071 00c7       |    |		Action	Elaborate_Subprogram
0072 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0079 00c7       |    |		Action	Elaborate_Subprogram
007a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
007b 00c7       |    |		Action	Elaborate_Subprogram
007c			BODY_0008:
007c 00bc       |    |		Action	Signal_Activated
007d 00bb       |    |		Action	Signal_Completion
007e 0000 0000  |    |		.XXX[0x2]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 008a       |    |		.CONST	0x008a								; Address of begin
0081 0004       |    |		.CONST	0x0004								; Address of exception handler
0082 0004       |    |		.CONST	0x0004								; Number of locals
0083			INIT_0080:
0083 e003       |    |		Load	0x0,0x3
0084 0322       | "  |		Declare_Variable	Record
0085 00d8       |    |		Load_Top	At_Offset_0
0086 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0087 e004       |    |		Load	0x0,0x4
0088 029f 020b  |    |		Declare_Subprogram	INIT_0208,For_Call
008a			BODY_0080:
008a e5ff       |    |		Load	0x2,-0x1
008b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
008c 7001       |p   |		Jump_Nonzero	0x8e
008d 08e0       |    |		Execute_Immediate	Raise,0xe0
008e e004       |    |		Load	0x0,0x4
008f 4801       |H   |		Short_Literal	0x1
0090 e005       |    |		Load	0x0,0x5
0091 e006       |    |		Load	0x0,0x6
0092 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0093 003a       | :  |		Store_Top	Access,At_Offset_2
0094 8404       |    |		Call	0x2,0x4
0095 0831       | 1  |		Execute_Immediate	Raise,0x31
0096 0000 0000  |    |		.XXX[0x2]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a3       |    |		.CONST	0x00a3								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0005       |    |		.CONST	0x0005								; Number of locals
009b			INIT_0098:
009b e007       |    |		Load	0x0,0x7
009c 0322       | "  |		Declare_Variable	Record
009d 00d8       |    |		Load_Top	At_Offset_0
009e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
009f 00e1       |    |		Load_Encached	Boolean_Cache
00a0 e004       |    |		Load	0x0,0x4
00a1 029f 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Call
00a3			BODY_0098:
00a3 e5fe       |    |		Load	0x2,-0x2
00a4 680f       |h   |		Jump_Zero	0xb4
00a5 00cf       |    |		Action	Mark_Auxiliary
00a6 e5ff       |    |		Load	0x2,-0x1
00a7 01d9       |    |		Execute	Vector,Reverse_Bounds
00a8 0263       | c  |		Execute	Discrete,Above_Bound
00a9 7009       |p   |		Jump_Nonzero	0xb3
00aa 00d8       |    |		Load_Top	At_Offset_0
00ab e5ff       |    |		Load	0x2,-0x1
00ac 01d7       |    |		Execute	Vector,Field_Read
00ad e216       |    |		Load	0x1,0x16
00ae 01d7       |    |		Execute	Vector,Field_Read
00af 7001       |p   |		Jump_Nonzero	0xb1
00b0 08e0       |    |		Execute_Immediate	Raise,0xe0
00b1 00c8       |    |		Action	Pop_Auxiliary_Range
00b2 3ff7       |?   |		Loop_Increasing	0xaa
00b3 00ce       |    |		Action	Pop_Auxiliary
00b4 e004       |    |		Load	0x0,0x4
00b5 4801       |H   |		Short_Literal	0x1
00b6 e005       |    |		Load	0x0,0x5
00b7 e006       |    |		Load	0x0,0x6
00b8 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
00b9 003a       | :  |		Store_Top	Access,At_Offset_2
00ba 8405       |    |		Call	0x2,0x5
00bb 0831       | 1  |		Execute_Immediate	Raise,0x31
00bc 0000 0000  |    |		.BLANK	0000[0x4]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00ce       |    |		.CONST	0x00ce								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0006       |    |		.CONST	0x0006								; Number of locals
00c3			INIT_00c0:
00c3 e007       |    |		Load	0x0,0x7
00c4 0322       | "  |		Declare_Variable	Record
00c5 e008       |    |		Load	0x0,0x8
00c6 00d9       |    |		Load_Top	At_Offset_1
00c7 017d       | }  |		Execute	Record,Structure_Write
00c8 e009       |    |		Load	0x0,0x9
00c9 0007       |    |		Action	Break_Optional
00ca 00e1       |    |		Load_Encached	Boolean_Cache
00cb e004       |    |		Load	0x0,0x4
00cc 029f 0273  |   s|		Declare_Subprogram	INIT_0270,For_Call
00ce			BODY_00c0:
00ce e5fe       |    |		Load	0x2,-0x2
00cf 680f       |h   |		Jump_Zero	0xdf
00d0 00cf       |    |		Action	Mark_Auxiliary
00d1 e5ff       |    |		Load	0x2,-0x1
00d2 01d9       |    |		Execute	Vector,Reverse_Bounds
00d3 0263       | c  |		Execute	Discrete,Above_Bound
00d4 7009       |p   |		Jump_Nonzero	0xde
00d5 00d8       |    |		Load_Top	At_Offset_0
00d6 e5ff       |    |		Load	0x2,-0x1
00d7 01d7       |    |		Execute	Vector,Field_Read
00d8 e216       |    |		Load	0x1,0x16
00d9 01d7       |    |		Execute	Vector,Field_Read
00da 7001       |p   |		Jump_Nonzero	0xdc
00db 08e0       |    |		Execute_Immediate	Raise,0xe0
00dc 00c8       |    |		Action	Pop_Auxiliary_Range
00dd 3ff7       |?   |		Loop_Increasing	0xd5
00de 00ce       |    |		Action	Pop_Auxiliary
00df e004       |    |		Load	0x0,0x4
00e0 4801       |H   |		Short_Literal	0x1
00e1 e005       |    |		Load	0x0,0x5
00e2 e006       |    |		Load	0x0,0x6
00e3 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
00e4 003a       | :  |		Store_Top	Access,At_Offset_2
00e5 8406       |    |		Call	0x2,0x6
00e6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00e7 0000       |    |		.XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00f2       |    |		.CONST	0x00f2								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0004       |    |		.CONST	0x0004								; Number of locals
00eb			INIT_00e8:
00eb e003       |    |		Load	0x0,0x3
00ec 0322       | "  |		Declare_Variable	Record
00ed 00d8       |    |		Load_Top	At_Offset_0
00ee 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00ef e004       |    |		Load	0x0,0x4
00f0 029f 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Call
00f2			BODY_00e8:
00f2 e5ff       |    |		Load	0x2,-0x1
00f3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00f4 7001       |p   |		Jump_Nonzero	0xf6
00f5 08e0       |    |		Execute_Immediate	Raise,0xe0
00f6 e004       |    |		Load	0x0,0x4
00f7 4801       |H   |		Short_Literal	0x1
00f8 e005       |    |		Load	0x0,0x5
00f9 e006       |    |		Load	0x0,0x6
00fa 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
00fb 003a       | :  |		Store_Top	Access,At_Offset_2
00fc 8404       |    |		Call	0x2,0x4
00fd 0831       | 1  |		Execute_Immediate	Raise,0x31
00fe 0000 0000  |    |		.XXX[0x2]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 010c       |    |		.CONST	0x010c								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0005       |    |		.CONST	0x0005								; Number of locals
0103			INIT_0100:
0103 e007       |    |		Load	0x0,0x7
0104 0322       | "  |		Declare_Variable	Record
0105 e008       |    |		Load	0x0,0x8
0106 00d9       |    |		Load_Top	At_Offset_1
0107 017d       | }  |		Execute	Record,Structure_Write
0108 00e1       |    |		Load_Encached	Boolean_Cache
0109 e004       |    |		Load	0x0,0x4
010a 029f 02db  |    |		Declare_Subprogram	INIT_02d8,For_Call
010c			BODY_0100:
010c e5ff       |    |		Load	0x2,-0x1
010d 6811       |h   |		Jump_Zero	0x11f
010e 00cf       |    |		Action	Mark_Auxiliary
010f e5fe       |    |		Load	0x2,-0x2
0110 0227       | '  |		Execute	Access,All_Reference
0111 01d9       |    |		Execute	Vector,Reverse_Bounds
0112 0263       | c  |		Execute	Discrete,Above_Bound
0113 700a       |p   |		Jump_Nonzero	0x11e
0114 00d8       |    |		Load_Top	At_Offset_0
0115 e5fe       |    |		Load	0x2,-0x2
0116 0227       | '  |		Execute	Access,All_Reference
0117 01d7       |    |		Execute	Vector,Field_Read
0118 e216       |    |		Load	0x1,0x16
0119 01d7       |    |		Execute	Vector,Field_Read
011a 7001       |p   |		Jump_Nonzero	0x11c
011b 08e0       |    |		Execute_Immediate	Raise,0xe0
011c 00c8       |    |		Action	Pop_Auxiliary_Range
011d 3ff6       |?   |		Loop_Increasing	0x114
011e 00ce       |    |		Action	Pop_Auxiliary
011f e004       |    |		Load	0x0,0x4
0120 4801       |H   |		Short_Literal	0x1
0121 e005       |    |		Load	0x0,0x5
0122 e006       |    |		Load	0x0,0x6
0123 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0124 003a       | :  |		Store_Top	Access,At_Offset_2
0125 8405       |    |		Call	0x2,0x5
0126 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0127 0000       |    |		.XXX[0x1]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0133       | 3  |		.CONST	0x0133								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0004       |    |		.CONST	0x0004								; Number of locals
012b			INIT_0128:
012b e00a       |    |		Load	0x0,0xa
012c 0007       |    |		Action	Break_Optional
012d e5f9       |    |		Load	0x2,-0x7
012e 01dd       |    |		Execute	Vector,First
012f e00a       |    |		Load	0x0,0xa
0130 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0131 e00b       |    |		Load	0x0,0xb
0132 0007       |    |		Action	Break_Optional
0133			BODY_0128:
0133 e5fa       |    |		Load	0x2,-0x6
0134 01dd       |    |		Execute	Vector,First
0135 005b       | [  |		Store_Top	Discrete,At_Offset_3
0136 e5fa       |    |		Load	0x2,-0x6
0137 01dd       |    |		Execute	Vector,First
0138 0aff       |    |		Execute_Immediate	Plus,-0x1
0139 0059       | Y  |		Store_Top	Discrete,At_Offset_1
013a 00cf       |    |		Action	Mark_Auxiliary
013b 0007       |    |		Action	Break_Optional
013c 00d9       |    |		Load_Top	At_Offset_1
013d 0a01       |    |		Execute_Immediate	Plus,0x1
013e 005a       | Z  |		Store_Top	Discrete,At_Offset_2
013f 00d9       |    |		Load_Top	At_Offset_1
0140 e5fa       |    |		Load	0x2,-0x6
0141 01dc       |    |		Execute	Vector,Last
0142 027d       | }  |		Execute	Discrete,Greater
0143 7025       |p%  |		Jump_Nonzero	0x169
0144 00d9       |    |		Load_Top	At_Offset_1
0145 e5fa       |    |		Load	0x2,-0x6
0146 01d7       |    |		Execute	Vector,Field_Read
0147 6821       |h!  |		Jump_Zero	0x169
0148 00d9       |    |		Load_Top	At_Offset_1
0149 e5fa       |    |		Load	0x2,-0x6
014a 01d7       |    |		Execute	Vector,Field_Read
014b 0f2e       | .  |		Execute_Immediate	Equal,0x2e
014c 7005       |p   |		Jump_Nonzero	0x152
014d 00d9       |    |		Load_Top	At_Offset_1
014e e5fa       |    |		Load	0x2,-0x6
014f 01d7       |    |		Execute	Vector,Field_Read
0150 0f2a       | *  |		Execute_Immediate	Equal,0x2a
0151 6815       |h   |		Jump_Zero	0x167
0152 00d9       |    |		Load_Top	At_Offset_1
0153 e5fa       |    |		Load	0x2,-0x6
0154 01dd       |    |		Execute	Vector,First
0155 027e       | ~  |		Execute	Discrete,Not_Equal
0156 680d       |h   |		Jump_Zero	0x164
0157 4800       |H   |		Short_Literal	0x0
0158 e402       |    |		Load	0x2,0x2
0159 00db       |    |		Load_Top	At_Offset_3
015a 0aff       |    |		Execute_Immediate	Plus,-0x1
015b e5fa       |    |		Load	0x2,-0x6
015c 01cf       |    |		Execute	Vector,Slice_Read
015d 85fe       |    |		Call	0x2,-0x2
015e 00db       |    |		Load_Top	At_Offset_3
015f e5f9       |    |		Load	0x2,-0x7
0160 01d6       |    |		Execute	Vector,Field_Write
0161 00da       |    |		Load_Top	At_Offset_2
0162 0a01       |    |		Execute_Immediate	Plus,0x1
0163 005b       | [  |		Store_Top	Discrete,At_Offset_3
0164 00d9       |    |		Load_Top	At_Offset_1
0165 0a01       |    |		Execute_Immediate	Plus,0x1
0166 c402       |    |		Store	0x2,0x2
0167 00c9       |    |		Action	Pop_Auxiliary_Loop
0168 7fd3       |    |		Jump	0x13c
0169 00ce       |    |		Action	Pop_Auxiliary
016a 4800       |H   |		Short_Literal	0x0
016b 00db       |    |		Load_Top	At_Offset_3
016c 00da       |    |		Load_Top	At_Offset_2
016d 0aff       |    |		Execute_Immediate	Plus,-0x1
016e e5fa       |    |		Load	0x2,-0x6
016f 01cf       |    |		Execute	Vector,Slice_Read
0170 85fe       |    |		Call	0x2,-0x2
0171 00da       |    |		Load_Top	At_Offset_2
0172 e5f9       |    |		Load	0x2,-0x7
0173 01d6       |    |		Execute	Vector,Field_Write
0174 00d9       |    |		Load_Top	At_Offset_1
0175 0a01       |    |		Execute_Immediate	Plus,0x1
0176 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0177 e5fc       |    |		Load	0x2,-0x4
0178 00da       |    |		Load_Top	At_Offset_2
0179 e5f9       |    |		Load	0x2,-0x7
017a 01d6       |    |		Execute	Vector,Field_Write
017b 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
017c 0000 0000  |    |		.BLANK	0000[0x4]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0191       |    |		.CONST	0x0191								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0006       |    |		.CONST	0x0006								; Number of locals
0183			INIT_0180:
0183 e00c       |    |		Load	0x0,0xc
0184 0007       |    |		Action	Break_Optional
0185 e5f9       |    |		Load	0x2,-0x7
0186 01dd       |    |		Execute	Vector,First
0187 e00a       |    |		Load	0x0,0xa
0188 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0189 e5f8       |    |		Load	0x2,-0x8
018a 01dd       |    |		Execute	Vector,First
018b e00a       |    |		Load	0x0,0xa
018c 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
018d e00a       |    |		Load	0x0,0xa
018e 0007       |    |		Action	Break_Optional
018f e00b       |    |		Load	0x0,0xb
0190 0007       |    |		Action	Break_Optional
0191			BODY_0180:
0191 4800       |H   |		Short_Literal	0x0
0192 a402       |    |		Store_Unchecked	0x2,0x2
0193 e5fa       |    |		Load	0x2,-0x6
0194 01dd       |    |		Execute	Vector,First
0195 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0196 e5fa       |    |		Load	0x2,-0x6
0197 01dd       |    |		Execute	Vector,First
0198 0aff       |    |		Execute_Immediate	Plus,-0x1
0199 0059       | Y  |		Store_Top	Discrete,At_Offset_1
019a 00cf       |    |		Action	Mark_Auxiliary
019b 0007       |    |		Action	Break_Optional
019c 00d9       |    |		Load_Top	At_Offset_1
019d 0a01       |    |		Execute_Immediate	Plus,0x1
019e 005a       | Z  |		Store_Top	Discrete,At_Offset_2
019f 00d9       |    |		Load_Top	At_Offset_1
01a0 e5fa       |    |		Load	0x2,-0x6
01a1 01dc       |    |		Execute	Vector,Last
01a2 027d       | }  |		Execute	Discrete,Greater
01a3 7036       |p6  |		Jump_Nonzero	0x1da
01a4 00d9       |    |		Load_Top	At_Offset_1
01a5 e5fa       |    |		Load	0x2,-0x6
01a6 01d7       |    |		Execute	Vector,Field_Read
01a7 6832       |h2  |		Jump_Zero	0x1da
01a8 00d9       |    |		Load_Top	At_Offset_1
01a9 e5fa       |    |		Load	0x2,-0x6
01aa 01d7       |    |		Execute	Vector,Field_Read
01ab 0f2e       | .  |		Execute_Immediate	Equal,0x2e
01ac 7005       |p   |		Jump_Nonzero	0x1b2
01ad 00d9       |    |		Load_Top	At_Offset_1
01ae e5fa       |    |		Load	0x2,-0x6
01af 01d7       |    |		Execute	Vector,Field_Read
01b0 0f2a       | *  |		Execute_Immediate	Equal,0x2a
01b1 6826       |h&  |		Jump_Zero	0x1d8
01b2 00d9       |    |		Load_Top	At_Offset_1
01b3 e5fa       |    |		Load	0x2,-0x6
01b4 01dd       |    |		Execute	Vector,First
01b5 027e       | ~  |		Execute	Discrete,Not_Equal
01b6 6814       |h   |		Jump_Zero	0x1cb
01b7 e402       |    |		Load	0x2,0x2
01b8 e403       |    |		Load	0x2,0x3
01b9 e5f9       |    |		Load	0x2,-0x7
01ba 01d6       |    |		Execute	Vector,Field_Write
01bb e403       |    |		Load	0x2,0x3
01bc 0a01       |    |		Execute_Immediate	Plus,0x1
01bd c403       |    |		Store	0x2,0x3
01be 4800       |H   |		Short_Literal	0x0
01bf 00db       |    |		Load_Top	At_Offset_3
01c0 00db       |    |		Load_Top	At_Offset_3
01c1 0aff       |    |		Execute_Immediate	Plus,-0x1
01c2 e5fa       |    |		Load	0x2,-0x6
01c3 01cf       |    |		Execute	Vector,Slice_Read
01c4 85fe       |    |		Call	0x2,-0x2
01c5 e404       |    |		Load	0x2,0x4
01c6 e5f8       |    |		Load	0x2,-0x8
01c7 01d6       |    |		Execute	Vector,Field_Write
01c8 00db       |    |		Load_Top	At_Offset_3
01c9 0a01       |    |		Execute_Immediate	Plus,0x1
01ca c404       |    |		Store	0x2,0x4
01cb 00d9       |    |		Load_Top	At_Offset_1
01cc 0a01       |    |		Execute_Immediate	Plus,0x1
01cd 005b       | [  |		Store_Top	Discrete,At_Offset_3
01ce 00d9       |    |		Load_Top	At_Offset_1
01cf e5fa       |    |		Load	0x2,-0x6
01d0 01d7       |    |		Execute	Vector,Field_Read
01d1 0f2a       | *  |		Execute_Immediate	Equal,0x2a
01d2 6803       |h   |		Jump_Zero	0x1d6
01d3 4801       |H   |		Short_Literal	0x1
01d4 a402       |    |		Store_Unchecked	0x2,0x2
01d5 7802       |x   |		Jump	0x1d8
01d6 4800       |H   |		Short_Literal	0x0
01d7 a402       |    |		Store_Unchecked	0x2,0x2
01d8 00c9       |    |		Action	Pop_Auxiliary_Loop
01d9 7fc2       |    |		Jump	0x19c
01da 00ce       |    |		Action	Pop_Auxiliary
01db e402       |    |		Load	0x2,0x2
01dc e403       |    |		Load	0x2,0x3
01dd e5f9       |    |		Load	0x2,-0x7
01de 01d6       |    |		Execute	Vector,Field_Write
01df 4800       |H   |		Short_Literal	0x0
01e0 00da       |    |		Load_Top	At_Offset_2
01e1 00da       |    |		Load_Top	At_Offset_2
01e2 0aff       |    |		Execute_Immediate	Plus,-0x1
01e3 e5fa       |    |		Load	0x2,-0x6
01e4 01cf       |    |		Execute	Vector,Slice_Read
01e5 85fe       |    |		Call	0x2,-0x2
01e6 00db       |    |		Load_Top	At_Offset_3
01e7 e5f8       |    |		Load	0x2,-0x8
01e8 01d6       |    |		Execute	Vector,Field_Write
01e9 00da       |    |		Load_Top	At_Offset_2
01ea 0a01       |    |		Execute_Immediate	Plus,0x1
01eb 005b       | [  |		Store_Top	Discrete,At_Offset_3
01ec e5fc       |    |		Load	0x2,-0x4
01ed 00db       |    |		Load_Top	At_Offset_3
01ee e5f8       |    |		Load	0x2,-0x8
01ef 01d6       |    |		Execute	Vector,Field_Write
01f0 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
01f1 0000 0000  |    |		.BLANK	0000[0x7]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff       |    |		.CONST	0x01ff								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0002       |    |		.CONST	0x0002								; Number of locals
01fb			INIT_01f8:
01fb e007       |    |		Load	0x0,0x7
01fc 0322       | "  |		Declare_Variable	Record
01fd 00d8       |    |		Load_Top	At_Offset_0
01fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01ff			BODY_01f8:
01ff 00d8       |    |		Load_Top	At_Offset_0
0200 4801       |H   |		Short_Literal	0x1
0201 e005       |    |		Load	0x0,0x5
0202 e00d       |    |		Load	0x0,0xd
0203 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0204 00d1       |    |		Pop_Control	Pop_Count_1
0205 00d8       |    |		Load_Top	At_Offset_0
0206 00ca       |    |		Action	Exit_Nullary_Function
0207 0000       |    |		.XXX[0x1]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020d       |    |		.CONST	0x020d								; Address of begin
0209 022a       | *  |		.CONST	0x022a								; Address of exception handler
020a 0002       |    |		.CONST	0x0002								; Number of locals
020b			INIT_0208:
020b 029f 0313  |    |		Declare_Subprogram	INIT_0310,For_Call
020d			BODY_0208:
020d e402       |    |		Load	0x2,0x2
020e e5ff       |    |		Load	0x2,-0x1
020f e403       |    |		Load	0x2,0x3
0210 800e       |    |		Call	0x0,0xe
0211 00d1       |    |		Pop_Control	Pop_Count_1
0212 e402       |    |		Load	0x2,0x2
0213 800f       |    |		Call	0x0,0xf
0214 6813       |h   |		Jump_Zero	0x228
0215 e403       |    |		Load	0x2,0x3
0216 4801       |H   |		Short_Literal	0x1
0217 e005       |    |		Load	0x0,0x5
0218 e010       |    |		Load	0x0,0x10
0219 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
021a c403       |    |		Store	0x2,0x3
021b 4800       |H   |		Short_Literal	0x0
021c 4806       |H   |		Short_Literal	0x6
021d e011       |    |		Load	0x0,0x11
021e 0334       | 4  |		Declare_Variable	Array,With_Constraint
021f 5014       |P   |		Indirect_Literal	Any,0x234,{0x556e6971, 0x75652300}
0220 e5ff       |    |		Load	0x2,-0x1
0221 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0222 00e0       |    |		Load_Encached	Standard_Cache
0223 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0224 8012       |    |		Call	0x0,0x12
0225 01cc       |    |		Execute	Vector,Catenate
0226 00cb       |    |		Action	Pop_Block_With_Result
0227 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0228 8602       |    |		Call	0x3,0x2
0229 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
022a			TRAP_0208:
022a 0007       |    |		Action	Break_Optional
022b e403       |    |		Load	0x2,0x3
022c 4801       |H   |		Short_Literal	0x1
022d e005       |    |		Load	0x0,0x5
022e e010       |    |		Load	0x0,0x10
022f 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0230 c403       |    |		Store	0x2,0x3
0231 00d8       |    |		Load_Top	At_Offset_0
0232 0101       |    |		Execute	Exception,Reraise
0233 0000       |    |		.XXX[0x1]
0234 556e 6971  |Uniq|		.LITERAL	{0x556e6971, 0x75652300}
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0261       | a  |		.CONST	0x0261								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 00e1       |    |		Load_Encached	Boolean_Cache
023c e402       |    |		Load	0x2,0x2
023d e5ff       |    |		Load	0x2,-0x1
023e e404       |    |		Load	0x2,0x4
023f 8013       |    |		Call	0x0,0x13
0240 00d1       |    |		Pop_Control	Pop_Count_1
0241 c403       |    |		Store	0x2,0x3
0242 e403       |    |		Load	0x2,0x3
0243 6809       |h   |		Jump_Zero	0x24d
0244 e404       |    |		Load	0x2,0x4
0245 4801       |H   |		Short_Literal	0x1
0246 e005       |    |		Load	0x0,0x5
0247 e010       |    |		Load	0x0,0x10
0248 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0249 c404       |    |		Store	0x2,0x4
024a e402       |    |		Load	0x2,0x2
024b 00cb       |    |		Action	Pop_Block_With_Result
024c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
024d e402       |    |		Load	0x2,0x2
024e 4801       |H   |		Short_Literal	0x1
024f e005       |    |		Load	0x0,0x5
0250 e00d       |    |		Load	0x0,0xd
0251 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0252 00d1       |    |		Pop_Control	Pop_Count_1
0253 4800       |H   |		Short_Literal	0x0
0254 e402       |    |		Load	0x2,0x2
0255 e5ff       |    |		Load	0x2,-0x1
0256 e404       |    |		Load	0x2,0x4
0257 8014       |    |		Call	0x0,0x14
0258 e404       |    |		Load	0x2,0x4
0259 4801       |H   |		Short_Literal	0x1
025a e005       |    |		Load	0x0,0x5
025b e010       |    |		Load	0x0,0x10
025c 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
025d c404       |    |		Store	0x2,0x4
025e e402       |    |		Load	0x2,0x2
025f 00cb       |    |		Action	Pop_Block_With_Result
0260 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0261			TRAP_0238:
0261 0007       |    |		Action	Break_Optional
0262 e404       |    |		Load	0x2,0x4
0263 4801       |H   |		Short_Literal	0x1
0264 e005       |    |		Load	0x0,0x5
0265 e010       |    |		Load	0x0,0x10
0266 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0267 c404       |    |		Store	0x2,0x4
0268 00d8       |    |		Load_Top	At_Offset_0
0269 0101       |    |		Execute	Exception,Reraise
026a 0000 0000  |    |		.BLANK	0000[0x6]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 02a4       |    |		.CONST	0x02a4								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 00e1       |    |		Load_Encached	Boolean_Cache
0274 e402       |    |		Load	0x2,0x2
0275 e403       |    |		Load	0x2,0x3
0276 e5ff       |    |		Load	0x2,-0x1
0277 e405       |    |		Load	0x2,0x5
0278 8015       |    |		Call	0x0,0x15
0279 c403       |    |		Store	0x2,0x3
027a 00d1       |    |		Pop_Control	Pop_Count_1
027b c404       |    |		Store	0x2,0x4
027c e404       |    |		Load	0x2,0x4
027d 680d       |h   |		Jump_Zero	0x28b
027e e405       |    |		Load	0x2,0x5
027f 4801       |H   |		Short_Literal	0x1
0280 e005       |    |		Load	0x0,0x5
0281 e010       |    |		Load	0x0,0x10
0282 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0283 c405       |    |		Store	0x2,0x5
0284 e403       |    |		Load	0x2,0x3
0285 a5fd       |    |		Store_Unchecked	0x2,-0x3
0286 e402       |    |		Load	0x2,0x2
0287 e5fc       |    |		Load	0x2,-0x4
0288 017d       | }  |		Execute	Record,Structure_Write
0289 00cc       |    |		Action	Pop_Block
028a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
028b e402       |    |		Load	0x2,0x2
028c 4801       |H   |		Short_Literal	0x1
028d e005       |    |		Load	0x0,0x5
028e e00d       |    |		Load	0x0,0xd
028f 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0290 00d1       |    |		Pop_Control	Pop_Count_1
0291 e5ff       |    |		Load	0x2,-0x1
0292 e009       |    |		Load	0x0,0x9
0293 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0294 a403       |    |		Store_Unchecked	0x2,0x3
0295 e403       |    |		Load	0x2,0x3
0296 a5fd       |    |		Store_Unchecked	0x2,-0x3
0297 4800       |H   |		Short_Literal	0x0
0298 e402       |    |		Load	0x2,0x2
0299 e403       |    |		Load	0x2,0x3
029a e405       |    |		Load	0x2,0x5
029b 8016       |    |		Call	0x0,0x16
029c e405       |    |		Load	0x2,0x5
029d 4801       |H   |		Short_Literal	0x1
029e e005       |    |		Load	0x0,0x5
029f e010       |    |		Load	0x0,0x10
02a0 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
02a1 c405       |    |		Store	0x2,0x5
02a2 00cc       |    |		Action	Pop_Block
02a3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02a4			TRAP_0270:
02a4 0007       |    |		Action	Break_Optional
02a5 e405       |    |		Load	0x2,0x5
02a6 4801       |H   |		Short_Literal	0x1
02a7 e005       |    |		Load	0x0,0x5
02a8 e010       |    |		Load	0x0,0x10
02a9 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
02aa c405       |    |		Store	0x2,0x5
02ab 00d8       |    |		Load_Top	At_Offset_0
02ac 0101       |    |		Execute	Exception,Reraise
02ad 0000 0000  |    |		.XXX[0x3]
02af 0000       |    |
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b5       |    |		.CONST	0x02b5								; Address of begin
02b1 02c8       |    |		.CONST	0x02c8								; Address of exception handler
02b2 0002       |    |		.CONST	0x0002								; Number of locals
02b3			INIT_02b0:
02b3 029f 0323  |   #|		Declare_Subprogram	INIT_0320,For_Call
02b5			BODY_02b0:
02b5 e402       |    |		Load	0x2,0x2
02b6 e5ff       |    |		Load	0x2,-0x1
02b7 e403       |    |		Load	0x2,0x3
02b8 800e       |    |		Call	0x0,0xe
02b9 00d1       |    |		Pop_Control	Pop_Count_1
02ba e402       |    |		Load	0x2,0x2
02bb 800f       |    |		Call	0x0,0xf
02bc 6809       |h   |		Jump_Zero	0x2c6
02bd e403       |    |		Load	0x2,0x3
02be 4801       |H   |		Short_Literal	0x1
02bf e005       |    |		Load	0x0,0x5
02c0 e010       |    |		Load	0x0,0x10
02c1 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
02c2 c403       |    |		Store	0x2,0x3
02c3 e009       |    |		Load	0x0,0x9
02c4 00cb       |    |		Action	Pop_Block_With_Result
02c5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c6 8602       |    |		Call	0x3,0x2
02c7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02c8			TRAP_02b0:
02c8 0007       |    |		Action	Break_Optional
02c9 e403       |    |		Load	0x2,0x3
02ca 4801       |H   |		Short_Literal	0x1
02cb e005       |    |		Load	0x0,0x5
02cc e010       |    |		Load	0x0,0x10
02cd 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
02ce c403       |    |		Store	0x2,0x3
02cf 00d8       |    |		Load_Top	At_Offset_0
02d0 0101       |    |		Execute	Exception,Reraise
02d1 0000 0000  |    |		.BLANK	0000[0x7]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 0306       |    |		.CONST	0x0306								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db 00e1       |    |		Load_Encached	Boolean_Cache
02dc e402       |    |		Load	0x2,0x2
02dd e5fe       |    |		Load	0x2,-0x2
02de e404       |    |		Load	0x2,0x4
02df 8017       |    |		Call	0x0,0x17
02e0 c5fe       |    |		Store	0x2,-0x2
02e1 00d1       |    |		Pop_Control	Pop_Count_1
02e2 c403       |    |		Store	0x2,0x3
02e3 e403       |    |		Load	0x2,0x3
02e4 680b       |h   |		Jump_Zero	0x2f0
02e5 e404       |    |		Load	0x2,0x4
02e6 4801       |H   |		Short_Literal	0x1
02e7 e005       |    |		Load	0x0,0x5
02e8 e010       |    |		Load	0x0,0x10
02e9 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
02ea c404       |    |		Store	0x2,0x4
02eb e402       |    |		Load	0x2,0x2
02ec e5fd       |    |		Load	0x2,-0x3
02ed 017d       | }  |		Execute	Record,Structure_Write
02ee 00cc       |    |		Action	Pop_Block
02ef 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02f0 e402       |    |		Load	0x2,0x2
02f1 4801       |H   |		Short_Literal	0x1
02f2 e005       |    |		Load	0x0,0x5
02f3 e00d       |    |		Load	0x0,0xd
02f4 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
02f5 00d1       |    |		Pop_Control	Pop_Count_1
02f6 e402       |    |		Load	0x2,0x2
02f7 e5fd       |    |		Load	0x2,-0x3
02f8 017d       | }  |		Execute	Record,Structure_Write
02f9 4800       |H   |		Short_Literal	0x0
02fa e402       |    |		Load	0x2,0x2
02fb e5fe       |    |		Load	0x2,-0x2
02fc e404       |    |		Load	0x2,0x4
02fd 8016       |    |		Call	0x0,0x16
02fe e404       |    |		Load	0x2,0x4
02ff 4801       |H   |		Short_Literal	0x1
0300 e005       |    |		Load	0x0,0x5
0301 e010       |    |		Load	0x0,0x10
0302 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0303 c404       |    |		Store	0x2,0x4
0304 00cc       |    |		Action	Pop_Block
0305 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0306			TRAP_02d8:
0306 0007       |    |		Action	Break_Optional
0307 e404       |    |		Load	0x2,0x4
0308 4801       |H   |		Short_Literal	0x1
0309 e005       |    |		Load	0x0,0x5
030a e010       |    |		Load	0x0,0x10
030b 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
030c c404       |    |		Store	0x2,0x4
030d 00d8       |    |		Load_Top	At_Offset_0
030e 0101       |    |		Execute	Exception,Reraise
030f 0000       |    |		.XXX[0x1]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0315       |    |		.CONST	0x0315								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0002       |    |		.CONST	0x0002								; Number of locals
0313			INIT_0310:
0313 e402       |    |		Load	0x2,0x2
0314 8018       |    |		Call	0x0,0x18
0315			BODY_0310:
0315 e403       |    |		Load	0x2,0x3
0316 4801       |H   |		Short_Literal	0x1
0317 e005       |    |		Load	0x0,0x5
0318 e010       |    |		Load	0x0,0x10
0319 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
031a c403       |    |		Store	0x2,0x3
031b 00d8       |    |		Load_Top	At_Offset_0
031c 00cb       |    |		Action	Pop_Block_With_Result
031d 00cb       |    |		Action	Pop_Block_With_Result
031e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
031f 0000       |    |		.XXX[0x1]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0325       | %  |		.CONST	0x0325								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0002       |    |		.CONST	0x0002								; Number of locals
0323			INIT_0320:
0323 e402       |    |		Load	0x2,0x2
0324 8019       |    |		Call	0x0,0x19
0325			BODY_0320:
0325 e403       |    |		Load	0x2,0x3
0326 4801       |H   |		Short_Literal	0x1
0327 e005       |    |		Load	0x0,0x5
0328 e010       |    |		Load	0x0,0x10
0329 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
032a c403       |    |		Store	0x2,0x3
032b 00d8       |    |		Load_Top	At_Offset_0
032c 00cb       |    |		Action	Pop_Block_With_Result
032d 00cb       |    |		Action	Pop_Block_With_Result
032e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
032f 0000       |    |		.XXX[0x1]
0330 ; --------------------------------------------------------------------------------------
0330 ; Debug Table
0330 ; --------------------------------------------------------------------------------------
0330 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x689b,0x0000,0x0001,0x0011
0336 000b 037a  |   z|		.DBG4T	0x000b,0x037a,0x8000,0x0000
033a 001c 0384  |    |		.DBG4T	0x001c,0x0384,0x8000,0x0000
033e 0083 0390  |    |		.DBG4T	0x0083,0x0390,0x0002,0x0000
0342 009b 0398  |    |		.DBG4T	0x009b,0x0398,0x0002,0x0000
0346 00c3 03a3  |    |		.DBG4T	0x00c3,0x03a3,0x0001,0x0000
034a 00eb 03af  |    |		.DBG4T	0x00eb,0x03af,0x0002,0x0000
034e 0103 03b7  |    |		.DBG4T	0x0103,0x03b7,0x0001,0x0000
0352 012b 03c2  | +  |		.DBG4T	0x012b,0x03c2,0x2801,0x0002
0356 0183 03d4  |    |		.DBG4T	0x0183,0x03d4,0x2801,0x0002
035a 01fb 03ef  |    |		.DBG4T	0x01fb,0x03ef,0x0002,0x0000
035e 020b 03f4  |    |		.DBG4T	0x020b,0x03f4,0x0004,0x0000
0362 023b 03fd  | ;  |		.DBG4T	0x023b,0x03fd,0x0004,0x0000
0366 0273 0409  | s  |		.DBG4T	0x0273,0x0409,0x0004,0x0000
036a 02b3 0419  |    |		.DBG4T	0x02b3,0x0419,0x0004,0x0000
036e 02db 0422  |   "|		.DBG4T	0x02db,0x0422,0x0004,0x0000
0372 0313 0430  |   0|		.DBG4T	0x0313,0x0430,0x0004,0x0000
0376 0323 0435  | # 5|		.DBG4T	0x0323,0x0435,0x0004,0x0000
037a ; --------------------------------------------------------------------------------------
037a ; Debug chain
037a ; --------------------------------------------------------------------------------------
037a 0008 0000  |    |		.DBGLEN	0x0008,0x0000
037c 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019
0384 ; --------------------------------------------------------------------------------------
0384 ; Debug chain
0384 ; --------------------------------------------------------------------------------------
0384 000a 0000  |    |		.DBGLEN	0x000a,0x0000
0386 001c 0022  |   "|		.DBGLNO	0x001c,0x0022,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0078,0x007a
0390 ; --------------------------------------------------------------------------------------
0390 ; Debug chain
0390 ; --------------------------------------------------------------------------------------
0390 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0392 0083 0087  |    |		.DBGLNO	0x0083,0x0087,0x008a,0x008d,0x008e,0x0094
0398 ; --------------------------------------------------------------------------------------
0398 ; Debug chain
0398 ; --------------------------------------------------------------------------------------
0398 0003 0006  |    |		.DBGLEN	0x0003,0x0006
039a 009b 009f  |    |		.DBGLNO	0x009b,0x009f,0x00a0,0x00a3,0x00a6,0x00aa,0x00b0,0x00b4,0x00ba
03a3 ; --------------------------------------------------------------------------------------
03a3 ; Debug chain
03a3 ; --------------------------------------------------------------------------------------
03a3 0004 0006  |    |		.DBGLEN	0x0004,0x0006
03a5 00c3 00c8  |    |		.DBGLNO	0x00c3,0x00c8,0x00ca,0x00cb,0x00ce,0x00d1,0x00d5,0x00db,0x00df,0x00e5
03af ; --------------------------------------------------------------------------------------
03af ; Debug chain
03af ; --------------------------------------------------------------------------------------
03af 0002 0004  |    |		.DBGLEN	0x0002,0x0004
03b1 00eb 00ef  |    |		.DBGLNO	0x00eb,0x00ef,0x00f2,0x00f5,0x00f6,0x00fc
03b7 ; --------------------------------------------------------------------------------------
03b7 ; Debug chain
03b7 ; --------------------------------------------------------------------------------------
03b7 0003 0006  |    |		.DBGLEN	0x0003,0x0006
03b9 0103 0108  |    |		.DBGLNO	0x0103,0x0108,0x0109,0x010c,0x010f,0x0114,0x011b,0x011f,0x0125
03c2 ; --------------------------------------------------------------------------------------
03c2 ; Debug chain
03c2 ; --------------------------------------------------------------------------------------
03c2 0003 000d  |    |		.DBGLEN	0x0003,0x000d
03c4 012b 012d  | + -|		.DBGLNO	0x012b,0x012d,0x0131,0x0133,0x0136,0x013b,0x013c,0x013f,0x0148,0x0152,0x0157,0x0161,0x0164,0x016a,0x0174,0x0177
03d4 ; --------------------------------------------------------------------------------------
03d4 ; Debug chain
03d4 ; --------------------------------------------------------------------------------------
03d4 0005 0014  |    |		.DBGLEN	0x0005,0x0014
03d6 0183 0185  |    |		.DBGLNO	0x0183,0x0185,0x0189,0x018d,0x018f,0x0191,0x0193,0x0196,0x019b,0x019c,0x019f,0x01a8,0x01b2,0x01b7,0x01bb,0x01be,0x01c8,0x01cb,0x01ce,0x01d3,0x01d6,0x01db,0x01df,0x01e9,0x01ec
03ef ; --------------------------------------------------------------------------------------
03ef ; Debug chain
03ef ; --------------------------------------------------------------------------------------
03ef 0001 0002  |    |		.DBGLEN	0x0001,0x0002
03f1 01fb 01ff  |    |		.DBGLNO	0x01fb,0x01ff,0x0205
03f4 ; --------------------------------------------------------------------------------------
03f4 ; Debug chain
03f4 ; --------------------------------------------------------------------------------------
03f4 0000 0007  |    |		.DBGLEN	0x0000,0x0007
03f6 020d 0212  |    |		.DBGLNO	0x020d,0x0212,0x0215,0x021b,0x0228,0x022b,0x0231
03fd ; --------------------------------------------------------------------------------------
03fd ; Debug chain
03fd ; --------------------------------------------------------------------------------------
03fd 0000 000a  |    |		.DBGLEN	0x0000,0x000a
03ff 023b 0242  | ; B|		.DBGLNO	0x023b,0x0242,0x0244,0x024a,0x024d,0x0253,0x0258,0x025e,0x0262,0x0268
0409 ; --------------------------------------------------------------------------------------
0409 ; Debug chain
0409 ; --------------------------------------------------------------------------------------
0409 0000 000e  |    |		.DBGLEN	0x0000,0x000e
040b 0273 027c  | s ||		.DBGLNO	0x0273,0x027c,0x027e,0x0284,0x0286,0x0289,0x028b,0x0291,0x0295,0x0297,0x029c,0x02a2,0x02a5,0x02ab
0419 ; --------------------------------------------------------------------------------------
0419 ; Debug chain
0419 ; --------------------------------------------------------------------------------------
0419 0000 0007  |    |		.DBGLEN	0x0000,0x0007
041b 02b5 02ba  |    |		.DBGLNO	0x02b5,0x02ba,0x02bd,0x02c3,0x02c6,0x02c9,0x02cf
0422 ; --------------------------------------------------------------------------------------
0422 ; Debug chain
0422 ; --------------------------------------------------------------------------------------
0422 0000 000c  |    |		.DBGLEN	0x0000,0x000c
0424 02db 02e3  |    |		.DBGLNO	0x02db,0x02e3,0x02e5,0x02eb,0x02ee,0x02f0,0x02f6,0x02f9,0x02fe,0x0304,0x0307,0x030d
0430 ; --------------------------------------------------------------------------------------
0430 ; Debug chain
0430 ; --------------------------------------------------------------------------------------
0430 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0432 0313 0315  |    |		.DBGLNO	0x0313,0x0315,0x031b
0435 ; --------------------------------------------------------------------------------------
0435 ; Debug chain
0435 ; --------------------------------------------------------------------------------------
0435 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0437 0323 0325  | # %|		.DBGLNO	0x0323,0x0325,0x032b
043a 0000 0000  |    |		.BLANK	0000[0x1c6]