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

⟦05553e08f⟧

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

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 05e8       |    |		.CONST	0x05e8								; 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 8003       |    |		.CONST	0x8003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 014d       | M  |		.CONST	0x014d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0037       | 7  |		.CONST	0x0037								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0
000c 4805       |H   |		Short_Literal	0x5
000d 029f 015b  |   [|		Declare_Subprogram	INIT_0158,For_Call
000f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0010 00d8       |    |		Load_Top	At_Offset_0
0011 0266       | f  |		Execute	Discrete,Bounds
0012 00e1       |    |		Load_Encached	Boolean_Cache
0013 02a0       |    |		Declare_Subprogram	Null_Subprogram
0014 4801       |H   |		Short_Literal	0x1
0015 035e       | ^  |		Declare_Type	Array,Defined,Visible
0016 e003       |    |		Load	0x0,0x3
0017 0266       | f  |		Execute	Discrete,Bounds
0018 00e1       |    |		Load_Encached	Boolean_Cache
0019 02a0       |    |		Declare_Subprogram	Null_Subprogram
001a 4801       |H   |		Short_Literal	0x1
001b 035e       | ^  |		Declare_Type	Array,Defined,Visible
001c 4800       |H   |		Short_Literal	0x0
001d 4802       |H   |		Short_Literal	0x2
001e 029f 018b  |    |		Declare_Subprogram	INIT_0188,For_Call
0020 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0021 e004       |    |		Load	0x0,0x4
0022 00d8       |    |		Load_Top	At_Offset_0
0023 02a0       |    |		Declare_Subprogram	Null_Subprogram
0024 4802       |H   |		Short_Literal	0x2
0025 032e       | .  |		Declare_Type	Record,Defined,Visible
0026 00d9       |    |		Load_Top	At_Offset_1
0027 0266       | f  |		Execute	Discrete,Bounds
0028 00da       |    |		Load_Top	At_Offset_2
0029 02a0       |    |		Declare_Subprogram	Null_Subprogram
002a 4801       |H   |		Short_Literal	0x1
002b 035e       | ^  |		Declare_Type	Array,Defined,Visible
002c e20e       |    |		Load	0x1,0xe
002d e20f       |    |		Load	0x1,0xf
002e 00da       |    |		Load_Top	At_Offset_2
002f e005       |    |		Load	0x0,0x5
0030 00e1       |    |		Load_Encached	Boolean_Cache
0031 00e1       |    |		Load_Encached	Boolean_Cache
0032 029f 0403  |    |		Declare_Subprogram	INIT_0400,For_Call
0034 4806       |H   |		Short_Literal	0x6
0035 032e       | .  |		Declare_Type	Record,Defined,Visible
0036 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated
0038 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated
003a 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated
003c 029a 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible,Unelaborated
003e 4800       |H   |		Short_Literal	0x0
003f 0093 0443  |   C|		push_full_address	INIT_0440
0041 02a0       |    |		Declare_Subprogram	Null_Subprogram
0042 038f       |    |		Declare_Type	Package,Defined,Visible
0043 0386       |    |		Declare_Variable	Package,Visible
0044 4800       |H   |		Short_Literal	0x0
0045 480a       |H   |		Short_Literal	0xa
0046 029f 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Call
0048 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0049 00e1       |    |		Load_Encached	Boolean_Cache
004a 00d9       |    |		Load_Top	At_Offset_1
004b 029f 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Call
004d 4802       |H   |		Short_Literal	0x2
004e 032e       | .  |		Declare_Type	Record,Defined,Visible
004f 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated
0051 029a 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call,Visible,Unelaborated
0053 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
0055 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated
0057 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
0059 029a 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call,Visible,Unelaborated
005b 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated
005d 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
005f 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
0061 029a 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Visible,Unelaborated
0063 0093 0000  |    |		push_full_address	0x0
0065 611a       |a   |		Indirect_Literal	Discrete,0x180,{0x80000000, 0x00010000}
0066 0273       | s  |		Execute	Discrete,Plus
0067 e006       |    |		Load	0x0,0x6
0068 0273       | s  |		Execute	Discrete,Plus
0069 e007       |    |		Load	0x0,0x7
006a 0273       | s  |		Execute	Discrete,Plus
006b e213       |    |		Load	0x1,0x13
006c e21a       |    |		Load	0x1,0x1a
006d 4801       |H   |		Short_Literal	0x1
006e 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
006f 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0070 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0071 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0072 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0073 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0074 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0075 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0076 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0077 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0078 e008       |    |		Load	0x0,0x8
0079 480b       |H   |		Short_Literal	0xb
007a e009       |    |		Load	0x0,0x9
007b 0386       |    |		Declare_Variable	Package,Visible
007c 00d8       |    |		Load_Top	At_Offset_0
007d 020f       |    |		Execute	Module,Activate
007e e00a       |    |		Load	0x0,0xa
007f 00d9       |    |		Load_Top	At_Offset_1
0080 0098       |    |		Execute	Package,Field_Read_Dynamic
0081 0129       | )  |		Execute	Any,Make_Visible
0082 00bf       |    |		Action	Accept_Activation
0083 e00b       |    |		Load	0x0,0xb
0084 e00c       |    |		Load	0x0,0xc
0085 e219       |    |		Load	0x1,0x19
0086 4800       |H   |		Short_Literal	0x0
0087 4801       |H   |		Short_Literal	0x1
0088 480a       |H   |		Short_Literal	0xa
0089 0092 051f  |    |		Action	Push_String_Extended,0x51f					; "others => Unspecified"
008b 00ea       |    |		Load_Encached	Null_String_Cache
008c 00ea       |    |		Load_Encached	Null_String_Cache
008d 4801       |H   |		Short_Literal	0x1
008e 480a       |H   |		Short_Literal	0xa
008f e00d       |    |		Load	0x0,0xd
0090 0387       |    |		Declare_Variable	Package
0091 00d8       |    |		Load_Top	At_Offset_0
0092 020f       |    |		Execute	Module,Activate
0093 e00e       |    |		Load	0x0,0xe
0094 e00f       |    |		Load	0x0,0xf
0095 e20d       |    |		Load	0x1,0xd
0096 4800       |H   |		Short_Literal	0x0
0097 4801       |H   |		Short_Literal	0x1
0098 4805       |H   |		Short_Literal	0x5
0099 0092 051f  |    |		Action	Push_String_Extended,0x51f					; "others => Unspecified"
009b 00ea       |    |		Load_Encached	Null_String_Cache
009c 00ea       |    |		Load_Encached	Null_String_Cache
009d 4801       |H   |		Short_Literal	0x1
009e 4805       |H   |		Short_Literal	0x5
009f e00d       |    |		Load	0x0,0xd
00a0 0387       |    |		Declare_Variable	Package
00a1 00d8       |    |		Load_Top	At_Offset_0
00a2 020f       |    |		Execute	Module,Activate
00a3 4800       |H   |		Short_Literal	0x0
00a4 4805       |H   |		Short_Literal	0x5
00a5 029f 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Call
00a7 03fd       |    |		Declare_Type	Discrete,Defined
00a8 e010       |    |		Load	0x0,0x10
00a9 e011       |    |		Load	0x0,0x11
00aa 00da       |    |		Load_Top	At_Offset_2
00ab 4800       |H   |		Short_Literal	0x0
00ac 4801       |H   |		Short_Literal	0x1
00ad 4805       |H   |		Short_Literal	0x5
00ae 0092 051f  |    |		Action	Push_String_Extended,0x51f					; "others => Unspecified"
00b0 00ea       |    |		Load_Encached	Null_String_Cache
00b1 00ea       |    |		Load_Encached	Null_String_Cache
00b2 4801       |H   |		Short_Literal	0x1
00b3 4805       |H   |		Short_Literal	0x5
00b4 e00d       |    |		Load	0x0,0xd
00b5 0387       |    |		Declare_Variable	Package
00b6 00d8       |    |		Load_Top	At_Offset_0
00b7 020f       |    |		Execute	Module,Activate
00b8 00d9       |    |		Load_Top	At_Offset_1
00b9 0266       | f  |		Execute	Discrete,Bounds
00ba e003       |    |		Load	0x0,0x3
00bb 02a0       |    |		Declare_Subprogram	Null_Subprogram
00bc 4801       |H   |		Short_Literal	0x1
00bd 035d       | ]  |		Declare_Type	Array,Defined
00be 00d8       |    |		Load_Top	At_Offset_0
00bf 0337       | 7  |		Declare_Variable	Array
00c0 00d8       |    |		Load_Top	At_Offset_0
00c1 0335       | 5  |		Declare_Variable	Array,Duplicate
00c2 00cd       |    |		Action	Spare6_Action
00c3 4800       |H   |		Short_Literal	0x0
00c4 4800       |H   |		Short_Literal	0x0
00c5 00da       |    |		Load_Top	At_Offset_2
00c6 01d6       |    |		Execute	Vector,Field_Write
00c7 4800       |H   |		Short_Literal	0x0
00c8 4801       |H   |		Short_Literal	0x1
00c9 00da       |    |		Load_Top	At_Offset_2
00ca 01d6       |    |		Execute	Vector,Field_Write
00cb 4801       |H   |		Short_Literal	0x1
00cc 4802       |H   |		Short_Literal	0x2
00cd 00da       |    |		Load_Top	At_Offset_2
00ce 01d6       |    |		Execute	Vector,Field_Write
00cf 4802       |H   |		Short_Literal	0x2
00d0 4803       |H   |		Short_Literal	0x3
00d1 00da       |    |		Load_Top	At_Offset_2
00d2 01d6       |    |		Execute	Vector,Field_Write
00d3 4803       |H   |		Short_Literal	0x3
00d4 4804       |H   |		Short_Literal	0x4
00d5 00da       |    |		Load_Top	At_Offset_2
00d6 01d6       |    |		Execute	Vector,Field_Write
00d7 4804       |H   |		Short_Literal	0x4
00d8 4805       |H   |		Short_Literal	0x5
00d9 00da       |    |		Load_Top	At_Offset_2
00da 01d6       |    |		Execute	Vector,Field_Write
00db 00d9       |    |		Load_Top	At_Offset_1
00dc 01d4       |    |		Execute	Vector,Structure_Write
00dd e226       | &  |		Load	0x1,0x26
00de 0007       |    |		Action	Break_Optional
00df e213       |    |		Load	0x1,0x13
00e0 0322       | "  |		Declare_Variable	Record
00e1 00d8       |    |		Load_Top	At_Offset_0
00e2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e3 00e1       |    |		Load_Encached	Boolean_Cache
00e4 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00e5 00e1       |    |		Load_Encached	Boolean_Cache
00e6 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00e7 e012       |    |		Load	0x0,0x12
00e8 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
00e9 0092 0520  |    |		Action	Push_String_Extended,0x520					; "<default>"
00eb 029b 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Unelaborated
00ed 029d 02f3  |    |		Declare_Subprogram	INIT_02f0,For_Outer_Call
00ef 029d 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call
00f1 029d 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call
00f3 029d 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call
00f5 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
00f6 00c7       |    |		Action	Elaborate_Subprogram
00f7 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
00f8 00c7       |    |		Action	Elaborate_Subprogram
00f9 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
00fa 00c7       |    |		Action	Elaborate_Subprogram
00fb 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00fc 00c7       |    |		Action	Elaborate_Subprogram
00fd 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
00fe 00c7       |    |		Action	Elaborate_Subprogram
00ff 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0100 00c7       |    |		Action	Elaborate_Subprogram
0101 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0102 00c7       |    |		Action	Elaborate_Subprogram
0103 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0104 00c7       |    |		Action	Elaborate_Subprogram
0105 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0106 00c7       |    |		Action	Elaborate_Subprogram
0107 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0108 00c7       |    |		Action	Elaborate_Subprogram
0109 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
010a 00c7       |    |		Action	Elaborate_Subprogram
010b 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
010c 00c7       |    |		Action	Elaborate_Subprogram
010d 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
010e 00c7       |    |		Action	Elaborate_Subprogram
010f 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0110 00c7       |    |		Action	Elaborate_Subprogram
0111 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
0112 e013       |    |		Load	0x0,0x13
0113 e014       |    |		Load	0x0,0x14
0114 e225       | %  |		Load	0x1,0x25
0115 0098       |    |		Execute	Package,Field_Read_Dynamic
0116 0095       |    |		Execute	Package,Field_Reference_Dynamic
0117 a015       |    |		Store_Unchecked	0x0,0x15
0118 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
0119 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
011a 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
011b e00a       |    |		Load	0x0,0xa
011c e225       | %  |		Load	0x1,0x25
011d 0098       |    |		Execute	Package,Field_Read_Dynamic
011e e016       |    |		Load	0x0,0x16
011f e014       |    |		Load	0x0,0x14
0120 e225       | %  |		Load	0x1,0x25
0121 0098       |    |		Execute	Package,Field_Read_Dynamic
0122 0095       |    |		Execute	Package,Field_Reference_Dynamic
0123 e017       |    |		Load	0x0,0x17
0124 e014       |    |		Load	0x0,0x14
0125 e225       | %  |		Load	0x1,0x25
0126 0098       |    |		Execute	Package,Field_Read_Dynamic
0127 0095       |    |		Execute	Package,Field_Reference_Dynamic
0128 e018       |    |		Load	0x0,0x18
0129 e014       |    |		Load	0x0,0x14
012a e225       | %  |		Load	0x1,0x25
012b 0098       |    |		Execute	Package,Field_Read_Dynamic
012c 0095       |    |		Execute	Package,Field_Reference_Dynamic
012d e019       |    |		Load	0x0,0x19
012e e014       |    |		Load	0x0,0x14
012f e225       | %  |		Load	0x1,0x25
0130 0098       |    |		Execute	Package,Field_Read_Dynamic
0131 0095       |    |		Execute	Package,Field_Reference_Dynamic
0132 e01a       |    |		Load	0x0,0x1a
0133 e014       |    |		Load	0x0,0x14
0134 e225       | %  |		Load	0x1,0x25
0135 0098       |    |		Execute	Package,Field_Read_Dynamic
0136 0095       |    |		Execute	Package,Field_Reference_Dynamic
0137 e01b       |    |		Load	0x0,0x1b
0138 e014       |    |		Load	0x0,0x14
0139 e225       | %  |		Load	0x1,0x25
013a 0098       |    |		Execute	Package,Field_Read_Dynamic
013b 0095       |    |		Execute	Package,Field_Reference_Dynamic
013c e01c       |    |		Load	0x0,0x1c
013d e014       |    |		Load	0x0,0x14
013e e225       | %  |		Load	0x1,0x25
013f 0098       |    |		Execute	Package,Field_Read_Dynamic
0140 0095       |    |		Execute	Package,Field_Reference_Dynamic
0141 e01d       |    |		Load	0x0,0x1d
0142 e014       |    |		Load	0x0,0x14
0143 e225       | %  |		Load	0x1,0x25
0144 0098       |    |		Execute	Package,Field_Read_Dynamic
0145 0095       |    |		Execute	Package,Field_Reference_Dynamic
0146 480f       |H   |		Short_Literal	0xf
0147 e218       |    |		Load	0x1,0x18
0148 020e       |    |		Execute	Module,Augment_Imports
0149 e218       |    |		Load	0x1,0x18
014a 020f       |    |		Execute	Module,Activate
014b 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
014c 00c7       |    |		Action	Elaborate_Subprogram
014d			BODY_0008:
014d e012       |    |		Load	0x0,0x12
014e 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
014f 4907       |I   |		Short_Literal	0x107
0150 e01e       |    |		Load	0x0,0x1e
0151 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0152 c231       | 1  |		Store	0x1,0x31
0153 00bc       |    |		Action	Signal_Activated
0154 00bb       |    |		Action	Signal_Completion
0155 0000 0000  |    |		.XXX[0x3]
0157 0000       |    |
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b       | [  |		.CONST	0x015b								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0001       |    |		.CONST	0x0001								; Number of locals
015b			BODY_0158:
015b			INIT_0158:
015b 4607       |F   |		Jump_Case	0x8
015c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
015d 7807       |x   |		Jump	0x165								; case 0x1
015e 780a       |x   |		Jump	0x169								; case 0x2
015f 780e       |x   |		Jump	0x16e								; case 0x3
0160 7811       |x   |		Jump	0x172								; case 0x4
0161 7812       |x   |		Jump	0x174								; case 0x5
0162 7813       |x   |		Jump	0x176								; case 0x6
0163 7816       |x   |		Jump	0x17a								; case 0x7
0164 4302       |C   |		.XXX[0x1]
0165 00da       |    |		Load_Top	At_Offset_2
0166 0091 0505  |    |		Action	Push_String_Extended_Indexed,0x505				; "NONE"
0168 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0169 00db       |    |		Load_Top	At_Offset_3
016a 00db       |    |		Load_Top	At_Offset_3
016b 00e0       |    |		Load_Encached	Standard_Cache
016c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
016d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
016e 00da       |    |		Load_Top	At_Offset_2
016f 00e0       |    |		Load_Encached	Standard_Cache
0170 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0171 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0172 00db       |    |		Load_Top	At_Offset_3
0173 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0174 00db       |    |		Load_Top	At_Offset_3
0175 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0176 e20d       |    |		Load	0x1,0xd
0177 00dc       |    |		Load_Top	At_Offset_4
0178 0267       | g  |		Execute	Discrete,Predecessor
0179 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
017a e20d       |    |		Load	0x1,0xd
017b 00dc       |    |		Load_Top	At_Offset_4
017c 0268       | h  |		Execute	Discrete,Successor
017d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
017e 0000 0000  |    |		.XXX[0x2]
0180 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0184 0000 0000  |    |		.BLANK	0000[0x4]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b       |    |		.CONST	0x018b								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0001       |    |		.CONST	0x0001								; Number of locals
018b			BODY_0188:
018b			INIT_0188:
018b 4607       |F   |		Jump_Case	0x8
018c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
018d 7807       |x   |		Jump	0x195								; case 0x1
018e 780a       |x   |		Jump	0x199								; case 0x2
018f 780e       |x   |		Jump	0x19e								; case 0x3
0190 7811       |x   |		Jump	0x1a2								; case 0x4
0191 7812       |x   |		Jump	0x1a4								; case 0x5
0192 7813       |x   |		Jump	0x1a6								; case 0x6
0193 7816       |x   |		Jump	0x1aa								; case 0x7
0194 4302       |C   |		.XXX[0x1]
0195 00da       |    |		Load_Top	At_Offset_2
0196 0091 050b  |    |		Action	Push_String_Extended_Indexed,0x50b				; "EX_USER_SCRIPT_PROLOG"
0198 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0199 00db       |    |		Load_Top	At_Offset_3
019a 00db       |    |		Load_Top	At_Offset_3
019b 00e0       |    |		Load_Encached	Standard_Cache
019c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
019d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
019e 00da       |    |		Load_Top	At_Offset_2
019f 00e0       |    |		Load_Encached	Standard_Cache
01a0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01a1 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01a2 00db       |    |		Load_Top	At_Offset_3
01a3 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01a4 00db       |    |		Load_Top	At_Offset_3
01a5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01a6 e210       |    |		Load	0x1,0x10
01a7 00dc       |    |		Load_Top	At_Offset_4
01a8 0267       | g  |		Execute	Discrete,Predecessor
01a9 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01aa e210       |    |		Load	0x1,0x10
01ab 00dc       |    |		Load_Top	At_Offset_4
01ac 0268       | h  |		Execute	Discrete,Successor
01ad 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01ae 0000 0000  |    |		.XXX[0x2]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 00da       |    |		Load_Top	At_Offset_2
01b4 e01f       |    |		Load	0x0,0x1f
01b5 e225       | %  |		Load	0x1,0x25
01b6 0096       |    |		Execute	Package,Entry
01b7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c1       |    |		.CONST	0x01c1								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0003       |    |		.CONST	0x0003								; Number of locals
01bb			INIT_01b8:
01bb e226       | &  |		Load	0x1,0x26
01bc 0007       |    |		Action	Break_Optional
01bd e213       |    |		Load	0x1,0x13
01be 0322       | "  |		Declare_Variable	Record
01bf 00d8       |    |		Load_Top	At_Offset_0
01c0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01c1			BODY_01b8:
01c1 e5ff       |    |		Load	0x2,-0x1
01c2 e020       |    |		Load	0x0,0x20
01c3 e225       | %  |		Load	0x1,0x25
01c4 0096       |    |		Execute	Package,Entry
01c5 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
01c6 00d9       |    |		Load_Top	At_Offset_1
01c7 e00a       |    |		Load	0x0,0xa
01c8 e225       | %  |		Load	0x1,0x25
01c9 0098       |    |		Execute	Package,Field_Read_Dynamic
01ca 0216       |    |		Execute	Heap_Access,Convert
01cb 00d9       |    |		Load_Top	At_Offset_1
01cc e021       | !  |		Load	0x0,0x21
01cd e225       | %  |		Load	0x1,0x25
01ce 0096       |    |		Execute	Package,Entry
01cf 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
01d0 00d9       |    |		Load_Top	At_Offset_1
01d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01d2 0000 0000  |    |		.BLANK	0000[0x6]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db       |    |		.CONST	0x01db								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0001       |    |		.CONST	0x0001								; Number of locals
01db			BODY_01d8:
01db			INIT_01d8:
01db 00da       |    |		Load_Top	At_Offset_2
01dc e00a       |    |		Load	0x0,0xa
01dd e225       | %  |		Load	0x1,0x25
01de 0098       |    |		Execute	Package,Field_Read_Dynamic
01df 0216       |    |		Execute	Heap_Access,Convert
01e0 e022       | "  |		Load	0x0,0x22
01e1 e225       | %  |		Load	0x1,0x25
01e2 0096       |    |		Execute	Package,Entry
01e3 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01e4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01e5 0000 0000  |    |		.XXX[0x3]
01e7 0000       |    |
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb 0833       | 3  |		Execute_Immediate	Raise,0x33
01ec 0000 0000  |    |		.BLANK	0000[0x4]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 4607       |F   |		Jump_Case	0x8
01f4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
01f5 7807       |x   |		Jump	0x1fd								; case 0x1
01f6 780a       |x   |		Jump	0x201								; case 0x2
01f7 780e       |x   |		Jump	0x206								; case 0x3
01f8 7811       |x   |		Jump	0x20a								; case 0x4
01f9 7812       |x   |		Jump	0x20c								; case 0x5
01fa 7813       |x   |		Jump	0x20e								; case 0x6
01fb 7816       |x   |		Jump	0x212								; case 0x7
01fc 4302       |C   |		.XXX[0x1]
01fd 00da       |    |		Load_Top	At_Offset_2
01fe 0091 050e  |    |		Action	Push_String_Extended_Indexed,0x50e				; "NONE"
0200 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0201 00db       |    |		Load_Top	At_Offset_3
0202 00db       |    |		Load_Top	At_Offset_3
0203 00e0       |    |		Load_Encached	Standard_Cache
0204 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0205 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0206 00da       |    |		Load_Top	At_Offset_2
0207 00e0       |    |		Load_Encached	Standard_Cache
0208 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0209 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
020a 00db       |    |		Load_Top	At_Offset_3
020b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
020c 00db       |    |		Load_Top	At_Offset_3
020d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
020e e219       |    |		Load	0x1,0x19
020f 00dc       |    |		Load_Top	At_Offset_4
0210 0267       | g  |		Execute	Discrete,Predecessor
0211 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0212 e219       |    |		Load	0x1,0x19
0213 00dc       |    |		Load_Top	At_Offset_4
0214 0268       | h  |		Execute	Discrete,Successor
0215 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0216 0000 0000  |    |		.XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0225       | %  |		.CONST	0x0225								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0004       |    |		.CONST	0x0004								; Number of locals
021b			INIT_0218:
021b e213       |    |		Load	0x1,0x13
021c 0322       | "  |		Declare_Variable	Record
021d 8234       | 4  |		Call	0x1,0x34
021e 00d9       |    |		Load_Top	At_Offset_1
021f 017d       | }  |		Execute	Record,Structure_Write
0220 00db       |    |		Load_Top	At_Offset_3
0221 e227       | '  |		Load	0x1,0x27
0222 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0223 029f 037b  |   {|		Declare_Subprogram	INIT_0378,For_Call
0225			BODY_0218:
0225 00d9       |    |		Load_Top	At_Offset_1
0226 e227       | '  |		Load	0x1,0x27
0227 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0228 7002       |p   |		Jump_Nonzero	0x22b
0229 e023       | #  |		Load	0x0,0x23
022a 0257       | W  |		Execute	Discrete,Raise
022b 4800       |H   |		Short_Literal	0x0
022c 00db       |    |		Load_Top	At_Offset_3
022d 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
022e 00cf       |    |		Action	Mark_Auxiliary
022f 480a       |H   |		Short_Literal	0xa
0230 4801       |H   |		Short_Literal	0x1
0231 0007       |    |		Action	Break_Optional
0232 00d8       |    |		Load_Top	At_Offset_0
0233 e403       |    |		Load	0x2,0x3
0234 e227       | '  |		Load	0x1,0x27
0235 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0236 6802       |h   |		Jump_Zero	0x239
0237 8404       |    |		Call	0x2,0x4
0238 780b       |x   |		Jump	0x244
0239 00d8       |    |		Load_Top	At_Offset_0
023a 0f05       |    |		Execute_Immediate	Equal,0x5
023b 6808       |h   |		Jump_Zero	0x244
023c e231       | 1  |		Load	0x1,0x31
023d e232       | 2  |		Load	0x1,0x32
023e 8024       | $  |		Call	0x0,0x24
023f 4802       |H   |		Short_Literal	0x2
0240 e402       |    |		Load	0x2,0x2
0241 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0242 01d5       |    |		Execute	Vector,Field_Reference
0243 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0244 00c8       |    |		Action	Pop_Auxiliary_Range
0245 3fec       |?   |		Loop_Increasing	0x232
0246 00ce       |    |		Action	Pop_Auxiliary
0247 00da       |    |		Load_Top	At_Offset_2
0248 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0249 0000 0000  |    |		.BLANK	0000[0x7]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0254 0000 0000  |    |		.BLANK	0000[0x4]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b       | [  |		.CONST	0x025b								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0001       |    |		.CONST	0x0001								; Number of locals
025b			BODY_0258:
025b			INIT_0258:
025b 8234       | 4  |		Call	0x1,0x34
025c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
025d 0000 0000  |    |		.XXX[0x3]
025f 0000       |    |
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263       | c  |		.CONST	0x0263								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0001       |    |		.CONST	0x0001								; Number of locals
0263			BODY_0260:
0263			INIT_0260:
0263 0833       | 3  |		Execute_Immediate	Raise,0x33
0264 0000 0000  |    |		.BLANK	0000[0x4]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b       | k  |		.CONST	0x026b								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0001       |    |		.CONST	0x0001								; Number of locals
026b			BODY_0268:
026b			INIT_0268:
026b 0833       | 3  |		Execute_Immediate	Raise,0x33
026c 0000 0000  |    |		.BLANK	0000[0x4]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 00da       |    |		Load_Top	At_Offset_2
0274 0335       | 5  |		Declare_Variable	Array,Duplicate
0275 00cd       |    |		Action	Spare6_Action
0276 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0277 0000       |    |		.XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b       | {  |		.CONST	0x027b								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0001       |    |		.CONST	0x0001								; Number of locals
027b			BODY_0278:
027b			INIT_0278:
027b e21a       |    |		Load	0x1,0x1a
027c 0322       | "  |		Declare_Variable	Record
027d 4800       |H   |		Short_Literal	0x0
027e 00d9       |    |		Load_Top	At_Offset_1
027f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0280 4801       |H   |		Short_Literal	0x1
0281 00d9       |    |		Load_Top	At_Offset_1
0282 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0283 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0284 0000 0000  |    |		.BLANK	0000[0x4]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b 00da       |    |		Load_Top	At_Offset_2
028c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
028d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028e 0000 0000  |    |		.XXX[0x2]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 0833       | 3  |		Execute_Immediate	Raise,0x33
0294 0000 0000  |    |		.BLANK	0000[0x4]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b       |    |		.CONST	0x029b								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0001       |    |		.CONST	0x0001								; Number of locals
029b			BODY_0298:
029b			INIT_0298:
029b 00da       |    |		Load_Top	At_Offset_2
029c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
029d 700e       |p   |		Jump_Nonzero	0x2ac
029e 00da       |    |		Load_Top	At_Offset_2
029f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02a0 0f0a       |    |		Execute_Immediate	Equal,0xa
02a1 6804       |h   |		Jump_Zero	0x2a6
02a2 4801       |H   |		Short_Literal	0x1
02a3 00db       |    |		Load_Top	At_Offset_3
02a4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02a5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a6 e219       |    |		Load	0x1,0x19
02a7 00db       |    |		Load_Top	At_Offset_3
02a8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02a9 0268       | h  |		Execute	Discrete,Successor
02aa 00db       |    |		Load_Top	At_Offset_3
02ab 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02ac 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02ad 0000 0000  |    |		.XXX[0x3]
02af 0000       |    |
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3       |    |		.CONST	0x02b3								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0001       |    |		.CONST	0x0001								; Number of locals
02b3			BODY_02b0:
02b3			INIT_02b0:
02b3 4607       |F   |		Jump_Case	0x8
02b4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
02b5 7807       |x   |		Jump	0x2bd								; case 0x1
02b6 780a       |x   |		Jump	0x2c1								; case 0x2
02b7 780e       |x   |		Jump	0x2c6								; case 0x3
02b8 7811       |x   |		Jump	0x2ca								; case 0x4
02b9 7812       |x   |		Jump	0x2cc								; case 0x5
02ba 7813       |x   |		Jump	0x2ce								; case 0x6
02bb 7816       |x   |		Jump	0x2d2								; case 0x7
02bc 4302       |C   |		.XXX[0x1]
02bd 00da       |    |		Load_Top	At_Offset_2
02be 0091 0519  |    |		Action	Push_String_Extended_Indexed,0x519				; "NONE"
02c0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
02c1 00db       |    |		Load_Top	At_Offset_3
02c2 00db       |    |		Load_Top	At_Offset_3
02c3 00e0       |    |		Load_Encached	Standard_Cache
02c4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02c5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02c6 00da       |    |		Load_Top	At_Offset_2
02c7 00e0       |    |		Load_Encached	Standard_Cache
02c8 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02c9 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
02ca 00db       |    |		Load_Top	At_Offset_3
02cb 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02cc 00db       |    |		Load_Top	At_Offset_3
02cd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02ce e229       | )  |		Load	0x1,0x29
02cf 00dc       |    |		Load_Top	At_Offset_4
02d0 0267       | g  |		Execute	Discrete,Predecessor
02d1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02d2 e229       | )  |		Load	0x1,0x29
02d3 00dc       |    |		Load_Top	At_Offset_4
02d4 0268       | h  |		Execute	Discrete,Successor
02d5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02d6 0000 0000  |    |		.XXX[0x2]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db e231       | 1  |		Load	0x1,0x31
02dc 8215       |    |		Call	0x1,0x15
02dd a22d       | -  |		Store_Unchecked	0x1,0x2d
02de e22d       | -  |		Load	0x1,0x2d
02df e00a       |    |		Load	0x0,0xa
02e0 e225       | %  |		Load	0x1,0x25
02e1 0098       |    |		Execute	Package,Field_Read_Dynamic
02e2 0216       |    |		Execute	Heap_Access,Convert
02e3 8234       | 4  |		Call	0x1,0x34
02e4 e021       | !  |		Load	0x0,0x21
02e5 e225       | %  |		Load	0x1,0x25
02e6 0096       |    |		Execute	Package,Entry
02e7 c22d       | -  |		Store	0x1,0x2d
02e8 4801       |H   |		Short_Literal	0x1
02e9 a22f       | /  |		Store_Unchecked	0x1,0x2f
02ea 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02eb 0000 0000  |    |		.BLANK	0000[0x5]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3       |    |		.CONST	0x02f3								; Address of begin
02f1 0004       |    |		.CONST	0x0004								; Address of exception handler
02f2 0001       |    |		.CONST	0x0001								; Number of locals
02f3			BODY_02f0:
02f3			INIT_02f0:
02f3 e230       | 0  |		Load	0x1,0x30
02f4 700d       |p   |		Jump_Nonzero	0x302
02f5 4801       |H   |		Short_Literal	0x1
02f6 a230       | 0  |		Store_Unchecked	0x1,0x30
02f7 4801       |H   |		Short_Literal	0x1
02f8 e22e       | .  |		Load	0x1,0x2e
02f9 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
02fa e231       | 1  |		Load	0x1,0x31
02fb e232       | 2  |		Load	0x1,0x32
02fc 8024       | $  |		Call	0x0,0x24
02fd 4802       |H   |		Short_Literal	0x2
02fe e22e       | .  |		Load	0x1,0x2e
02ff 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0300 01d5       |    |		Execute	Vector,Field_Reference
0301 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0302 e22e       | .  |		Load	0x1,0x2e
0303 0320       |    |		Declare_Variable	Record,Duplicate
0304 00cd       |    |		Action	Spare6_Action
0305 00ca       |    |		Action	Exit_Nullary_Function
0306 0000 0000  |    |		.XXX[0x2]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b 00da       |    |		Load_Top	At_Offset_2
030c e01f       |    |		Load	0x0,0x1f
030d e225       | %  |		Load	0x1,0x25
030e 0096       |    |		Execute	Package,Entry
030f 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0310 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0311 0000 0000  |    |		.BLANK	0000[0x7]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 0320       |    |		.CONST	0x0320								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0003       |    |		.CONST	0x0003								; Number of locals
031b			INIT_0318:
031b e20e       |    |		Load	0x1,0xe
031c 0337       | 7  |		Declare_Variable	Array
031d 00db       |    |		Load_Top	At_Offset_3
031e e228       | (  |		Load	0x1,0x28
031f 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0320			BODY_0318:
0320 00d8       |    |		Load_Top	At_Offset_0
0321 e228       | (  |		Load	0x1,0x28
0322 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0323 7002       |p   |		Jump_Nonzero	0x326
0324 e023       | #  |		Load	0x0,0x23
0325 0257       | W  |		Execute	Discrete,Raise
0326 4800       |H   |		Short_Literal	0x0
0327 4800       |H   |		Short_Literal	0x0
0328 00db       |    |		Load_Top	At_Offset_3
0329 01d6       |    |		Execute	Vector,Field_Write
032a 00cf       |    |		Action	Mark_Auxiliary
032b 4805       |H   |		Short_Literal	0x5
032c 4801       |H   |		Short_Literal	0x1
032d 0007       |    |		Action	Break_Optional
032e 00d8       |    |		Load_Top	At_Offset_0
032f e403       |    |		Load	0x2,0x3
0330 e228       | (  |		Load	0x1,0x28
0331 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0332 680b       |h   |		Jump_Zero	0x33e
0333 00ea       |    |		Load_Encached	Null_String_Cache
0334 00d9       |    |		Load_Top	At_Offset_1
0335 e403       |    |		Load	0x2,0x3
0336 e228       | (  |		Load	0x1,0x28
0337 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0338 00e1       |    |		Load_Encached	Boolean_Cache
0339 1c02       |    |		Execute_Immediate	Run_Utility,0x2
033a 00d9       |    |		Load_Top	At_Offset_1
033b e402       |    |		Load	0x2,0x2
033c 01d6       |    |		Execute	Vector,Field_Write
033d 7804       |x   |		Jump	0x342
033e 4800       |H   |		Short_Literal	0x0
033f 00d9       |    |		Load_Top	At_Offset_1
0340 e402       |    |		Load	0x2,0x2
0341 01d6       |    |		Execute	Vector,Field_Write
0342 00c8       |    |		Action	Pop_Auxiliary_Range
0343 3fea       |?   |		Loop_Increasing	0x32e
0344 00ce       |    |		Action	Pop_Auxiliary
0345 00d9       |    |		Load_Top	At_Offset_1
0346 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0347 0000       |    |		.XXX[0x1]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0350       | P  |		.CONST	0x0350								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0003       |    |		.CONST	0x0003								; Number of locals
034b			INIT_0348:
034b e20f       |    |		Load	0x1,0xf
034c 0337       | 7  |		Declare_Variable	Array
034d 00db       |    |		Load_Top	At_Offset_3
034e e22a       | *  |		Load	0x1,0x2a
034f 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0350			BODY_0348:
0350 00d8       |    |		Load_Top	At_Offset_0
0351 e22a       | *  |		Load	0x1,0x2a
0352 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0353 7002       |p   |		Jump_Nonzero	0x356
0354 e023       | #  |		Load	0x0,0x23
0355 0257       | W  |		Execute	Discrete,Raise
0356 00cf       |    |		Action	Mark_Auxiliary
0357 4805       |H   |		Short_Literal	0x5
0358 4800       |H   |		Short_Literal	0x0
0359 0007       |    |		Action	Break_Optional
035a 00d8       |    |		Load_Top	At_Offset_0
035b e403       |    |		Load	0x2,0x3
035c e22a       | *  |		Load	0x1,0x2a
035d 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
035e 680d       |h   |		Jump_Zero	0x36c
035f 00ea       |    |		Load_Encached	Null_String_Cache
0360 00d9       |    |		Load_Top	At_Offset_1
0361 e403       |    |		Load	0x2,0x3
0362 e22a       | *  |		Load	0x1,0x2a
0363 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0364 00e1       |    |		Load_Encached	Boolean_Cache
0365 1c02       |    |		Execute_Immediate	Run_Utility,0x2
0366 00d9       |    |		Load_Top	At_Offset_1
0367 e22c       | ,  |		Load	0x1,0x2c
0368 01d7       |    |		Execute	Vector,Field_Read
0369 e402       |    |		Load	0x2,0x2
036a 01d6       |    |		Execute	Vector,Field_Write
036b 7806       |x   |		Jump	0x372
036c 4800       |H   |		Short_Literal	0x0
036d 00d9       |    |		Load_Top	At_Offset_1
036e e22c       | ,  |		Load	0x1,0x2c
036f 01d7       |    |		Execute	Vector,Field_Read
0370 e402       |    |		Load	0x2,0x2
0371 01d6       |    |		Execute	Vector,Field_Write
0372 00c8       |    |		Action	Pop_Auxiliary_Range
0373 3fe6       |?   |		Loop_Increasing	0x35a
0374 00ce       |    |		Action	Pop_Auxiliary
0375 00d9       |    |		Load_Top	At_Offset_1
0376 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0377 0000       |    |		.XXX[0x1]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 0382       |    |		.CONST	0x0382								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0003       |    |		.CONST	0x0003								; Number of locals
037b			INIT_0378:
037b 00ea       |    |		Load_Encached	Null_String_Cache
037c e407       |    |		Load	0x2,0x7
037d e403       |    |		Load	0x2,0x3
037e e227       | '  |		Load	0x1,0x27
037f 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0380 029f 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Call
0382			BODY_0378:
0382 e407       |    |		Load	0x2,0x7
0383 0aff       |    |		Execute_Immediate	Plus,-0x1
0384 4609       |F   |		Jump_Case	0xa
0385 780b       |x   |		Jump	0x391								; case 0x0
0386 7810       |x   |		Jump	0x397								; case 0x1
0387 7815       |x   |		Jump	0x39d								; case 0x2
0388 781d       |x   |		Jump	0x3a6								; case 0x3
0389 7825       |x%  |		Jump	0x3af								; case 0x4
038a 782d       |x-  |		Jump	0x3b8								; case 0x5
038b 7835       |x5  |		Jump	0x3c1								; case 0x6
038c 783d       |x=  |		Jump	0x3ca								; case 0x7
038d 7845       |xE  |		Jump	0x3d3								; case 0x8
038e 7800       |x   |		Jump	0x38f								; case 0x9
038f 8603       |    |		Call	0x3,0x3
0390 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0391 e5fe       |    |		Load	0x2,-0x2
0392 00da       |    |		Load_Top	At_Offset_2
0393 8236       | 6  |		Call	0x1,0x36
0394 e402       |    |		Load	0x2,0x2
0395 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0396 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0397 e5fe       |    |		Load	0x2,-0x2
0398 00da       |    |		Load_Top	At_Offset_2
0399 8237       | 7  |		Call	0x1,0x37
039a e402       |    |		Load	0x2,0x2
039b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
039c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
039d e5fe       |    |		Load	0x2,-0x2
039e 00da       |    |		Load_Top	At_Offset_2
039f 8024       | $  |		Call	0x0,0x24
03a0 4800       |H   |		Short_Literal	0x0
03a1 e402       |    |		Load	0x2,0x2
03a2 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03a3 01d5       |    |		Execute	Vector,Field_Reference
03a4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03a5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03a6 e5fe       |    |		Load	0x2,-0x2
03a7 00da       |    |		Load_Top	At_Offset_2
03a8 8024       | $  |		Call	0x0,0x24
03a9 4801       |H   |		Short_Literal	0x1
03aa e402       |    |		Load	0x2,0x2
03ab 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03ac 01d5       |    |		Execute	Vector,Field_Reference
03ad 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03ae 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03af e5fe       |    |		Load	0x2,-0x2
03b0 00da       |    |		Load_Top	At_Offset_2
03b1 8024       | $  |		Call	0x0,0x24
03b2 4802       |H   |		Short_Literal	0x2
03b3 e402       |    |		Load	0x2,0x2
03b4 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03b5 01d5       |    |		Execute	Vector,Field_Reference
03b6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03b7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b8 e5fe       |    |		Load	0x2,-0x2
03b9 00da       |    |		Load_Top	At_Offset_2
03ba 8024       | $  |		Call	0x0,0x24
03bb 4800       |H   |		Short_Literal	0x0
03bc e402       |    |		Load	0x2,0x2
03bd 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03be 01d5       |    |		Execute	Vector,Field_Reference
03bf 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03c0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03c1 e5fe       |    |		Load	0x2,-0x2
03c2 00da       |    |		Load_Top	At_Offset_2
03c3 8024       | $  |		Call	0x0,0x24
03c4 4801       |H   |		Short_Literal	0x1
03c5 e402       |    |		Load	0x2,0x2
03c6 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03c7 01d5       |    |		Execute	Vector,Field_Reference
03c8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03c9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03ca e5fe       |    |		Load	0x2,-0x2
03cb 00da       |    |		Load_Top	At_Offset_2
03cc 8024       | $  |		Call	0x0,0x24
03cd 4802       |H   |		Short_Literal	0x2
03ce e402       |    |		Load	0x2,0x2
03cf 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03d0 01d5       |    |		Execute	Vector,Field_Reference
03d1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03d2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d3 e5fe       |    |		Load	0x2,-0x2
03d4 00da       |    |		Load_Top	At_Offset_2
03d5 8025       | %  |		Call	0x0,0x25
03d6 e402       |    |		Load	0x2,0x2
03d7 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
03d8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d9 0000 0000  |    |		.BLANK	0000[0x7]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3       |    |		.CONST	0x03e3								; Address of begin
03e1 03e9       |    |		.CONST	0x03e9								; Address of exception handler
03e2 0001       |    |		.CONST	0x0001								; Number of locals
03e3			BODY_03e0:
03e3			INIT_03e0:
03e3 e602       |    |		Load	0x3,0x2
03e4 00e1       |    |		Load_Encached	Boolean_Cache
03e5 1c02       |    |		Execute_Immediate	Run_Utility,0x2
03e6 e402       |    |		Load	0x2,0x2
03e7 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
03e8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03e9			TRAP_03e0:
03e9 0007       |    |		Action	Break_Optional
03ea 4800       |H   |		Short_Literal	0x0
03eb e402       |    |		Load	0x2,0x2
03ec 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
03ed 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03ee 0000 0000  |    |		.XXX[0x2]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3       |    |		.CONST	0x03f3								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0001       |    |		.CONST	0x0001								; Number of locals
03f3			BODY_03f0:
03f3			INIT_03f0:
03f3 4601       |F   |		Jump_Case	0x2
03f4 7801       |x   |		Jump	0x3f6								; case 0x0
03f5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
03f6 4800       |H   |		Short_Literal	0x0
03f7 00db       |    |		Load_Top	At_Offset_3
03f8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03f9 4800       |H   |		Short_Literal	0x0
03fa 00db       |    |		Load_Top	At_Offset_3
03fb 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03fc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
03fd 0000 0000  |    |		.XXX[0x3]
03ff 0000       |    |
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403       |    |		.CONST	0x0403								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0001       |    |		.CONST	0x0001								; Number of locals
0403			BODY_0400:
0403			INIT_0400:
0403 4601       |F   |		Jump_Case	0x2
0404 7801       |x   |		Jump	0x406								; case 0x0
0405 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0406 e213       |    |		Load	0x1,0x13
0407 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
0408 0337       | 7  |		Declare_Variable	Array
0409 4805       |H   |		Short_Literal	0x5
040a 4800       |H   |		Short_Literal	0x0
040b 4800       |H   |		Short_Literal	0x0
040c 00d9       |    |		Load_Top	At_Offset_1
040d e402       |    |		Load	0x2,0x2
040e 01d6       |    |		Execute	Vector,Field_Write
040f 3ffb       |?   |		Loop_Increasing	0x40b
0410 00db       |    |		Load_Top	At_Offset_3
0411 00d9       |    |		Load_Top	At_Offset_1
0412 00d9       |    |		Load_Top	At_Offset_1
0413 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
0414 0119       |    |		Execute	Any,Check_In_Formal_Type
0415 00d1       |    |		Pop_Control	Pop_Count_1
0416 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0417 e213       |    |		Load	0x1,0x13
0418 3001       |0   |		Execute	Record,Field_Type,Field_Number 0x1
0419 0337       | 7  |		Declare_Variable	Array
041a 4800       |H   |		Short_Literal	0x0
041b 4800       |H   |		Short_Literal	0x0
041c 00da       |    |		Load_Top	At_Offset_2
041d 01d6       |    |		Execute	Vector,Field_Write
041e 4800       |H   |		Short_Literal	0x0
041f 4801       |H   |		Short_Literal	0x1
0420 00da       |    |		Load_Top	At_Offset_2
0421 01d6       |    |		Execute	Vector,Field_Write
0422 4804       |H   |		Short_Literal	0x4
0423 4802       |H   |		Short_Literal	0x2
0424 4801       |H   |		Short_Literal	0x1
0425 00d9       |    |		Load_Top	At_Offset_1
0426 e402       |    |		Load	0x2,0x2
0427 01d6       |    |		Execute	Vector,Field_Write
0428 3ffb       |?   |		Loop_Increasing	0x424
0429 00db       |    |		Load_Top	At_Offset_3
042a 00d9       |    |		Load_Top	At_Offset_1
042b 00d9       |    |		Load_Top	At_Offset_1
042c 3001       |0   |		Execute	Record,Field_Type,Field_Number 0x1
042d 0119       |    |		Execute	Any,Check_In_Formal_Type
042e 00d1       |    |		Pop_Control	Pop_Count_1
042f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0430 8002       |    |		Call	0x0,0x2
0431 00db       |    |		Load_Top	At_Offset_3
0432 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0433 4800       |H   |		Short_Literal	0x0
0434 00db       |    |		Load_Top	At_Offset_3
0435 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0436 4800       |H   |		Short_Literal	0x0
0437 00db       |    |		Load_Top	At_Offset_3
0438 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0439 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
043a 0000 0000  |    |		.BLANK	0000[0x6]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0468       | h  |		.CONST	0x0468								; Address of begin
0441 0004       |    |		.CONST	0x0004								; Address of exception handler
0442 0015       |    |		.CONST	0x0015								; Number of locals
0443			INIT_0440:
0443 029a 0473  |   s|		Declare_Subprogram	INIT_0470,For_Outer_Call,Visible,Unelaborated
0445 029a 0483  |    |		Declare_Subprogram	INIT_0480,For_Outer_Call,Visible,Unelaborated
0447 029a 049b  |    |		Declare_Subprogram	INIT_0498,For_Outer_Call,Visible,Unelaborated
0449 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated
044b 029a 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Outer_Call,Visible,Unelaborated
044d 029a 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Outer_Call,Visible,Unelaborated
044f 029a 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call,Visible,Unelaborated
0451 029a 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Outer_Call,Visible,Unelaborated
0453 029a 04fb  |    |		Declare_Subprogram	INIT_04f8,For_Outer_Call,Visible,Unelaborated
0455 00bf       |    |		Action	Accept_Activation
0456 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0457 00c7       |    |		Action	Elaborate_Subprogram
0458 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0459 00c7       |    |		Action	Elaborate_Subprogram
045a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
045b 00c7       |    |		Action	Elaborate_Subprogram
045c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
045d 00c7       |    |		Action	Elaborate_Subprogram
045e 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
045f 00c7       |    |		Action	Elaborate_Subprogram
0460 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0461 00c7       |    |		Action	Elaborate_Subprogram
0462 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0463 00c7       |    |		Action	Elaborate_Subprogram
0464 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0465 00c7       |    |		Action	Elaborate_Subprogram
0466 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0467 00c7       |    |		Action	Elaborate_Subprogram
0468			BODY_0440:
0468 00bc       |    |		Action	Signal_Activated
0469 00bb       |    |		Action	Signal_Completion
046a 0000 0000  |    |		.BLANK	0000[0x6]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0473       | s  |		.CONST	0x0473								; Address of begin
0471 0004       |    |		.CONST	0x0004								; Address of exception handler
0472 0001       |    |		.CONST	0x0001								; Number of locals
0473			BODY_0470:
0473			INIT_0470:
0473 00da       |    |		Load_Top	At_Offset_2
0474 8001       |    |		Call	0x0,0x1
0475 7004       |p   |		Jump_Nonzero	0x47a
0476 00db       |    |		Load_Top	At_Offset_3
0477 00db       |    |		Load_Top	At_Offset_3
0478 8002       |    |		Call	0x0,0x2
0479 c5fe       |    |		Store	0x2,-0x2
047a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
047b 0000 0000  |    |		.BLANK	0000[0x5]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483       |    |		.CONST	0x0483								; Address of begin
0481 0004       |    |		.CONST	0x0004								; Address of exception handler
0482 0001       |    |		.CONST	0x0001								; Number of locals
0483			BODY_0480:
0483			INIT_0480:
0483 00db       |    |		Load_Top	At_Offset_3
0484 8003       |    |		Call	0x0,0x3
0485 01db       |    |		Execute	Vector,Length
0486 7006       |p   |		Jump_Nonzero	0x48d
0487 e004       |    |		Load	0x0,0x4
0488 7001       |p   |		Jump_Nonzero	0x48a
0489 8005       |    |		Call	0x0,0x5
048a e006       |    |		Load	0x0,0x6
048b a5fd       |    |		Store_Unchecked	0x2,-0x3
048c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
048d e5fd       |    |		Load	0x2,-0x3
048e e007       |    |		Load	0x0,0x7
048f 0216       |    |		Execute	Heap_Access,Convert
0490 e5fe       |    |		Load	0x2,-0x2
0491 e5ff       |    |		Load	0x2,-0x1
0492 8008       |    |		Call	0x0,0x8
0493 c5fd       |    |		Store	0x2,-0x3
0494 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0495 0000 0000  |    |		.XXX[0x3]
0497 0000       |    |
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b       |    |		.CONST	0x049b								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0001       |    |		.CONST	0x0001								; Number of locals
049b			BODY_0498:
049b			INIT_0498:
049b 00db       |    |		Load_Top	At_Offset_3
049c e007       |    |		Load	0x0,0x7
049d 0216       |    |		Execute	Heap_Access,Convert
049e 00db       |    |		Load_Top	At_Offset_3
049f 8009       |    |		Call	0x0,0x9
04a0 c5fe       |    |		Store	0x2,-0x2
04a1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04a2 0000 0000  |    |		.BLANK	0000[0x6]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab       |    |		.CONST	0x04ab								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0001       |    |		.CONST	0x0001								; Number of locals
04ab			BODY_04a8:
04ab			INIT_04a8:
04ab 00da       |    |		Load_Top	At_Offset_2
04ac 8001       |    |		Call	0x0,0x1
04ad 6802       |h   |		Jump_Zero	0x4b0
04ae 00ea       |    |		Load_Encached	Null_String_Cache
04af 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04b0 0831       | 1  |		Execute_Immediate	Raise,0x31
04b1 0000 0000  |    |		.BLANK	0000[0x7]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb       |    |		.CONST	0x04bb								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0001       |    |		.CONST	0x0001								; Number of locals
04bb			BODY_04b8:
04bb			INIT_04b8:
04bb 00da       |    |		Load_Top	At_Offset_2
04bc 8001       |    |		Call	0x0,0x1
04bd 7005       |p   |		Jump_Nonzero	0x4c3
04be 00da       |    |		Load_Top	At_Offset_2
04bf e007       |    |		Load	0x0,0x7
04c0 0216       |    |		Execute	Heap_Access,Convert
04c1 800b       |    |		Call	0x0,0xb
04c2 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
04c3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04c4 0000 0000  |    |		.BLANK	0000[0x4]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb       |    |		.CONST	0x04cb								; Address of begin
04c9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ca 0001       |    |		.CONST	0x0001								; Number of locals
04cb			BODY_04c8:
04cb			INIT_04c8:
04cb 00db       |    |		Load_Top	At_Offset_3
04cc 8001       |    |		Call	0x0,0x1
04cd 7006       |p   |		Jump_Nonzero	0x4d4
04ce 00db       |    |		Load_Top	At_Offset_3
04cf e007       |    |		Load	0x0,0x7
04d0 0216       |    |		Execute	Heap_Access,Convert
04d1 00db       |    |		Load_Top	At_Offset_3
04d2 800c       |    |		Call	0x0,0xc
04d3 c5fe       |    |		Store	0x2,-0x2
04d4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04d5 0000 0000  |    |		.XXX[0x3]
04d7 0000       |    |
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db       |    |		.CONST	0x04db								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0001       |    |		.CONST	0x0001								; Number of locals
04db			BODY_04d8:
04db			INIT_04d8:
04db 00db       |    |		Load_Top	At_Offset_3
04dc 8001       |    |		Call	0x0,0x1
04dd 7006       |p   |		Jump_Nonzero	0x4e4
04de 00db       |    |		Load_Top	At_Offset_3
04df e007       |    |		Load	0x0,0x7
04e0 0216       |    |		Execute	Heap_Access,Convert
04e1 00db       |    |		Load_Top	At_Offset_3
04e2 800d       |    |		Call	0x0,0xd
04e3 c5fe       |    |		Store	0x2,-0x2
04e4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04e5 0000 0000  |    |		.XXX[0x3]
04e7 0000       |    |
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb       |    |		.CONST	0x04eb								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0001       |    |		.CONST	0x0001								; Number of locals
04eb			BODY_04e8:
04eb			INIT_04e8:
04eb 00da       |    |		Load_Top	At_Offset_2
04ec 8001       |    |		Call	0x0,0x1
04ed 6802       |h   |		Jump_Zero	0x4f0
04ee 4800       |H   |		Short_Literal	0x0
04ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04f0 00da       |    |		Load_Top	At_Offset_2
04f1 800e       |    |		Call	0x0,0xe
04f2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04f3 0000 0000  |    |		.BLANK	0000[0x5]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb       |    |		.CONST	0x04fb								; Address of begin
04f9 0004       |    |		.CONST	0x0004								; Address of exception handler
04fa 0001       |    |		.CONST	0x0001								; Number of locals
04fb			BODY_04f8:
04fb			INIT_04f8:
04fb 00db       |    |		Load_Top	At_Offset_3
04fc 8001       |    |		Call	0x0,0x1
04fd 7006       |p   |		Jump_Nonzero	0x504
04fe 00db       |    |		Load_Top	At_Offset_3
04ff e007       |    |		Load	0x0,0x7
0500 0216       |    |		Execute	Heap_Access,Convert
0501 00db       |    |		Load_Top	At_Offset_3
0502 800f       |    |		Call	0x0,0xf
0503 c5fe       |    |		Store	0x2,-0x2
0504 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0505 ; --------------------------------------------------------------------------------------
0505 ; STRING TABLE
0505 ; --------------------------------------------------------------------------------------
0505 003a       | :  |		.STRTAB	0x003a->0x0522							; "NONE"
0506 003c       | <  |		.STRTAB	0x003c->0x0524							; "ELAPSED_TIME"
0507 0046       | F  |		.STRTAB	0x0046->0x052a							; "CPU_TIME"
0508 004c       | L  |		.STRTAB	0x004c->0x052e							; "NUMBER_OF_FAILURES"
0509 005c       | \  |		.STRTAB	0x005c->0x0537							; "UNHANDLED_EXCEPTION"
050a 006d       | m  |		.STRTAB	0x006d->0x0540							; "INTERACTIVE"
050b 0076       | v  |		.STRTAB	0x0076->0x0546							; "EX_USER_SCRIPT_PROLOG"
050c 0089       |    |		.STRTAB	0x0089->0x0550							; "EX_USER_SCRIPT_EPILOG"
050d 009c       |    |		.STRTAB	0x009c->0x055b							; "EX_VERSION_SAVE"
050e 00a9       |    |		.STRTAB	0x00a9->0x0562							; "NONE"
050f 00ab       |    |		.STRTAB	0x00ab->0x0564							; "HALT_CONDITIONS"
0510 00b8       |    |		.STRTAB	0x00b8->0x056c							; "FAILURE_STATUS_SET"
0511 00c8       |    |		.STRTAB	0x00c8->0x0575							; "USER_SCRIPT_PROLOG"
0512 00d8       |    |		.STRTAB	0x00d8->0x057e							; "USER_SCRIPT_EPILOG"
0513 00e8       |    |		.STRTAB	0x00e8->0x0587							; "VERSION_SAVE"
0514 00f2       |    |		.STRTAB	0x00f2->0x058d							; "USER_SCRIPT_PROLOG_PARAMS"
0515 0109       |    |		.STRTAB	0x0109->0x0599							; "USER_SCRIPT_EPILOG_PARAMS"
0516 0120       |    |		.STRTAB	0x0120->0x05a6							; "VERSION_SAVE_PARAMS"
0517 0131       | 1  |		.STRTAB	0x0131->0x05af							; "TERMINATION_CONTROL"
0518 0142       | B  |		.STRTAB	0x0142->0x05b9							; "RCI_TEST_SCRIPT"
0519 014f       | O  |		.STRTAB	0x014f->0x05c0							; "NONE"
051a 0151       | Q  |		.STRTAB	0x0151->0x05c2							; "UNKNOWN"
051b 0156       | V  |		.STRTAB	0x0156->0x05c6							; "PASS"
051c 0158       | X  |		.STRTAB	0x0158->0x05c8							; "FAIL"
051d 015a       | Z  |		.STRTAB	0x015a->0x05ca							; "FAIL_WITH_EXCEPTION"
051e 016b       | k  |		.STRTAB	0x016b->0x05d3							; "TIMEOUT"
051f 0170       | p  |		.STRTAB	0x0170->0x05d7							; "others => Unspecified"
0520 0183       |    |		.STRTAB	0x0183->0x05e1							; "<default>"
0521 018a       |    |		.STREND 0x018a->0x05e6
0522 4e4f 4e45  |NONE|		.STRTAB_STRINGS
05e6 0000 0000  |    |		.XXX[0x2]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; Debug Table
05e8 ; --------------------------------------------------------------------------------------
05e8 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0x84f8,0x0000,0x0001,0x0000
05ee 0000 0000  |    |		.BLANK	0000[0x12]