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

⟦4e4dd11e7⟧

    Length: 6144 (0x1800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0ea8df

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0b48       | H  |		.CONST	0x0b48								; 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 8007       |    |		.CONST	0x8007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0092       |    |		.CONST	0x0092								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0024       | $  |		.CONST	0x0024								; Number of locals
001b			INIT_0018:
001b 0092 084c  |   L|		Action	Push_String_Extended,0x84c					; "--|Prerequisite"
001d 0092 084d  |   M|		Action	Push_String_Extended,0x84d					; "--|Wait"
001f 0092 084e  |   N|		Action	Push_String_Extended,0x84e					; "--|No_Wait"
0021 0092 084f  |   O|		Action	Push_String_Extended,0x84f					; "--|Parameters"
0023 0092 0850  |   P|		Action	Push_String_Extended,0x850					; "--|Options"
0025 0092 0851  |   Q|		Action	Push_String_Extended,0x851					; "--|Procedure_Name"
0027 0092 0852  |   R|		Action	Push_String_Extended,0x852					; "--|Procedure_Context"
0029 0092 0853  |   S|		Action	Push_String_Extended,0x853					; "--|Subsystem"
002b 0092 0854  |   T|		Action	Push_String_Extended,0x854					; "--|Activity"
002d 0092 0855  |   U|		Action	Push_String_Extended,0x855					; "--|Context"
002f 00e1       |    |		Load_Encached	Boolean_Cache
0030 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0031 e002       |    |		Load	0x0,0x2
0032 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0033 00e9       |    |		Load_Encached	String_Cache
0034 02a0       |    |		Declare_Subprogram	Null_Subprogram
0035 4818       |H   |		Short_Literal	0x18
0036 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
0037 0092 0856  |   V|		Action	Push_String_Extended,0x856					; "!Machine.Error_Logs"
0039 00d9       |    |		Load_Top	At_Offset_1
003a 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
003b 0092 0857  |   W|		Action	Push_String_Extended,0x857					; "!Machine.Release.Current.Activity"
003d 00da       |    |		Load_Top	At_Offset_2
003e 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
003f 00da       |    |		Load_Top	At_Offset_2
0040 0007       |    |		Action	Break_Optional
0041 4818       |H   |		Short_Literal	0x18
0042 03cc       |    |		Declare_Type	Access,Incomplete,Accesses_Protected
0043 4818       |H   |		Short_Literal	0x18
0044 03cc       |    |		Declare_Type	Access,Incomplete,Accesses_Protected
0045 00d9       |    |		Load_Top	At_Offset_1
0046 e002       |    |		Load	0x0,0x2
0047 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0048 00da       |    |		Load_Top	At_Offset_2
0049 02a0       |    |		Declare_Subprogram	Null_Subprogram
004a 4803       |H   |		Short_Literal	0x3
004b 032d       | -  |		Declare_Type	Record,Defined
004c 00d8       |    |		Load_Top	At_Offset_0
004d 02a0       |    |		Declare_Subprogram	Null_Subprogram
004e e412       |    |		Load	0x2,0x12
004f 03c7       |    |		Complete_Type	Access,By_Defining
0050 00e1       |    |		Load_Encached	Boolean_Cache
0051 00db       |    |		Load_Top	At_Offset_3
0052 00e1       |    |		Load_Encached	Boolean_Cache
0053 00e1       |    |		Load_Encached	Boolean_Cache
0054 00e1       |    |		Load_Encached	Boolean_Cache
0055 e002       |    |		Load	0x0,0x2
0056 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0057 e40e       |    |		Load	0x2,0xe
0058 00d8       |    |		Load_Top	At_Offset_0
0059 e40e       |    |		Load	0x2,0xe
005a 00d8       |    |		Load_Top	At_Offset_0
005b e40e       |    |		Load	0x2,0xe
005c 00d8       |    |		Load_Top	At_Offset_0
005d e40e       |    |		Load	0x2,0xe
005e 02a0       |    |		Declare_Subprogram	Null_Subprogram
005f 480d       |H   |		Short_Literal	0xd
0060 032d       | -  |		Declare_Type	Record,Defined
0061 00d8       |    |		Load_Top	At_Offset_0
0062 02a0       |    |		Declare_Subprogram	Null_Subprogram
0063 e413       |    |		Load	0x2,0x13
0064 03c7       |    |		Complete_Type	Access,By_Defining
0065 e003       |    |		Load	0x0,0x3
0066 e004       |    |		Load	0x0,0x4
0067 4865       |He  |		Short_Literal	0x65
0068 e002       |    |		Load	0x0,0x2
0069 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
006a e413       |    |		Load	0x2,0x13
006b e002       |    |		Load	0x0,0x2
006c 1919       |    |		Execute	Package,Field_Reference,Field_Number 0x19
006d e005       |    |		Load	0x0,0x5
006e 0387       |    |		Declare_Variable	Package
006f 00d8       |    |		Load_Top	At_Offset_0
0070 020f       |    |		Execute	Module,Activate
0071 00d8       |    |		Load_Top	At_Offset_0
0072 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0073 00e1       |    |		Load_Encached	Boolean_Cache
0074 e40e       |    |		Load	0x2,0xe
0075 0007       |    |		Action	Break_Optional
0076 029e 0143  |   C|		Declare_Subprogram	INIT_0140,For_Call,Unelaborated
0078 e006       |    |		Load	0x0,0x6
0079 1980       |    |		Execute	Package,Field_Reference,Field_Number 0x80
007a 00c6       |    |		Action	Check_Subprogram_Elaborated
007b 481a       |H   |		Short_Literal	0x1a
007c 4802       |H   |		Short_Literal	0x2
007d 0099       |    |		Action	Reference_Dynamic
007e e006       |    |		Load	0x0,0x6
007f 1964       | d  |		Execute	Package,Field_Reference,Field_Number 0x64
0080 e007       |    |		Load	0x0,0x7
0081 e008       |    |		Load	0x0,0x8
0082 481f       |H   |		Short_Literal	0x1f
0083 0007       |    |		Action	Break_Optional
0084 029f 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Call
0086 029f 021b  |    |		Declare_Subprogram	INIT_0218,For_Call
0088 029f 024b  |   K|		Declare_Subprogram	INIT_0248,For_Call
008a 481a       |H   |		Short_Literal	0x1a
008b 4802       |H   |		Short_Literal	0x2
008c 0099       |    |		Action	Reference_Dynamic
008d 00c7       |    |		Action	Elaborate_Subprogram
008e 029f 025b  |   [|		Declare_Subprogram	INIT_0258,For_Call
0090 029f 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Call
0092			BODY_0018:
0092 e416       |    |		Load	0x2,0x16
0093 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0094 4865       |He  |		Short_Literal	0x65
0095 e416       |    |		Load	0x2,0x16
0096 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0097 c417       |    |		Store	0x2,0x17
0098 487f       |H   |		Short_Literal	0x7f
0099 e009       |    |		Load	0x0,0x9
009a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
009b e00a       |    |		Load	0x0,0xa
009c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
009d e002       |    |		Load	0x0,0x2
009e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
009f a40d       |    |		Store_Unchecked	0x2,0xd
00a0 e5fc       |    |		Load	0x2,-0x4
00a1 0092 0858  |   X|		Action	Push_String_Extended,0x858					; "@"
00a3 01df       |    |		Execute	Vector,Equal
00a4 701a       |p   |		Jump_Nonzero	0xbf
00a5 0092 0859  |   Y|		Action	Push_String_Extended,0x859					; "["
00a7 e5ff       |    |		Load	0x2,-0x1
00a8 01cc       |    |		Execute	Vector,Catenate
00a9 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; ","
00ab 01cc       |    |		Execute	Vector,Catenate
00ac e5fe       |    |		Load	0x2,-0x2
00ad 01cc       |    |		Execute	Vector,Catenate
00ae 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; ","
00b0 01cc       |    |		Execute	Vector,Catenate
00b1 e5fd       |    |		Load	0x2,-0x3
00b2 01cc       |    |		Execute	Vector,Catenate
00b3 0092 085b  |   [|		Action	Push_String_Extended,0x85b					; "].["
00b5 01cc       |    |		Execute	Vector,Catenate
00b6 e5fc       |    |		Load	0x2,-0x4
00b7 01cc       |    |		Execute	Vector,Catenate
00b8 0092 085c  |   \|		Action	Push_String_Extended,0x85c					; "]"
00ba 01cc       |    |		Execute	Vector,Catenate
00bb 8420       |    |		Call	0x2,0x20
00bc e40e       |    |		Load	0x2,0xe
00bd 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00be a411       |    |		Store_Unchecked	0x2,0x11
00bf e5fb       |    |		Load	0x2,-0x5
00c0 7017       |p   |		Jump_Nonzero	0xd8
00c1 0092 085d  |   ]|		Action	Push_String_Extended,0x85d					; "!Machine.Error_Logs.Machine_Initialize"
00c3 e006       |    |		Load	0x0,0x6
00c4 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
00c5 0092 085e  |   ^|		Action	Push_String_Extended,0x85e					; "!Machine.Error_Logs.Machine_Initialize_Errors"
00c7 e006       |    |		Load	0x0,0x6
00c8 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
00c9 4801       |H   |		Short_Literal	0x1
00ca e00b       |    |		Load	0x0,0xb
00cb 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00cc e00b       |    |		Load	0x0,0xb
00cd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00ce 7009       |p   |		Jump_Nonzero	0xd8
00cf 4801       |H   |		Short_Literal	0x1
00d0 a40c       |    |		Store_Unchecked	0x2,0xc
00d1 e00c       |    |		Load	0x0,0xc
00d2 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00d3 4807       |H   |		Short_Literal	0x7
00d4 0092 085f  |   _|		Action	Push_String_Extended,0x85f					; "Could not enable privileges."
00d6 e00d       |    |		Load	0x0,0xd
00d7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00d8 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "<PROFILE>"
00da 0092 0856  |   V|		Action	Push_String_Extended,0x856					; "!Machine.Error_Logs"
00dc e00e       |    |		Load	0x0,0xe
00dd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00de 0092 0861  |   a|		Action	Push_String_Extended,0x861					; "<ERRORS>"
00e0 e410       |    |		Load	0x2,0x10
00e1 0227       | '  |		Execute	Access,All_Reference
00e2 e00f       |    |		Load	0x0,0xf
00e3 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00e4 4800       |H   |		Short_Literal	0x0
00e5 a418       |    |		Store_Unchecked	0x2,0x18
00e6 e5ff       |    |		Load	0x2,-0x1
00e7 e40e       |    |		Load	0x2,0xe
00e8 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00e9 a419       |    |		Store_Unchecked	0x2,0x19
00ea e5ff       |    |		Load	0x2,-0x1
00eb 01db       |    |		Execute	Vector,Length
00ec 680f       |h   |		Jump_Zero	0xfc
00ed e5ff       |    |		Load	0x2,-0x1
00ee 0092 0862  |   b|		Action	Push_String_Extended,0x862					; ".[@'spec,@_Start'c(file)]"
00f0 01cc       |    |		Execute	Vector,Catenate
00f1 481b       |H   |		Short_Literal	0x1b
00f2 4802       |H   |		Short_Literal	0x2
00f3 0099       |    |		Action	Reference_Dynamic
00f4 481c       |H   |		Short_Literal	0x1c
00f5 4802       |H   |		Short_Literal	0x2
00f6 0099       |    |		Action	Reference_Dynamic
00f7 481d       |H   |		Short_Literal	0x1d
00f8 4802       |H   |		Short_Literal	0x2
00f9 0099       |    |		Action	Reference_Dynamic
00fa e006       |    |		Load	0x0,0x6
00fb 1880       |    |		Execute	Package,Field_Execute,Field_Number 0x80
00fc 4801       |H   |		Short_Literal	0x1
00fd a418       |    |		Store_Unchecked	0x2,0x18
00fe e5fe       |    |		Load	0x2,-0x2
00ff e40e       |    |		Load	0x2,0xe
0100 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0101 a419       |    |		Store_Unchecked	0x2,0x19
0102 e5fe       |    |		Load	0x2,-0x2
0103 01db       |    |		Execute	Vector,Length
0104 680f       |h   |		Jump_Zero	0x114
0105 e5fe       |    |		Load	0x2,-0x2
0106 0092 0862  |   b|		Action	Push_String_Extended,0x862					; ".[@'spec,@_Start'c(file)]"
0108 01cc       |    |		Execute	Vector,Catenate
0109 481b       |H   |		Short_Literal	0x1b
010a 4802       |H   |		Short_Literal	0x2
010b 0099       |    |		Action	Reference_Dynamic
010c 481c       |H   |		Short_Literal	0x1c
010d 4802       |H   |		Short_Literal	0x2
010e 0099       |    |		Action	Reference_Dynamic
010f 481d       |H   |		Short_Literal	0x1d
0110 4802       |H   |		Short_Literal	0x2
0111 0099       |    |		Action	Reference_Dynamic
0112 e006       |    |		Load	0x0,0x6
0113 1880       |    |		Execute	Package,Field_Execute,Field_Number 0x80
0114 e5fd       |    |		Load	0x2,-0x3
0115 e40e       |    |		Load	0x2,0xe
0116 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0117 a419       |    |		Store_Unchecked	0x2,0x19
0118 e5fd       |    |		Load	0x2,-0x3
0119 01db       |    |		Execute	Vector,Length
011a 680f       |h   |		Jump_Zero	0x12a
011b e5fd       |    |		Load	0x2,-0x3
011c 0092 0862  |   b|		Action	Push_String_Extended,0x862					; ".[@'spec,@_Start'c(file)]"
011e 01cc       |    |		Execute	Vector,Catenate
011f 481b       |H   |		Short_Literal	0x1b
0120 4802       |H   |		Short_Literal	0x2
0121 0099       |    |		Action	Reference_Dynamic
0122 481c       |H   |		Short_Literal	0x1c
0123 4802       |H   |		Short_Literal	0x2
0124 0099       |    |		Action	Reference_Dynamic
0125 481d       |H   |		Short_Literal	0x1d
0126 4802       |H   |		Short_Literal	0x2
0127 0099       |    |		Action	Reference_Dynamic
0128 e006       |    |		Load	0x0,0x6
0129 1880       |    |		Execute	Package,Field_Execute,Field_Number 0x80
012a e5fb       |    |		Load	0x2,-0x5
012b 680c       |h   |		Jump_Zero	0x138
012c 8423       | #  |		Call	0x2,0x23
012d 4801       |H   |		Short_Literal	0x1
012e e006       |    |		Load	0x0,0x6
012f 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0130 0092 0863  |   c|		Action	Push_String_Extended,0x863					; "Start ordering:"
0132 e006       |    |		Load	0x0,0x6
0133 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0134 0092 0864  |   d|		Action	Push_String_Extended,0x864					; "---------------"
0136 e006       |    |		Load	0x0,0x6
0137 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0138 8424       | $  |		Call	0x2,0x24
0139 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
013a 0000 0000  |    |		.BLANK	0000[0x6]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0155       | U  |		.CONST	0x0155								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0009       |    |		.CONST	0x0009								; Number of locals
0143			INIT_0140:
0143 00da       |    |		Load_Top	At_Offset_2
0144 e006       |    |		Load	0x0,0x6
0145 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0146 00d8       |    |		Load_Top	At_Offset_0
0147 e010       |    |		Load	0x0,0x10
0148 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0149 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
014a e002       |    |		Load	0x0,0x2
014b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014c e413       |    |		Load	0x2,0x13
014d 0007       |    |		Action	Break_Optional
014e 00e1       |    |		Load_Encached	Boolean_Cache
014f 029f 030b  |    |		Declare_Subprogram	INIT_0308,For_Call
0151 029f 0333  |   3|		Declare_Subprogram	INIT_0330,For_Call
0153 029f 0433  |   3|		Declare_Subprogram	INIT_0430,For_Call
0155			BODY_0140:
0155 4801       |H   |		Short_Literal	0x1
0156 e40d       |    |		Load	0x2,0xd
0157 e603       |    |		Load	0x3,0x3
0158 e002       |    |		Load	0x0,0x2
0159 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
015a a604       |    |		Store_Unchecked	0x3,0x4
015b 00e1       |    |		Load_Encached	Boolean_Cache
015c e605       |    |		Load	0x3,0x5
015d e604       |    |		Load	0x3,0x4
015e e417       |    |		Load	0x2,0x17
015f e416       |    |		Load	0x2,0x16
0160 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0161 c605       |    |		Store	0x3,0x5
0162 c606       |    |		Store	0x3,0x6
0163 00db       |    |		Load_Top	At_Offset_3
0164 7017       |p   |		Jump_Nonzero	0x17c
0165 e413       |    |		Load	0x2,0x13
0166 03bc       |    |		Declare_Variable	Access,By_Allocation
0167 a605       |    |		Store_Unchecked	0x3,0x5
0168 4801       |H   |		Short_Literal	0x1
0169 e605       |    |		Load	0x3,0x5
016a 0227       | '  |		Execute	Access,All_Reference
016b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
016c 4800       |H   |		Short_Literal	0x0
016d e605       |    |		Load	0x3,0x5
016e 0227       | '  |		Execute	Access,All_Reference
016f 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0170 e604       |    |		Load	0x3,0x4
0171 e605       |    |		Load	0x3,0x5
0172 0227       | '  |		Execute	Access,All_Reference
0173 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0174 e417       |    |		Load	0x2,0x17
0175 4800       |H   |		Short_Literal	0x0
0176 e605       |    |		Load	0x3,0x5
0177 e604       |    |		Load	0x3,0x4
0178 e416       |    |		Load	0x2,0x16
0179 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
017a c417       |    |		Store	0x2,0x17
017b 780b       |x   |		Jump	0x187
017c e605       |    |		Load	0x3,0x5
017d 0227       | '  |		Execute	Access,All_Reference
017e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
017f 6807       |h   |		Jump_Zero	0x187
0180 e603       |    |		Load	0x3,0x3
0181 0092 0865  |   e|		Action	Push_String_Extended,0x865					; " is reserved: must not be used in Site initialization.  Will be ignored"
0183 01cc       |    |		Execute	Vector,Catenate
0184 e006       |    |		Load	0x0,0x6
0185 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0186 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0187 00cf       |    |		Action	Mark_Auxiliary
0188 7802       |x   |		Jump	0x18b
0189 8608       |    |		Call	0x3,0x8
018a 00c9       |    |		Action	Pop_Auxiliary_Loop
018b e7ff       |    |		Load	0x3,-0x1
018c e006       |    |		Load	0x0,0x6
018d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
018e 6ffa       |o   |		Jump_Zero	0x189
018f 00ce       |    |		Action	Pop_Auxiliary
0190 e418       |    |		Load	0x2,0x18
0191 e605       |    |		Load	0x3,0x5
0192 0227       | '  |		Execute	Access,All_Reference
0193 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0194 4801       |H   |		Short_Literal	0x1
0195 e605       |    |		Load	0x3,0x5
0196 0227       | '  |		Execute	Access,All_Reference
0197 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0198 e605       |    |		Load	0x3,0x5
0199 0227       | '  |		Execute	Access,All_Reference
019a 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
019b 7006       |p   |		Jump_Nonzero	0x1a2
019c e603       |    |		Load	0x3,0x3
019d e40e       |    |		Load	0x2,0xe
019e 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
019f e605       |    |		Load	0x3,0x5
01a0 0227       | '  |		Execute	Access,All_Reference
01a1 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
01a2 e605       |    |		Load	0x3,0x5
01a3 0227       | '  |		Execute	Access,All_Reference
01a4 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
01a5 7004       |p   |		Jump_Nonzero	0x1aa
01a6 e40f       |    |		Load	0x2,0xf
01a7 e605       |    |		Load	0x3,0x5
01a8 0227       | '  |		Execute	Access,All_Reference
01a9 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
01aa e605       |    |		Load	0x3,0x5
01ab 0227       | '  |		Execute	Access,All_Reference
01ac 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
01ad 7004       |p   |		Jump_Nonzero	0x1b2
01ae e419       |    |		Load	0x2,0x19
01af e605       |    |		Load	0x3,0x5
01b0 0227       | '  |		Execute	Access,All_Reference
01b1 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
01b2 e605       |    |		Load	0x3,0x5
01b3 0227       | '  |		Execute	Access,All_Reference
01b4 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
01b5 7004       |p   |		Jump_Nonzero	0x1ba
01b6 e410       |    |		Load	0x2,0x10
01b7 e605       |    |		Load	0x3,0x5
01b8 0227       | '  |		Execute	Access,All_Reference
01b9 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
01ba 8609       |    |		Call	0x3,0x9
01bb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01bc 0000 0000  |    |		.BLANK	0000[0x4]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01d7       |    |		.CONST	0x01d7								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0007       |    |		.CONST	0x0007								; Number of locals
01c3			INIT_01c0:
01c3 e010       |    |		Load	0x0,0x10
01c4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01c5 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
01c6 02c7       |    |		Declare_Variable	Any
01c7 00d8       |    |		Load_Top	At_Offset_0
01c8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01c9 e010       |    |		Load	0x0,0x10
01ca 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01cb 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01cc 4801       |H   |		Short_Literal	0x1
01cd 6046       |`F  |		Indirect_Literal	Discrete,0x214,{0x00000000, 0x00001000}
01ce 00e9       |    |		Load_Encached	String_Cache
01cf 035b       | [  |		Declare_Type	Array,Constrained
01d0 0337       | 7  |		Declare_Variable	Array
01d1 00e3       |    |		Load_Encached	Natural_Cache
01d2 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
01d3 00e3       |    |		Load_Encached	Natural_Cache
01d4 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01d5 029f 045b  |   [|		Declare_Subprogram	INIT_0458,For_Call
01d7			BODY_01c0:
01d7 e010       |    |		Load	0x0,0x10
01d8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01d9 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01da e602       |    |		Load	0x3,0x2
01db 6034       |`4  |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x00004000}
01dc e011       |    |		Load	0x0,0x11
01dd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01de e009       |    |		Load	0x0,0x9
01df 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01e0 e00a       |    |		Load	0x0,0xa
01e1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01e2 4801       |H   |		Short_Literal	0x1
01e3 4800       |H   |		Short_Literal	0x0
01e4 e009       |    |		Load	0x0,0x9
01e5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01e6 e010       |    |		Load	0x0,0x10
01e7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01e8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01e9 e7ff       |    |		Load	0x3,-0x1
01ea e010       |    |		Load	0x0,0x10
01eb 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01ec 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01ed c602       |    |		Store	0x3,0x2
01ee c603       |    |		Store	0x3,0x3
01ef e603       |    |		Load	0x3,0x3
01f0 6802       |h   |		Jump_Zero	0x1f3
01f1 e7ff       |    |		Load	0x3,-0x1
01f2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f3 00cf       |    |		Action	Mark_Auxiliary
01f4 7807       |x   |		Jump	0x1fc
01f5 8607       |    |		Call	0x3,0x7
01f6 e602       |    |		Load	0x3,0x2
01f7 e010       |    |		Load	0x0,0x10
01f8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01f9 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01fa c602       |    |		Store	0x3,0x2
01fb 00c9       |    |		Action	Pop_Auxiliary_Loop
01fc e602       |    |		Load	0x3,0x2
01fd e010       |    |		Load	0x0,0x10
01fe 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01ff 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0200 6ff4       |o   |		Jump_Zero	0x1f5
0201 00ce       |    |		Action	Pop_Auxiliary
0202 00d9       |    |		Load_Top	At_Offset_1
0203 7002       |p   |		Jump_Nonzero	0x206
0204 e7ff       |    |		Load	0x3,-0x1
0205 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0206 4801       |H   |		Short_Literal	0x1
0207 00db       |    |		Load_Top	At_Offset_3
0208 0afe       |    |		Execute_Immediate	Plus,-0x2
0209 e604       |    |		Load	0x3,0x4
020a 01cf       |    |		Execute	Vector,Slice_Read
020b 00e9       |    |		Load_Encached	String_Cache
020c 01c6       |    |		Execute	Vector,Convert_To_Formal
020d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020e 0000 0000  |    |		.XXX[0x2]
0210 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0214 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001000}
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0221       | !  |		.CONST	0x0221								; Address of begin
0219 0223       | #  |		.CONST	0x0223								; Address of exception handler
021a 0004       |    |		.CONST	0x0004								; Number of locals
021b			INIT_0218:
021b 029f 0483  |    |		Declare_Subprogram	INIT_0480,For_Call
021d 029f 04c3  |    |		Declare_Subprogram	INIT_04c0,For_Call
021f 029f 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Call
0221			BODY_0218:
0221 8604       |    |		Call	0x3,0x4
0222 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
0223			TRAP_0218:
0223 0007       |    |		Action	Break_Optional
0224 0092 0866  |   f|		Action	Push_String_Extended,0x866					; "*** Exception raised processing "
0226 e7fe       |    |		Load	0x3,-0x2
0227 01cc       |    |		Execute	Vector,Catenate
0228 0092 0867  |   g|		Action	Push_String_Extended,0x867					; " in run context "
022a 01cc       |    |		Execute	Vector,Catenate
022b e7fd       |    |		Load	0x3,-0x3
022c 01cc       |    |		Execute	Vector,Catenate
022d 0092 0868  |   h|		Action	Push_String_Extended,0x868					; ": "
022f 01cc       |    |		Execute	Vector,Catenate
0230 4800       |H   |		Short_Literal	0x0
0231 4801       |H   |		Short_Literal	0x1
0232 e012       |    |		Load	0x0,0x12
0233 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0234 01cc       |    |		Execute	Vector,Catenate
0235 e006       |    |		Load	0x0,0x6
0236 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0237 e5fb       |    |		Load	0x2,-0x5
0238 700d       |p   |		Jump_Nonzero	0x246
0239 e7fe       |    |		Load	0x3,-0x2
023a 0092 0869  |   i|		Action	Push_String_Extended,0x869					; " in context "
023c 01cc       |    |		Execute	Vector,Catenate
023d e7fd       |    |		Load	0x3,-0x3
023e 01cc       |    |		Execute	Vector,Catenate
023f 0092 086a  |   j|		Action	Push_String_Extended,0x86a					; "Exception_While_Starting"
0241 4802       |H   |		Short_Literal	0x2
0242 0092 086b  |   k|		Action	Push_String_Extended,0x86b					; "Machine_Initialization_Start"
0244 e013       |    |		Load	0x0,0x13
0245 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0246 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
0247 0000       |    |		.XXX[0x1]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b 00da       |    |		Load_Top	At_Offset_2
024c 7002       |p   |		Jump_Nonzero	0x24f
024d 00ea       |    |		Load_Encached	Null_String_Cache
024e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
024f 00da       |    |		Load_Top	At_Offset_2
0250 0227       | '  |		Execute	Access,All_Reference
0251 0335       | 5  |		Declare_Variable	Array,Duplicate
0252 00cd       |    |		Action	Spare6_Action
0253 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0254 0000 0000  |    |		.BLANK	0000[0x4]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0265       | e  |		.CONST	0x0265								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0006       |    |		.CONST	0x0006								; Number of locals
025b			INIT_0258:
025b e416       |    |		Load	0x2,0x16
025c 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
025d 0322       | "  |		Declare_Variable	Record
025e e413       |    |		Load	0x2,0x13
025f 0007       |    |		Action	Break_Optional
0260 e002       |    |		Load	0x0,0x2
0261 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0262 e412       |    |		Load	0x2,0x12
0263 029f 058b  |    |		Declare_Subprogram	INIT_0588,For_Call
0265			BODY_0258:
0265 0092 086c  |   l|		Action	Push_String_Extended,0x86c					; "List of initialization items and their characteristics:"
0267 e006       |    |		Load	0x0,0x6
0268 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0269 0092 086d  |   m|		Action	Push_String_Extended,0x86d					; "-------------------------------------------------------"
026b e006       |    |		Load	0x0,0x6
026c 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
026d e602       |    |		Load	0x3,0x2
026e e417       |    |		Load	0x2,0x17
026f e416       |    |		Load	0x2,0x16
0270 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0271 00d1       |    |		Pop_Control	Pop_Count_1
0272 00cf       |    |		Action	Mark_Auxiliary
0273 7866       |xf  |		Jump	0x2da
0274 e602       |    |		Load	0x3,0x2
0275 e416       |    |		Load	0x2,0x16
0276 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0277 a604       |    |		Store_Unchecked	0x3,0x4
0278 00db       |    |		Load_Top	At_Offset_3
0279 e417       |    |		Load	0x2,0x17
027a e416       |    |		Load	0x2,0x16
027b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
027c a603       |    |		Store_Unchecked	0x3,0x3
027d 0092 086e  |   n|		Action	Push_String_Extended,0x86e					; "Item: "
027f e604       |    |		Load	0x3,0x4
0280 e002       |    |		Load	0x0,0x2
0281 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0282 01cc       |    |		Execute	Vector,Catenate
0283 e006       |    |		Load	0x0,0x6
0284 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0285 e603       |    |		Load	0x3,0x3
0286 0227       | '  |		Execute	Access,All_Reference
0287 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0288 6805       |h   |		Jump_Zero	0x28e
0289 0092 086f  |   o|		Action	Push_String_Extended,0x86f					; "      Wait   "
028b e006       |    |		Load	0x0,0x6
028c 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
028d 7804       |x   |		Jump	0x292
028e 0092 0870  |   p|		Action	Push_String_Extended,0x870					; "      No_Wait "
0290 e006       |    |		Load	0x0,0x6
0291 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
0292 e603       |    |		Load	0x3,0x3
0293 0227       | '  |		Execute	Access,All_Reference
0294 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0295 6805       |h   |		Jump_Zero	0x29b
0296 0092 0871  |   q|		Action	Push_String_Extended,0x871					; "In Site or Local Directory "
0298 e006       |    |		Load	0x0,0x6
0299 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
029a 7804       |x   |		Jump	0x29f
029b 0092 0872  |   r|		Action	Push_String_Extended,0x872					; "In_Rational_Directory  "
029d e006       |    |		Load	0x0,0x6
029e 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
029f e603       |    |		Load	0x3,0x3
02a0 0227       | '  |		Execute	Access,All_Reference
02a1 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
02a2 7004       |p   |		Jump_Nonzero	0x2a7
02a3 0092 0873  |   s|		Action	Push_String_Extended,0x873					; "*Undefined* "
02a5 e006       |    |		Load	0x0,0x6
02a6 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
02a7 e603       |    |		Load	0x3,0x3
02a8 0227       | '  |		Execute	Access,All_Reference
02a9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
02aa 6804       |h   |		Jump_Zero	0x2af
02ab 0092 0874  |   t|		Action	Push_String_Extended,0x874					; "Referenced_By_Others "
02ad e006       |    |		Load	0x0,0x6
02ae 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
02af 4801       |H   |		Short_Literal	0x1
02b0 e006       |    |		Load	0x0,0x6
02b1 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
02b2 0092 0875  |   u|		Action	Push_String_Extended,0x875					; "       Prerequisites: "
02b4 e006       |    |		Load	0x0,0x6
02b5 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
02b6 e603       |    |		Load	0x3,0x3
02b7 0227       | '  |		Execute	Access,All_Reference
02b8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02b9 003b       | ;  |		Store_Top	Access,At_Offset_3
02ba 00cf       |    |		Action	Mark_Auxiliary
02bb 780f       |x   |		Jump	0x2cb
02bc 00db       |    |		Load_Top	At_Offset_3
02bd 0227       | '  |		Execute	Access,All_Reference
02be 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02bf e002       |    |		Load	0x0,0x2
02c0 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02c1 0092 0876  |   v|		Action	Push_String_Extended,0x876					; " "
02c3 01cc       |    |		Execute	Vector,Catenate
02c4 e006       |    |		Load	0x0,0x6
02c5 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
02c6 00db       |    |		Load_Top	At_Offset_3
02c7 0227       | '  |		Execute	Access,All_Reference
02c8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02c9 a605       |    |		Store_Unchecked	0x3,0x5
02ca 00c9       |    |		Action	Pop_Auxiliary_Loop
02cb 00db       |    |		Load_Top	At_Offset_3
02cc 77ef       |w   |		Jump_Nonzero	0x2bc
02cd 00ce       |    |		Action	Pop_Auxiliary
02ce 4801       |H   |		Short_Literal	0x1
02cf e006       |    |		Load	0x0,0x6
02d0 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
02d1 8606       |    |		Call	0x3,0x6
02d2 e602       |    |		Load	0x3,0x2
02d3 e416       |    |		Load	0x2,0x16
02d4 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02d5 00d1       |    |		Pop_Control	Pop_Count_1
02d6 4801       |H   |		Short_Literal	0x1
02d7 e006       |    |		Load	0x0,0x6
02d8 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
02d9 00c9       |    |		Action	Pop_Auxiliary_Loop
02da e602       |    |		Load	0x3,0x2
02db e416       |    |		Load	0x2,0x16
02dc 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02dd 6f96       |o   |		Jump_Zero	0x274
02de 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02df 0000       |    |		.XXX[0x1]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02f6       |    |		.CONST	0x02f6								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0007       |    |		.CONST	0x0007								; Number of locals
02e3			INIT_02e0:
02e3 4818       |H   |		Short_Literal	0x18
02e4 03cc       |    |		Declare_Type	Access,Incomplete,Accesses_Protected
02e5 e413       |    |		Load	0x2,0x13
02e6 00d9       |    |		Load_Top	At_Offset_1
02e7 02a0       |    |		Declare_Subprogram	Null_Subprogram
02e8 4802       |H   |		Short_Literal	0x2
02e9 032d       | -  |		Declare_Type	Record,Defined
02ea 00d8       |    |		Load_Top	At_Offset_0
02eb 02a0       |    |		Declare_Subprogram	Null_Subprogram
02ec 00db       |    |		Load_Top	At_Offset_3
02ed 03c7       |    |		Complete_Type	Access,By_Defining
02ee 00d9       |    |		Load_Top	At_Offset_1
02ef 0007       |    |		Action	Break_Optional
02f0 029f 05bb  |    |		Declare_Subprogram	INIT_05b8,For_Call
02f2 029f 0603  |    |		Declare_Subprogram	INIT_0600,For_Call
02f4 029f 06cb  |    |		Declare_Subprogram	INIT_06c8,For_Call
02f6			BODY_02e0:
02f6 8607       |    |		Call	0x3,0x7
02f7 e40c       |    |		Load	0x2,0xc
02f8 6809       |h   |		Jump_Zero	0x302
02f9 0092 0877  |   w|		Action	Push_String_Extended,0x877					; "see !Machine.Error_Logs.Machine_Initialize"
02fb 0092 0878  |   x|		Action	Push_String_Extended,0x878					; "Errors_Detected"
02fd 4802       |H   |		Short_Literal	0x2
02fe 0092 0879  |   y|		Action	Push_String_Extended,0x879					; "Machine_Initialize_Start"
0300 e013       |    |		Load	0x0,0x13
0301 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0302 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0303 0000 0000  |    |		.BLANK	0000[0x5]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 0319       |    |		.CONST	0x0319								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0004       |    |		.CONST	0x0004								; Number of locals
030b			INIT_0308:
030b 0092 087a  |   z|		Action	Push_String_Extended,0x87a					; "!Machine.Error_Logs."
030d 00db       |    |		Load_Top	At_Offset_3
030e e014       |    |		Load	0x0,0x14
030f 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0310 01cc       |    |		Execute	Vector,Catenate
0311 0092 087b  |   {|		Action	Push_String_Extended,0x87b					; "_Log"
0313 01cc       |    |		Execute	Vector,Catenate
0314 0007       |    |		Action	Break_Optional
0315 029f 06f3  |    |		Declare_Subprogram	INIT_06f0,For_Call
0317 029f 0723  |   #|		Declare_Subprogram	INIT_0720,For_Call
0319			BODY_0308:
0319 e9fe       |    |		Load	0x4,-0x2
031a 7010       |p   |		Jump_Nonzero	0x32b
031b 0092 087c  |   ||		Action	Push_String_Extended,0x87c					; "Output => ("
031d 00db       |    |		Load_Top	At_Offset_3
031e 01cc       |    |		Execute	Vector,Catenate
031f 0092 087d  |   }|		Action	Push_String_Extended,0x87d					; "), Error => ("
0321 01cc       |    |		Execute	Vector,Catenate
0322 00db       |    |		Load_Top	At_Offset_3
0323 01cc       |    |		Execute	Vector,Catenate
0324 0092 087e  |   ~|		Action	Push_String_Extended,0x87e					; ")"
0326 01cc       |    |		Execute	Vector,Catenate
0327 e40e       |    |		Load	0x2,0xe
0328 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0329 a9fe       |    |		Store_Unchecked	0x4,-0x2
032a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
032b 8804       |    |		Call	0x4,0x4
032c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
032d 0000 0000  |    |		.XXX[0x3]
032f 0000       |    |
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0342       | B  |		.CONST	0x0342								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0009       |    |		.CONST	0x0009								; Number of locals
0333			INIT_0330:
0333 e7ff       |    |		Load	0x3,-0x1
0334 e006       |    |		Load	0x0,0x6
0335 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0336 00e3       |    |		Load_Encached	Natural_Cache
0337 00e3       |    |		Load_Encached	Natural_Cache
0338 e002       |    |		Load	0x0,0x2
0339 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
033a e412       |    |		Load	0x2,0x12
033b 0007       |    |		Action	Break_Optional
033c e413       |    |		Load	0x2,0x13
033d 0007       |    |		Action	Break_Optional
033e 029f 077b  |   {|		Declare_Subprogram	INIT_0778,For_Call
0340 029f 079b  |    |		Declare_Subprogram	INIT_0798,For_Call
0342			BODY_0330:
0342 4801       |H   |		Short_Literal	0x1
0343 e802       |    |		Load	0x4,0x2
0344 e402       |    |		Load	0x2,0x2
0345 e014       |    |		Load	0x0,0x14
0346 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0347 a803       |    |		Store_Unchecked	0x4,0x3
0348 e803       |    |		Load	0x4,0x3
0349 688f       |h   |		Jump_Zero	0x3d9
034a e803       |    |		Load	0x4,0x3
034b 0a0f       |    |		Execute_Immediate	Plus,0xf
034c c803       |    |		Store	0x4,0x3
034d 00cf       |    |		Action	Mark_Auxiliary
034e 7804       |x   |		Jump	0x353
034f e803       |    |		Load	0x4,0x3
0350 0a01       |    |		Execute_Immediate	Plus,0x1
0351 c803       |    |		Store	0x4,0x3
0352 00c9       |    |		Action	Pop_Auxiliary_Loop
0353 e803       |    |		Load	0x4,0x3
0354 e802       |    |		Load	0x4,0x2
0355 01dc       |    |		Execute	Vector,Last
0356 027a       | z  |		Execute	Discrete,Less_Equal
0357 6805       |h   |		Jump_Zero	0x35d
0358 e803       |    |		Load	0x4,0x3
0359 e802       |    |		Load	0x4,0x2
035a 01d7       |    |		Execute	Vector,Field_Read
035b 0f20       |    |		Execute_Immediate	Equal,0x20
035c 77f2       |w   |		Jump_Nonzero	0x34f
035d 00ce       |    |		Action	Pop_Auxiliary
035e e803       |    |		Load	0x4,0x3
035f 0a01       |    |		Execute_Immediate	Plus,0x1
0360 c804       |    |		Store	0x4,0x4
0361 00cf       |    |		Action	Mark_Auxiliary
0362 7804       |x   |		Jump	0x367
0363 e804       |    |		Load	0x4,0x4
0364 0a01       |    |		Execute_Immediate	Plus,0x1
0365 c804       |    |		Store	0x4,0x4
0366 00c9       |    |		Action	Pop_Auxiliary_Loop
0367 e804       |    |		Load	0x4,0x4
0368 e802       |    |		Load	0x4,0x2
0369 01dc       |    |		Execute	Vector,Last
036a 027a       | z  |		Execute	Discrete,Less_Equal
036b 6805       |h   |		Jump_Zero	0x371
036c e804       |    |		Load	0x4,0x4
036d e802       |    |		Load	0x4,0x2
036e 01d7       |    |		Execute	Vector,Field_Read
036f 8808       |    |		Call	0x4,0x8
0370 77f2       |w   |		Jump_Nonzero	0x363
0371 00ce       |    |		Action	Pop_Auxiliary
0372 4801       |H   |		Short_Literal	0x1
0373 e40d       |    |		Load	0x2,0xd
0374 e803       |    |		Load	0x4,0x3
0375 e804       |    |		Load	0x4,0x4
0376 0aff       |    |		Execute_Immediate	Plus,-0x1
0377 e802       |    |		Load	0x4,0x2
0378 01cf       |    |		Execute	Vector,Slice_Read
0379 e002       |    |		Load	0x0,0x2
037a 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
037b a805       |    |		Store_Unchecked	0x4,0x5
037c e805       |    |		Load	0x4,0x5
037d e604       |    |		Load	0x3,0x4
037e 021f       |    |		Execute	Heap_Access,Equal
037f 7029       |p)  |		Jump_Nonzero	0x3a9
0380 e605       |    |		Load	0x3,0x5
0381 0227       | '  |		Execute	Access,All_Reference
0382 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0383 7011       |p   |		Jump_Nonzero	0x395
0384 e414       |    |		Load	0x2,0x14
0385 0322       | "  |		Declare_Variable	Record
0386 e412       |    |		Load	0x2,0x12
0387 00d9       |    |		Load_Top	At_Offset_1
0388 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0389 e805       |    |		Load	0x4,0x5
038a 00d9       |    |		Load_Top	At_Offset_1
038b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
038c e413       |    |		Load	0x2,0x13
038d 00d9       |    |		Load_Top	At_Offset_1
038e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
038f e412       |    |		Load	0x2,0x12
0390 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0391 e605       |    |		Load	0x3,0x5
0392 0227       | '  |		Execute	Access,All_Reference
0393 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0394 7814       |x   |		Jump	0x3a9
0395 e605       |    |		Load	0x3,0x5
0396 0227       | '  |		Execute	Access,All_Reference
0397 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0398 a806       |    |		Store_Unchecked	0x4,0x6
0399 e414       |    |		Load	0x2,0x14
039a 0322       | "  |		Declare_Variable	Record
039b e806       |    |		Load	0x4,0x6
039c 00d9       |    |		Load_Top	At_Offset_1
039d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
039e e805       |    |		Load	0x4,0x5
039f 00d9       |    |		Load_Top	At_Offset_1
03a0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03a1 e413       |    |		Load	0x2,0x13
03a2 00d9       |    |		Load_Top	At_Offset_1
03a3 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03a4 e412       |    |		Load	0x2,0x12
03a5 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
03a6 e605       |    |		Load	0x3,0x5
03a7 0227       | '  |		Execute	Access,All_Reference
03a8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03a9 00e1       |    |		Load_Encached	Boolean_Cache
03aa 00db       |    |		Load_Top	At_Offset_3
03ab e805       |    |		Load	0x4,0x5
03ac e417       |    |		Load	0x2,0x17
03ad e416       |    |		Load	0x2,0x16
03ae 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03af c807       |    |		Store	0x4,0x7
03b0 c606       |    |		Store	0x3,0x6
03b1 e606       |    |		Load	0x3,0x6
03b2 6805       |h   |		Jump_Zero	0x3b8
03b3 4801       |H   |		Short_Literal	0x1
03b4 00db       |    |		Load_Top	At_Offset_3
03b5 0227       | '  |		Execute	Access,All_Reference
03b6 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
03b7 781a       |x   |		Jump	0x3d2
03b8 e413       |    |		Load	0x2,0x13
03b9 03bc       |    |		Declare_Variable	Access,By_Allocation
03ba 003b       | ;  |		Store_Top	Access,At_Offset_3
03bb 4801       |H   |		Short_Literal	0x1
03bc 00db       |    |		Load_Top	At_Offset_3
03bd 0227       | '  |		Execute	Access,All_Reference
03be 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03bf 4801       |H   |		Short_Literal	0x1
03c0 00db       |    |		Load_Top	At_Offset_3
03c1 0227       | '  |		Execute	Access,All_Reference
03c2 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
03c3 4800       |H   |		Short_Literal	0x0
03c4 00db       |    |		Load_Top	At_Offset_3
03c5 0227       | '  |		Execute	Access,All_Reference
03c6 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
03c7 e805       |    |		Load	0x4,0x5
03c8 00db       |    |		Load_Top	At_Offset_3
03c9 0227       | '  |		Execute	Access,All_Reference
03ca 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
03cb e417       |    |		Load	0x2,0x17
03cc 4800       |H   |		Short_Literal	0x0
03cd e807       |    |		Load	0x4,0x7
03ce e805       |    |		Load	0x4,0x5
03cf e416       |    |		Load	0x2,0x16
03d0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03d1 c417       |    |		Store	0x2,0x17
03d2 00da       |    |		Load_Top	At_Offset_2
03d3 e605       |    |		Load	0x3,0x5
03d4 0227       | '  |		Execute	Access,All_Reference
03d5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03d6 0227       | '  |		Execute	Access,All_Reference
03d7 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03d8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d9 4801       |H   |		Short_Literal	0x1
03da e802       |    |		Load	0x4,0x2
03db e403       |    |		Load	0x2,0x3
03dc e014       |    |		Load	0x0,0x14
03dd 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03de 6805       |h   |		Jump_Zero	0x3e4
03df 4801       |H   |		Short_Literal	0x1
03e0 e605       |    |		Load	0x3,0x5
03e1 0227       | '  |		Execute	Access,All_Reference
03e2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03e3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03e4 4801       |H   |		Short_Literal	0x1
03e5 e802       |    |		Load	0x4,0x2
03e6 e404       |    |		Load	0x2,0x4
03e7 e014       |    |		Load	0x0,0x14
03e8 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03e9 6805       |h   |		Jump_Zero	0x3ef
03ea 4800       |H   |		Short_Literal	0x0
03eb e605       |    |		Load	0x3,0x5
03ec 0227       | '  |		Execute	Access,All_Reference
03ed 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03ee 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03ef e605       |    |		Load	0x3,0x5
03f0 0229       | )  |		Execute	Access,All_Read
03f1 00d8       |    |		Load_Top	At_Offset_0
03f2 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
03f3 e405       |    |		Load	0x2,0x5
03f4 8809       |    |		Call	0x4,0x9
03f5 00d9       |    |		Load_Top	At_Offset_1
03f6 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
03f7 00d1       |    |		Pop_Control	Pop_Count_1
03f8 e605       |    |		Load	0x3,0x5
03f9 0229       | )  |		Execute	Access,All_Read
03fa 00d8       |    |		Load_Top	At_Offset_0
03fb 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
03fc e407       |    |		Load	0x2,0x7
03fd 8809       |    |		Call	0x4,0x9
03fe 00d9       |    |		Load_Top	At_Offset_1
03ff 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0400 00d1       |    |		Pop_Control	Pop_Count_1
0401 e605       |    |		Load	0x3,0x5
0402 0229       | )  |		Execute	Access,All_Read
0403 00d8       |    |		Load_Top	At_Offset_0
0404 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0405 e406       |    |		Load	0x2,0x6
0406 8809       |    |		Call	0x4,0x9
0407 00d9       |    |		Load_Top	At_Offset_1
0408 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0409 00d1       |    |		Pop_Control	Pop_Count_1
040a e605       |    |		Load	0x3,0x5
040b 0229       | )  |		Execute	Access,All_Read
040c 00d8       |    |		Load_Top	At_Offset_0
040d 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
040e e408       |    |		Load	0x2,0x8
040f 8809       |    |		Call	0x4,0x9
0410 00d9       |    |		Load_Top	At_Offset_1
0411 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0412 00d1       |    |		Pop_Control	Pop_Count_1
0413 e605       |    |		Load	0x3,0x5
0414 0229       | )  |		Execute	Access,All_Read
0415 00d8       |    |		Load_Top	At_Offset_0
0416 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0417 e409       |    |		Load	0x2,0x9
0418 8809       |    |		Call	0x4,0x9
0419 00d9       |    |		Load_Top	At_Offset_1
041a 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
041b 00d1       |    |		Pop_Control	Pop_Count_1
041c e605       |    |		Load	0x3,0x5
041d 0229       | )  |		Execute	Access,All_Read
041e 00d8       |    |		Load_Top	At_Offset_0
041f 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0420 e40a       |    |		Load	0x2,0xa
0421 8809       |    |		Call	0x4,0x9
0422 00d9       |    |		Load_Top	At_Offset_1
0423 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0424 00d1       |    |		Pop_Control	Pop_Count_1
0425 e605       |    |		Load	0x3,0x5
0426 0229       | )  |		Execute	Access,All_Read
0427 00d8       |    |		Load_Top	At_Offset_0
0428 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0429 e40b       |    |		Load	0x2,0xb
042a 8809       |    |		Call	0x4,0x9
042b 00d9       |    |		Load_Top	At_Offset_1
042c 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
042d 00d1       |    |		Pop_Control	Pop_Count_1
042e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
042f 0000       |    |		.XXX[0x1]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 043b       | ;  |		.CONST	0x043b								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0002       |    |		.CONST	0x0002								; Number of locals
0433			INIT_0430:
0433 4801       |H   |		Short_Literal	0x1
0434 e603       |    |		Load	0x3,0x3
0435 0092 087f  |    |		Action	Push_String_Extended,0x87f					; "_Start"
0437 e014       |    |		Load	0x0,0x14
0438 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0439 00e3       |    |		Load_Encached	Natural_Cache
043a 03f1       |    |		Declare_Variable	Discrete,With_Value
043b			BODY_0430:
043b 00d8       |    |		Load_Top	At_Offset_0
043c 680f       |h   |		Jump_Zero	0x44c
043d e605       |    |		Load	0x3,0x5
043e 0229       | )  |		Execute	Access,All_Read
043f 00d8       |    |		Load_Top	At_Offset_0
0440 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0441 e603       |    |		Load	0x3,0x3
0442 01dd       |    |		Execute	Vector,First
0443 00db       |    |		Load_Top	At_Offset_3
0444 0aff       |    |		Execute_Immediate	Plus,-0x1
0445 e603       |    |		Load	0x3,0x3
0446 01cf       |    |		Execute	Vector,Slice_Read
0447 8607       |    |		Call	0x3,0x7
0448 00d9       |    |		Load_Top	At_Offset_1
0449 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
044a 00d1       |    |		Pop_Control	Pop_Count_1
044b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
044c e605       |    |		Load	0x3,0x5
044d 0229       | )  |		Execute	Access,All_Read
044e 00d8       |    |		Load_Top	At_Offset_0
044f 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0450 e603       |    |		Load	0x3,0x3
0451 8607       |    |		Call	0x3,0x7
0452 00d9       |    |		Load_Top	At_Offset_1
0453 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0454 00d1       |    |		Pop_Control	Pop_Count_1
0455 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0456 0000 0000  |    |		.XXX[0x2]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 0462       | b  |		.CONST	0x0462								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0002       |    |		.CONST	0x0002								; Number of locals
045b			INIT_0458:
045b e602       |    |		Load	0x3,0x2
045c e010       |    |		Load	0x0,0x10
045d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
045e 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
045f e010       |    |		Load	0x0,0x10
0460 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0461 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0462			BODY_0458:
0462 482c       |H,  |		Short_Literal	0x2c
0463 00d9       |    |		Load_Top	At_Offset_1
0464 01cb       |    |		Execute	Vector,Append
0465 e605       |    |		Load	0x3,0x5
0466 00d8       |    |		Load_Top	At_Offset_0
0467 00db       |    |		Load_Top	At_Offset_3
0468 01db       |    |		Execute	Vector,Length
0469 0273       | s  |		Execute	Discrete,Plus
046a 00d8       |    |		Load_Top	At_Offset_0
046b 00e2       |    |		Load_Encached	Integer_Cache
046c 0260       | `  |		Execute	Discrete,In_Type
046d 7001       |p   |		Jump_Nonzero	0x46f
046e 0801       |    |		Execute_Immediate	Raise,0x1
046f e604       |    |		Load	0x3,0x4
0470 01ce       |    |		Execute	Vector,Slice_Write
0471 e605       |    |		Load	0x3,0x5
0472 00d9       |    |		Load_Top	At_Offset_1
0473 01db       |    |		Execute	Vector,Length
0474 0273       | s  |		Execute	Discrete,Plus
0475 0a01       |    |		Execute_Immediate	Plus,0x1
0476 c605       |    |		Store	0x3,0x5
0477 e606       |    |		Load	0x3,0x6
0478 0a01       |    |		Execute_Immediate	Plus,0x1
0479 c606       |    |		Store	0x3,0x6
047a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
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 e7fb       |    |		Load	0x3,-0x5
0484 01db       |    |		Execute	Vector,Length
0485 6817       |h   |		Jump_Zero	0x49d
0486 e7fc       |    |		Load	0x3,-0x4
0487 01db       |    |		Execute	Vector,Length
0488 7007       |p   |		Jump_Nonzero	0x490
0489 e7fa       |    |		Load	0x3,-0x6
048a e7fc       |    |		Load	0x3,-0x4
048b e7fe       |    |		Load	0x3,-0x2
048c e7fb       |    |		Load	0x3,-0x5
048d e015       |    |		Load	0x0,0x15
048e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
048f 00ca       |    |		Action	Exit_Nullary_Function
0490 e7fa       |    |		Load	0x3,-0x6
0491 0092 0880  |    |		Action	Push_String_Extended,0x880					; "("
0493 e7fc       |    |		Load	0x3,-0x4
0494 01cc       |    |		Execute	Vector,Catenate
0495 0092 087e  |   ~|		Action	Push_String_Extended,0x87e					; ")"
0497 01cc       |    |		Execute	Vector,Catenate
0498 e7fe       |    |		Load	0x3,-0x2
0499 e7fb       |    |		Load	0x3,-0x5
049a e015       |    |		Load	0x0,0x15
049b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
049c 00ca       |    |		Action	Exit_Nullary_Function
049d e7fc       |    |		Load	0x3,-0x4
049e 01db       |    |		Execute	Vector,Length
049f 700a       |p   |		Jump_Nonzero	0x4aa
04a0 0092 0881  |    |		Action	Push_String_Extended,0x881					; "\x22"
04a2 e7fd       |    |		Load	0x3,-0x3
04a3 01cc       |    |		Execute	Vector,Catenate
04a4 0092 0882  |    |		Action	Push_String_Extended,0x882					; "\x22."
04a6 01cc       |    |		Execute	Vector,Catenate
04a7 e7fe       |    |		Load	0x3,-0x2
04a8 01cc       |    |		Execute	Vector,Catenate
04a9 00ca       |    |		Action	Exit_Nullary_Function
04aa 0092 0881  |    |		Action	Push_String_Extended,0x881					; "\x22"
04ac e7fd       |    |		Load	0x3,-0x3
04ad 01cc       |    |		Execute	Vector,Catenate
04ae 0092 0882  |    |		Action	Push_String_Extended,0x882					; "\x22."
04b0 01cc       |    |		Execute	Vector,Catenate
04b1 e7fe       |    |		Load	0x3,-0x2
04b2 01cc       |    |		Execute	Vector,Catenate
04b3 0092 0880  |    |		Action	Push_String_Extended,0x880					; "("
04b5 01cc       |    |		Execute	Vector,Catenate
04b6 e7fc       |    |		Load	0x3,-0x4
04b7 01cc       |    |		Execute	Vector,Catenate
04b8 0092 0883  |    |		Action	Push_String_Extended,0x883					; ");"
04ba 01cc       |    |		Execute	Vector,Catenate
04bb 00ca       |    |		Action	Exit_Nullary_Function
04bc 0000 0000  |    |		.BLANK	0000[0x4]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c7       |    |		.CONST	0x04c7								; Address of begin
04c1 0004       |    |		.CONST	0x0004								; Address of exception handler
04c2 0003       |    |		.CONST	0x0003								; Number of locals
04c3			INIT_04c0:
04c3 00e3       |    |		Load_Encached	Natural_Cache
04c4 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
04c5 029f 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Call
04c7			BODY_04c0:
04c7 00cf       |    |		Action	Mark_Auxiliary
04c8 e9ff       |    |		Load	0x4,-0x1
04c9 01d9       |    |		Execute	Vector,Reverse_Bounds
04ca 0263       | c  |		Execute	Discrete,Above_Bound
04cb 700b       |p   |		Jump_Nonzero	0x4d7
04cc 00d8       |    |		Load_Top	At_Offset_0
04cd e9ff       |    |		Load	0x4,-0x1
04ce 01d7       |    |		Execute	Vector,Field_Read
04cf e9fe       |    |		Load	0x4,-0x2
04d0 027f       |    |		Execute	Discrete,Equal
04d1 6803       |h   |		Jump_Zero	0x4d5
04d2 e802       |    |		Load	0x4,0x2
04d3 0a01       |    |		Execute_Immediate	Plus,0x1
04d4 c802       |    |		Store	0x4,0x2
04d5 00c8       |    |		Action	Pop_Auxiliary_Range
04d6 3ff5       |?   |		Loop_Increasing	0x4cc
04d7 00ce       |    |		Action	Pop_Auxiliary
04d8 00d9       |    |		Load_Top	At_Offset_1
04d9 7002       |p   |		Jump_Nonzero	0x4dc
04da e9ff       |    |		Load	0x4,-0x1
04db 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04dc 8803       |    |		Call	0x4,0x3
04dd 0831       | 1  |		Execute_Immediate	Raise,0x31
04de 0000 0000  |    |		.XXX[0x2]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04eb       |    |		.CONST	0x04eb								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0004       |    |		.CONST	0x0004								; Number of locals
04e3			INIT_04e0:
04e3 8602       |    |		Call	0x3,0x2
04e4 e015       |    |		Load	0x0,0x15
04e5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04e6 e015       |    |		Load	0x0,0x15
04e7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04e8 02c7       |    |		Declare_Variable	Any
04e9 00d8       |    |		Load_Top	At_Offset_0
04ea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04eb			BODY_04e0:
04eb e5fc       |    |		Load	0x2,-0x4
04ec 0092 0858  |   X|		Action	Push_String_Extended,0x858					; "@"
04ee 01df       |    |		Execute	Vector,Equal
04ef 700d       |p   |		Jump_Nonzero	0x4fd
04f0 4801       |H   |		Short_Literal	0x1
04f1 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; ","
04f3 e411       |    |		Load	0x2,0x11
04f4 0227       | '  |		Execute	Access,All_Reference
04f5 01cc       |    |		Execute	Vector,Catenate
04f6 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; ","
04f8 e7ff       |    |		Load	0x3,-0x1
04f9 01cc       |    |		Execute	Vector,Catenate
04fa e014       |    |		Load	0x0,0x14
04fb 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
04fc 6885       |h   |		Jump_Zero	0x582
04fd e7f7       |    |		Load	0x3,-0x9
04fe 683b       |h;  |		Jump_Zero	0x53a
04ff e7f9       |    |		Load	0x3,-0x7
0500 01db       |    |		Execute	Vector,Length
0501 6800       |h   |		Jump_Zero	0x502
0502 0092 0884  |    |		Action	Push_String_Extended,0x884					; "Program.Run (\x22"
0504 4822       |H"  |		Short_Literal	0x22
0505 e802       |    |		Load	0x4,0x2
0506 8603       |    |		Call	0x3,0x3
0507 01cc       |    |		Execute	Vector,Catenate
0508 0092 0885  |    |		Action	Push_String_Extended,0x885					; "\x22,"
050a 01cc       |    |		Execute	Vector,Catenate
050b e006       |    |		Load	0x0,0x6
050c 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
050d 0092 0886  |    |		Action	Push_String_Extended,0x886					; "             Context => \x22"
050f e7f8       |    |		Load	0x3,-0x8
0510 01cc       |    |		Execute	Vector,Catenate
0511 0092 0887  |    |		Action	Push_String_Extended,0x887					; "\x22);"
0513 01cc       |    |		Execute	Vector,Catenate
0514 e006       |    |		Load	0x0,0x6
0515 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0516 e5fb       |    |		Load	0x2,-0x5
0517 7021       |p!  |		Jump_Nonzero	0x539
0518 00da       |    |		Load_Top	At_Offset_2
0519 0092 0888  |    |		Action	Push_String_Extended,0x888					; "Starting"
051b 4800       |H   |		Short_Literal	0x0
051c 0092 086b  |   k|		Action	Push_String_Extended,0x86b					; "Machine_Initialization_Start"
051e e013       |    |		Load	0x0,0x13
051f 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0520 0092 0861  |   a|		Action	Push_String_Extended,0x861					; "<ERRORS>"
0522 e7fa       |    |		Load	0x3,-0x6
0523 e00f       |    |		Load	0x0,0xf
0524 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0525 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "<PROFILE>"
0527 e7f8       |    |		Load	0x3,-0x8
0528 e802       |    |		Load	0x4,0x2
0529 e015       |    |		Load	0x0,0x15
052a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
052b 0092 0861  |   a|		Action	Push_String_Extended,0x861					; "<ERRORS>"
052d e410       |    |		Load	0x2,0x10
052e 0227       | '  |		Execute	Access,All_Reference
052f e00f       |    |		Load	0x0,0xf
0530 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0531 00da       |    |		Load_Top	At_Offset_2
0532 0092 0889  |    |		Action	Push_String_Extended,0x889					; "Finishing"
0534 4800       |H   |		Short_Literal	0x0
0535 0092 086b  |   k|		Action	Push_String_Extended,0x86b					; "Machine_Initialization_Start"
0537 e013       |    |		Load	0x0,0x13
0538 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0539 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
053a 0092 088a  |    |		Action	Push_String_Extended,0x88a					; "Program.Run_Job (\x22"
053c 4822       |H"  |		Short_Literal	0x22
053d e802       |    |		Load	0x4,0x2
053e 8603       |    |		Call	0x3,0x3
053f 01cc       |    |		Execute	Vector,Catenate
0540 0092 0885  |    |		Action	Push_String_Extended,0x885					; "\x22,"
0542 01cc       |    |		Execute	Vector,Catenate
0543 e006       |    |		Load	0x0,0x6
0544 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0545 0092 088b  |    |		Action	Push_String_Extended,0x88b					; "                 Context => \x22"
0547 e7f8       |    |		Load	0x3,-0x8
0548 01cc       |    |		Execute	Vector,Catenate
0549 0092 0885  |    |		Action	Push_String_Extended,0x885					; "\x22,"
054b 01cc       |    |		Execute	Vector,Catenate
054c e006       |    |		Load	0x0,0x6
054d 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
054e 0092 088c  |    |		Action	Push_String_Extended,0x88c					; "                 Options => \x22"
0550 e7f9       |    |		Load	0x3,-0x7
0551 01cc       |    |		Execute	Vector,Catenate
0552 0092 0887  |    |		Action	Push_String_Extended,0x887					; "\x22);"
0554 01cc       |    |		Execute	Vector,Catenate
0555 e006       |    |		Load	0x0,0x6
0556 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0557 e5fb       |    |		Load	0x2,-0x5
0558 7029       |p)  |		Jump_Nonzero	0x582
0559 00da       |    |		Load_Top	At_Offset_2
055a 0092 088d  |    |		Action	Push_String_Extended,0x88d					; "Starting_No_Wait"
055c 4800       |H   |		Short_Literal	0x0
055d 0092 086b  |   k|		Action	Push_String_Extended,0x86b					; "Machine_Initialization_Start"
055f e013       |    |		Load	0x0,0x13
0560 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0561 0092 0861  |   a|		Action	Push_String_Extended,0x861					; "<ERRORS>"
0563 e7fa       |    |		Load	0x3,-0x6
0564 e00f       |    |		Load	0x0,0xf
0565 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0566 00d8       |    |		Load_Top	At_Offset_0
0567 e015       |    |		Load	0x0,0x15
0568 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0569 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "<PROFILE>"
056b e7f9       |    |		Load	0x3,-0x7
056c 4800       |H   |		Short_Literal	0x0
056d e7f8       |    |		Load	0x3,-0x8
056e 4800       |H   |		Short_Literal	0x0
056f e802       |    |		Load	0x4,0x2
0570 e015       |    |		Load	0x0,0x15
0571 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0572 005b       | [  |		Store_Top	Discrete,At_Offset_3
0573 c804       |    |		Store	0x4,0x4
0574 0092 0861  |   a|		Action	Push_String_Extended,0x861					; "<ERRORS>"
0576 e410       |    |		Load	0x2,0x10
0577 0227       | '  |		Execute	Access,All_Reference
0578 e00f       |    |		Load	0x0,0xf
0579 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
057a 00d8       |    |		Load_Top	At_Offset_0
057b e015       |    |		Load	0x0,0x15
057c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
057d 7004       |p   |		Jump_Nonzero	0x582
057e 00d8       |    |		Load_Top	At_Offset_0
057f e013       |    |		Load	0x0,0x13
0580 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0581 c804       |    |		Store	0x4,0x4
0582 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0583 0000 0000  |    |		.BLANK	0000[0x5]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058d       |    |		.CONST	0x058d								; Address of begin
0589 0004       |    |		.CONST	0x0004								; Address of exception handler
058a 0002       |    |		.CONST	0x0002								; Number of locals
058b			INIT_0588:
058b 029f 080b  |    |		Declare_Subprogram	INIT_0808,For_Call
058d			BODY_0588:
058d e603       |    |		Load	0x3,0x3
058e 0227       | '  |		Execute	Access,All_Reference
058f 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0590 0092 088e  |    |		Action	Push_String_Extended,0x88e					; "Parameters       "
0592 8802       |    |		Call	0x4,0x2
0593 e603       |    |		Load	0x3,0x3
0594 0227       | '  |		Execute	Access,All_Reference
0595 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0596 0092 088f  |    |		Action	Push_String_Extended,0x88f					; "Options          "
0598 8802       |    |		Call	0x4,0x2
0599 e603       |    |		Load	0x3,0x3
059a 0227       | '  |		Execute	Access,All_Reference
059b 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
059c 0092 0890  |    |		Action	Push_String_Extended,0x890					; "Activity         "
059e 8802       |    |		Call	0x4,0x2
059f e603       |    |		Load	0x3,0x3
05a0 0227       | '  |		Execute	Access,All_Reference
05a1 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
05a2 0092 0891  |    |		Action	Push_String_Extended,0x891					; "Procedure_Context"
05a4 8802       |    |		Call	0x4,0x2
05a5 e603       |    |		Load	0x3,0x3
05a6 0227       | '  |		Execute	Access,All_Reference
05a7 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
05a8 0092 0892  |    |		Action	Push_String_Extended,0x892					; "Procedure_Name   "
05aa 8802       |    |		Call	0x4,0x2
05ab e603       |    |		Load	0x3,0x3
05ac 0227       | '  |		Execute	Access,All_Reference
05ad 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
05ae 0092 0893  |    |		Action	Push_String_Extended,0x893					; "Subsystem        "
05b0 8802       |    |		Call	0x4,0x2
05b1 e603       |    |		Load	0x3,0x3
05b2 0227       | '  |		Execute	Access,All_Reference
05b3 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
05b4 0092 0894  |    |		Action	Push_String_Extended,0x894					; "Context          "
05b6 8802       |    |		Call	0x4,0x2
05b7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05c6       |    |		.CONST	0x05c6								; Address of begin
05b9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ba 0006       |    |		.CONST	0x0006								; Number of locals
05bb			INIT_05b8:
05bb e416       |    |		Load	0x2,0x16
05bc 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
05bd 0322       | "  |		Declare_Variable	Record
05be e602       |    |		Load	0x3,0x2
05bf 0007       |    |		Action	Break_Optional
05c0 e002       |    |		Load	0x0,0x2
05c1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05c2 e413       |    |		Load	0x2,0x13
05c3 0007       |    |		Action	Break_Optional
05c4 e602       |    |		Load	0x3,0x2
05c5 0007       |    |		Action	Break_Optional
05c6			BODY_05b8:
05c6 e802       |    |		Load	0x4,0x2
05c7 e417       |    |		Load	0x2,0x17
05c8 e416       |    |		Load	0x2,0x16
05c9 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
05ca 00d1       |    |		Pop_Control	Pop_Count_1
05cb 00cf       |    |		Action	Mark_Auxiliary
05cc 7827       |x'  |		Jump	0x5f4
05cd e802       |    |		Load	0x4,0x2
05ce e416       |    |		Load	0x2,0x16
05cf 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
05d0 a804       |    |		Store_Unchecked	0x4,0x4
05d1 00db       |    |		Load_Top	At_Offset_3
05d2 e417       |    |		Load	0x2,0x17
05d3 e416       |    |		Load	0x2,0x16
05d4 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05d5 003b       | ;  |		Store_Top	Access,At_Offset_3
05d6 00da       |    |		Load_Top	At_Offset_2
05d7 0227       | '  |		Execute	Access,All_Reference
05d8 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
05d9 e9ff       |    |		Load	0x4,-0x1
05da 027f       |    |		Execute	Discrete,Equal
05db 6813       |h   |		Jump_Zero	0x5ef
05dc 00da       |    |		Load_Top	At_Offset_2
05dd 0227       | '  |		Execute	Access,All_Reference
05de 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
05df e9fe       |    |		Load	0x4,-0x2
05e0 027f       |    |		Execute	Discrete,Equal
05e1 680d       |h   |		Jump_Zero	0x5ef
05e2 e603       |    |		Load	0x3,0x3
05e3 0322       | "  |		Declare_Variable	Record
05e4 00db       |    |		Load_Top	At_Offset_3
05e5 00d9       |    |		Load_Top	At_Offset_1
05e6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05e7 e803       |    |		Load	0x4,0x3
05e8 00d9       |    |		Load_Top	At_Offset_1
05e9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05ea e602       |    |		Load	0x3,0x2
05eb 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
05ec 003a       | :  |		Store_Top	Access,At_Offset_2
05ed 00d9       |    |		Load_Top	At_Offset_1
05ee a803       |    |		Store_Unchecked	0x4,0x3
05ef e802       |    |		Load	0x4,0x2
05f0 e416       |    |		Load	0x2,0x16
05f1 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
05f2 00d1       |    |		Pop_Control	Pop_Count_1
05f3 00c9       |    |		Action	Pop_Auxiliary_Loop
05f4 e802       |    |		Load	0x4,0x2
05f5 e416       |    |		Load	0x2,0x16
05f6 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
05f7 6fd5       |o   |		Jump_Zero	0x5cd
05f8 00ce       |    |		Action	Pop_Auxiliary
05f9 00db       |    |		Load_Top	At_Offset_3
05fa a9fd       |    |		Store_Unchecked	0x4,-0x3
05fb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05fc 0000 0000  |    |		.BLANK	0000[0x4]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0610       |    |		.CONST	0x0610								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 000a       |    |		.CONST	0x000a								; Number of locals
0603			INIT_0600:
0603 00da       |    |		Load_Top	At_Offset_2
0604 0007       |    |		Action	Break_Optional
0605 e602       |    |		Load	0x3,0x2
0606 0007       |    |		Action	Break_Optional
0607 00d8       |    |		Load_Top	At_Offset_0
0608 03bd       |    |		Declare_Variable	Access,Duplicate
0609 03bd       |    |		Declare_Variable	Access,Duplicate
060a 00e1       |    |		Load_Encached	Boolean_Cache
060b 00e1       |    |		Load_Encached	Boolean_Cache
060c 00e1       |    |		Load_Encached	Boolean_Cache
060d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
060e 029f 0823  |   #|		Declare_Subprogram	INIT_0820,For_Call
0610			BODY_0600:
0610 00cf       |    |		Action	Mark_Auxiliary
0611 78b3       |x   |		Jump	0x6c5
0612 e802       |    |		Load	0x4,0x2
0613 a804       |    |		Store_Unchecked	0x4,0x4
0614 e602       |    |		Load	0x3,0x2
0615 a806       |    |		Store_Unchecked	0x4,0x6
0616 4800       |H   |		Short_Literal	0x0
0617 a807       |    |		Store_Unchecked	0x4,0x7
0618 e602       |    |		Load	0x3,0x2
0619 a803       |    |		Store_Unchecked	0x4,0x3
061a 00cf       |    |		Action	Mark_Auxiliary
061b 7884       |x   |		Jump	0x6a0
061c 00db       |    |		Load_Top	At_Offset_3
061d 6803       |h   |		Jump_Zero	0x621
061e 4801       |H   |		Short_Literal	0x1
061f a808       |    |		Store_Unchecked	0x4,0x8
0620 7806       |x   |		Jump	0x627
0621 e604       |    |		Load	0x3,0x4
0622 e804       |    |		Load	0x4,0x4
0623 0227       | '  |		Execute	Access,All_Reference
0624 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0625 880a       |    |		Call	0x4,0xa
0626 a808       |    |		Store_Unchecked	0x4,0x8
0627 e808       |    |		Load	0x4,0x8
0628 686e       |hn  |		Jump_Zero	0x697
0629 e804       |    |		Load	0x4,0x4
062a 0227       | '  |		Execute	Access,All_Reference
062b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
062c 0227       | '  |		Execute	Access,All_Reference
062d 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
062e 6838       |h8  |		Jump_Zero	0x667
062f e804       |    |		Load	0x4,0x4
0630 0227       | '  |		Execute	Access,All_Reference
0631 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0632 0227       | '  |		Execute	Access,All_Reference
0633 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0634 e804       |    |		Load	0x4,0x4
0635 0227       | '  |		Execute	Access,All_Reference
0636 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0637 0227       | '  |		Execute	Access,All_Reference
0638 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0639 8422       | "  |		Call	0x2,0x22
063a e804       |    |		Load	0x4,0x4
063b 0227       | '  |		Execute	Access,All_Reference
063c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
063d 0227       | '  |		Execute	Access,All_Reference
063e 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
063f 8422       | "  |		Call	0x2,0x22
0640 e804       |    |		Load	0x4,0x4
0641 0227       | '  |		Execute	Access,All_Reference
0642 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0643 0227       | '  |		Execute	Access,All_Reference
0644 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0645 8422       | "  |		Call	0x2,0x22
0646 e804       |    |		Load	0x4,0x4
0647 0227       | '  |		Execute	Access,All_Reference
0648 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0649 0227       | '  |		Execute	Access,All_Reference
064a 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
064b 8422       | "  |		Call	0x2,0x22
064c e804       |    |		Load	0x4,0x4
064d 0227       | '  |		Execute	Access,All_Reference
064e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
064f 0227       | '  |		Execute	Access,All_Reference
0650 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0651 8422       | "  |		Call	0x2,0x22
0652 e804       |    |		Load	0x4,0x4
0653 0227       | '  |		Execute	Access,All_Reference
0654 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0655 0227       | '  |		Execute	Access,All_Reference
0656 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0657 8422       | "  |		Call	0x2,0x22
0658 e804       |    |		Load	0x4,0x4
0659 0227       | '  |		Execute	Access,All_Reference
065a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
065b 0227       | '  |		Execute	Access,All_Reference
065c 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
065d 8422       | "  |		Call	0x2,0x22
065e e804       |    |		Load	0x4,0x4
065f 0227       | '  |		Execute	Access,All_Reference
0660 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0661 0227       | '  |		Execute	Access,All_Reference
0662 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0663 e002       |    |		Load	0x0,0x2
0664 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0665 8421       | !  |		Call	0x2,0x21
0666 7816       |x   |		Jump	0x67d
0667 4801       |H   |		Short_Literal	0x1
0668 a40c       |    |		Store_Unchecked	0x2,0xc
0669 e00c       |    |		Load	0x0,0xc
066a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
066b 4807       |H   |		Short_Literal	0x7
066c 0092 0895  |    |		Action	Push_String_Extended,0x895					; "Undefined Initialization Item: "
066e e804       |    |		Load	0x4,0x4
066f 0227       | '  |		Execute	Access,All_Reference
0670 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0671 0227       | '  |		Execute	Access,All_Reference
0672 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0673 e002       |    |		Load	0x0,0x2
0674 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0675 01cc       |    |		Execute	Vector,Catenate
0676 0092 0896  |    |		Action	Push_String_Extended,0x896					; " in "
0678 01cc       |    |		Execute	Vector,Catenate
0679 e9fe       |    |		Load	0x4,-0x2
067a 01cc       |    |		Execute	Vector,Catenate
067b e00d       |    |		Load	0x0,0xd
067c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
067d e804       |    |		Load	0x4,0x4
067e 0227       | '  |		Execute	Access,All_Reference
067f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0680 a805       |    |		Store_Unchecked	0x4,0x5
0681 e806       |    |		Load	0x4,0x6
0682 7005       |p   |		Jump_Nonzero	0x688
0683 e804       |    |		Load	0x4,0x4
0684 0227       | '  |		Execute	Access,All_Reference
0685 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0686 a802       |    |		Store_Unchecked	0x4,0x2
0687 7806       |x   |		Jump	0x68e
0688 e804       |    |		Load	0x4,0x4
0689 0227       | '  |		Execute	Access,All_Reference
068a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
068b e806       |    |		Load	0x4,0x6
068c 0227       | '  |		Execute	Access,All_Reference
068d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
068e e803       |    |		Load	0x4,0x3
068f e804       |    |		Load	0x4,0x4
0690 0227       | '  |		Execute	Access,All_Reference
0691 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0692 e804       |    |		Load	0x4,0x4
0693 a803       |    |		Store_Unchecked	0x4,0x3
0694 4801       |H   |		Short_Literal	0x1
0695 a807       |    |		Store_Unchecked	0x4,0x7
0696 7806       |x   |		Jump	0x69d
0697 e804       |    |		Load	0x4,0x4
0698 a806       |    |		Store_Unchecked	0x4,0x6
0699 e804       |    |		Load	0x4,0x4
069a 0227       | '  |		Execute	Access,All_Reference
069b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
069c a805       |    |		Store_Unchecked	0x4,0x5
069d e805       |    |		Load	0x4,0x5
069e a804       |    |		Store_Unchecked	0x4,0x4
069f 00c9       |    |		Action	Pop_Auxiliary_Loop
06a0 e804       |    |		Load	0x4,0x4
06a1 777a       |wz  |		Jump_Nonzero	0x61c
06a2 00ce       |    |		Action	Pop_Auxiliary
06a3 e803       |    |		Load	0x4,0x3
06a4 a804       |    |		Store_Unchecked	0x4,0x4
06a5 00cf       |    |		Action	Mark_Auxiliary
06a6 780d       |x   |		Jump	0x6b4
06a7 e804       |    |		Load	0x4,0x4
06a8 0227       | '  |		Execute	Access,All_Reference
06a9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06aa a805       |    |		Store_Unchecked	0x4,0x5
06ab e604       |    |		Load	0x3,0x4
06ac e804       |    |		Load	0x4,0x4
06ad 0227       | '  |		Execute	Access,All_Reference
06ae 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
06af e804       |    |		Load	0x4,0x4
06b0 a604       |    |		Store_Unchecked	0x3,0x4
06b1 e805       |    |		Load	0x4,0x5
06b2 a804       |    |		Store_Unchecked	0x4,0x4
06b3 00c9       |    |		Action	Pop_Auxiliary_Loop
06b4 e804       |    |		Load	0x4,0x4
06b5 77f1       |w   |		Jump_Nonzero	0x6a7
06b6 00ce       |    |		Action	Pop_Auxiliary
06b7 e807       |    |		Load	0x4,0x7
06b8 700b       |p   |		Jump_Nonzero	0x6c4
06b9 4801       |H   |		Short_Literal	0x1
06ba a40c       |    |		Store_Unchecked	0x2,0xc
06bb e00c       |    |		Load	0x0,0xc
06bc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
06bd 4807       |H   |		Short_Literal	0x7
06be 0092 0897  |    |		Action	Push_String_Extended,0x897					; "Loop in dependencies discovered.  Will now ignore prerequisites."
06c0 e00d       |    |		Load	0x0,0xd
06c1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06c2 4801       |H   |		Short_Literal	0x1
06c3 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
06c4 00c9       |    |		Action	Pop_Auxiliary_Loop
06c5 e802       |    |		Load	0x4,0x2
06c6 774b       |wK  |		Jump_Nonzero	0x612
06c7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cd       |    |		.CONST	0x06cd								; Address of begin
06c9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ca 0002       |    |		.CONST	0x0002								; Number of locals
06cb			INIT_06c8:
06cb e602       |    |		Load	0x3,0x2
06cc 0007       |    |		Action	Break_Optional
06cd			BODY_06c8:
06cd e602       |    |		Load	0x3,0x2
06ce 4800       |H   |		Short_Literal	0x0
06cf 4801       |H   |		Short_Literal	0x1
06d0 8605       |    |		Call	0x3,0x5
06d1 0039       | 9  |		Store_Top	Access,At_Offset_1
06d2 e5ff       |    |		Load	0x2,-0x1
06d3 00d9       |    |		Load_Top	At_Offset_1
06d4 8606       |    |		Call	0x3,0x6
06d5 e602       |    |		Load	0x3,0x2
06d6 4801       |H   |		Short_Literal	0x1
06d7 4801       |H   |		Short_Literal	0x1
06d8 8605       |    |		Call	0x3,0x5
06d9 0039       | 9  |		Store_Top	Access,At_Offset_1
06da e5fe       |    |		Load	0x2,-0x2
06db 00d9       |    |		Load_Top	At_Offset_1
06dc 8606       |    |		Call	0x3,0x6
06dd e602       |    |		Load	0x3,0x2
06de 4800       |H   |		Short_Literal	0x0
06df 4800       |H   |		Short_Literal	0x0
06e0 8605       |    |		Call	0x3,0x5
06e1 0039       | 9  |		Store_Top	Access,At_Offset_1
06e2 e5ff       |    |		Load	0x2,-0x1
06e3 00d9       |    |		Load_Top	At_Offset_1
06e4 8606       |    |		Call	0x3,0x6
06e5 e602       |    |		Load	0x3,0x2
06e6 4801       |H   |		Short_Literal	0x1
06e7 4800       |H   |		Short_Literal	0x0
06e8 8605       |    |		Call	0x3,0x5
06e9 0039       | 9  |		Store_Top	Access,At_Offset_1
06ea e5fe       |    |		Load	0x2,-0x2
06eb 00d9       |    |		Load_Top	At_Offset_1
06ec 8606       |    |		Call	0x3,0x6
06ed 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06ee 0000 0000  |    |		.XXX[0x2]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06fe       |    |		.CONST	0x06fe								; Address of begin
06f1 0004       |    |		.CONST	0x0004								; Address of exception handler
06f2 0003       |    |		.CONST	0x0003								; Number of locals
06f3			INIT_06f0:
06f3 00da       |    |		Load_Top	At_Offset_2
06f4 01dd       |    |		Execute	Vector,First
06f5 00db       |    |		Load_Top	At_Offset_3
06f6 01dc       |    |		Execute	Vector,Last
06f7 00e9       |    |		Load_Encached	String_Cache
06f8 035b       | [  |		Declare_Type	Array,Constrained
06f9 0337       | 7  |		Declare_Variable	Array
06fa 00db       |    |		Load_Top	At_Offset_3
06fb 01dd       |    |		Execute	Vector,First
06fc 00e3       |    |		Load_Encached	Natural_Cache
06fd 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
06fe			BODY_06f0:
06fe 00cf       |    |		Action	Mark_Auxiliary
06ff ebff       |    |		Load	0x5,-0x1
0700 01d9       |    |		Execute	Vector,Reverse_Bounds
0701 0263       | c  |		Execute	Discrete,Above_Bound
0702 7010       |p   |		Jump_Nonzero	0x713
0703 00d8       |    |		Load_Top	At_Offset_0
0704 ebff       |    |		Load	0x5,-0x1
0705 01d7       |    |		Execute	Vector,Field_Read
0706 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0707 6809       |h   |		Jump_Zero	0x711
0708 00d8       |    |		Load_Top	At_Offset_0
0709 ebff       |    |		Load	0x5,-0x1
070a 01d7       |    |		Execute	Vector,Field_Read
070b ea03       |    |		Load	0x5,0x3
070c ea02       |    |		Load	0x5,0x2
070d 01d6       |    |		Execute	Vector,Field_Write
070e 00db       |    |		Load_Top	At_Offset_3
070f 0a01       |    |		Execute_Immediate	Plus,0x1
0710 ca03       |    |		Store	0x5,0x3
0711 00c8       |    |		Action	Pop_Auxiliary_Range
0712 3ff0       |?   |		Loop_Increasing	0x703
0713 00ce       |    |		Action	Pop_Auxiliary
0714 00d9       |    |		Load_Top	At_Offset_1
0715 01dd       |    |		Execute	Vector,First
0716 00d9       |    |		Load_Top	At_Offset_1
0717 0aff       |    |		Execute_Immediate	Plus,-0x1
0718 00db       |    |		Load_Top	At_Offset_3
0719 01cf       |    |		Execute	Vector,Slice_Read
071a 00e9       |    |		Load_Encached	String_Cache
071b 01c6       |    |		Execute	Vector,Convert_To_Formal
071c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
071d 0000 0000  |    |		.XXX[0x3]
071f 0000       |    |
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 073b       | ;  |		.CONST	0x073b								; Address of begin
0721 0004       |    |		.CONST	0x0004								; Address of exception handler
0722 0004       |    |		.CONST	0x0004								; Number of locals
0723			INIT_0720:
0723 e9fe       |    |		Load	0x4,-0x2
0724 0227       | '  |		Execute	Access,All_Reference
0725 0335       | 5  |		Declare_Variable	Array,Duplicate
0726 00cd       |    |		Action	Spare6_Action
0727 4801       |H   |		Short_Literal	0x1
0728 00d9       |    |		Load_Top	At_Offset_1
0729 8803       |    |		Call	0x4,0x3
072a 0092 0898  |    |		Action	Push_String_Extended,0x898					; "Error="
072c e014       |    |		Load	0x0,0x14
072d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
072e 0e00       |    |		Execute_Immediate	Not_Equal,0x0
072f 00e1       |    |		Load_Encached	Boolean_Cache
0730 03f1       |    |		Declare_Variable	Discrete,With_Value
0731 4801       |H   |		Short_Literal	0x1
0732 00da       |    |		Load_Top	At_Offset_2
0733 8803       |    |		Call	0x4,0x3
0734 0092 0899  |    |		Action	Push_String_Extended,0x899					; "Output="
0736 e014       |    |		Load	0x0,0x14
0737 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0738 0e00       |    |		Execute_Immediate	Not_Equal,0x0
0739 00e1       |    |		Load_Encached	Boolean_Cache
073a 03f1       |    |		Declare_Variable	Discrete,With_Value
073b			BODY_0720:
073b 00d9       |    |		Load_Top	At_Offset_1
073c 00d9       |    |		Load_Top	At_Offset_1
073d 0279       | y  |		Execute	Discrete,And
073e 6802       |h   |		Jump_Zero	0x741
073f 00cc       |    |		Action	Pop_Block
0740 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0741 00d9       |    |		Load_Top	At_Offset_1
0742 680d       |h   |		Jump_Zero	0x750
0743 00da       |    |		Load_Top	At_Offset_2
0744 0092 089a  |    |		Action	Push_String_Extended,0x89a					; ", Output => ("
0746 01cc       |    |		Execute	Vector,Catenate
0747 e802       |    |		Load	0x4,0x2
0748 01cc       |    |		Execute	Vector,Catenate
0749 0092 087e  |   ~|		Action	Push_String_Extended,0x87e					; ")"
074b 01cc       |    |		Execute	Vector,Catenate
074c e40e       |    |		Load	0x2,0xe
074d 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
074e a9fe       |    |		Store_Unchecked	0x4,-0x2
074f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0750 00d8       |    |		Load_Top	At_Offset_0
0751 680d       |h   |		Jump_Zero	0x75f
0752 00da       |    |		Load_Top	At_Offset_2
0753 0092 089b  |    |		Action	Push_String_Extended,0x89b					; ", Error => ("
0755 01cc       |    |		Execute	Vector,Catenate
0756 e802       |    |		Load	0x4,0x2
0757 01cc       |    |		Execute	Vector,Catenate
0758 0092 087e  |   ~|		Action	Push_String_Extended,0x87e					; ")"
075a 01cc       |    |		Execute	Vector,Catenate
075b e40e       |    |		Load	0x2,0xe
075c 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
075d a9fe       |    |		Store_Unchecked	0x4,-0x2
075e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
075f 00da       |    |		Load_Top	At_Offset_2
0760 0092 089a  |    |		Action	Push_String_Extended,0x89a					; ", Output => ("
0762 01cc       |    |		Execute	Vector,Catenate
0763 e802       |    |		Load	0x4,0x2
0764 01cc       |    |		Execute	Vector,Catenate
0765 0092 087d  |   }|		Action	Push_String_Extended,0x87d					; "), Error => ("
0767 01cc       |    |		Execute	Vector,Catenate
0768 e802       |    |		Load	0x4,0x2
0769 01cc       |    |		Execute	Vector,Catenate
076a 0092 087e  |   ~|		Action	Push_String_Extended,0x87e					; ")"
076c 01cc       |    |		Execute	Vector,Catenate
076d e40e       |    |		Load	0x2,0xe
076e 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
076f a9fe       |    |		Store_Unchecked	0x4,-0x2
0770 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0771 0000 0000  |    |		.BLANK	0000[0x7]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077b       | {  |		.CONST	0x077b								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 0001       |    |		.CONST	0x0001								; Number of locals
077b			BODY_0778:
077b			INIT_0778:
077b 00da       |    |		Load_Top	At_Offset_2
077c 4861       |Ha  |		Short_Literal	0x61
077d 487a       |Hz  |		Short_Literal	0x7a
077e 0262       | b  |		Execute	Discrete,In_Range
077f 700a       |p   |		Jump_Nonzero	0x78a
0780 00da       |    |		Load_Top	At_Offset_2
0781 4841       |HA  |		Short_Literal	0x41
0782 485a       |HZ  |		Short_Literal	0x5a
0783 0262       | b  |		Execute	Discrete,In_Range
0784 7005       |p   |		Jump_Nonzero	0x78a
0785 00da       |    |		Load_Top	At_Offset_2
0786 4830       |H0  |		Short_Literal	0x30
0787 4839       |H9  |		Short_Literal	0x39
0788 0262       | b  |		Execute	Discrete,In_Range
0789 6802       |h   |		Jump_Zero	0x78c
078a 4801       |H   |		Short_Literal	0x1
078b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
078c 00da       |    |		Load_Top	At_Offset_2
078d 0f5f       | _  |		Execute_Immediate	Equal,0x5f
078e 6802       |h   |		Jump_Zero	0x791
078f 4801       |H   |		Short_Literal	0x1
0790 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0791 4800       |H   |		Short_Literal	0x0
0792 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0793 0000 0000  |    |		.BLANK	0000[0x5]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b       |    |		.CONST	0x079b								; Address of begin
0799 0004       |    |		.CONST	0x0004								; Address of exception handler
079a 0001       |    |		.CONST	0x0001								; Number of locals
079b			BODY_0798:
079b			INIT_0798:
079b 4801       |H   |		Short_Literal	0x1
079c e802       |    |		Load	0x4,0x2
079d ebff       |    |		Load	0x5,-0x1
079e e014       |    |		Load	0x0,0x14
079f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
07a0 a803       |    |		Store_Unchecked	0x4,0x3
07a1 e803       |    |		Load	0x4,0x3
07a2 6825       |h%  |		Jump_Zero	0x7c8
07a3 e803       |    |		Load	0x4,0x3
07a4 00db       |    |		Load_Top	At_Offset_3
07a5 01db       |    |		Execute	Vector,Length
07a6 0273       | s  |		Execute	Discrete,Plus
07a7 0a01       |    |		Execute_Immediate	Plus,0x1
07a8 c803       |    |		Store	0x4,0x3
07a9 00db       |    |		Load_Top	At_Offset_3
07aa 6812       |h   |		Jump_Zero	0x7bd
07ab 00db       |    |		Load_Top	At_Offset_3
07ac 0227       | '  |		Execute	Access,All_Reference
07ad 0092 0876  |   v|		Action	Push_String_Extended,0x876					; " "
07af 01cc       |    |		Execute	Vector,Catenate
07b0 4820       |H   |		Short_Literal	0x20
07b1 e803       |    |		Load	0x4,0x3
07b2 e802       |    |		Load	0x4,0x2
07b3 01dc       |    |		Execute	Vector,Last
07b4 e802       |    |		Load	0x4,0x2
07b5 01cf       |    |		Execute	Vector,Slice_Read
07b6 e014       |    |		Load	0x0,0x14
07b7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
07b8 01cc       |    |		Execute	Vector,Catenate
07b9 e40e       |    |		Load	0x2,0xe
07ba 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
07bb abfe       |    |		Store_Unchecked	0x5,-0x2
07bc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07bd 4820       |H   |		Short_Literal	0x20
07be e803       |    |		Load	0x4,0x3
07bf e802       |    |		Load	0x4,0x2
07c0 01dc       |    |		Execute	Vector,Last
07c1 e802       |    |		Load	0x4,0x2
07c2 01cf       |    |		Execute	Vector,Slice_Read
07c3 e014       |    |		Load	0x0,0x14
07c4 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
07c5 e40e       |    |		Load	0x2,0xe
07c6 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
07c7 abfe       |    |		Store_Unchecked	0x5,-0x2
07c8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07c9 0000 0000  |    |		.BLANK	0000[0x7]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07e2       |    |		.CONST	0x07e2								; Address of begin
07d1 0004       |    |		.CONST	0x0004								; Address of exception handler
07d2 0003       |    |		.CONST	0x0003								; Number of locals
07d3			INIT_07d0:
07d3 4801       |H   |		Short_Literal	0x1
07d4 e9ff       |    |		Load	0x4,-0x1
07d5 01db       |    |		Execute	Vector,Length
07d6 e802       |    |		Load	0x4,0x2
07d7 0273       | s  |		Execute	Discrete,Plus
07d8 00d8       |    |		Load_Top	At_Offset_0
07d9 00e2       |    |		Load_Encached	Integer_Cache
07da 0260       | `  |		Execute	Discrete,In_Type
07db 7001       |p   |		Jump_Nonzero	0x7dd
07dc 0801       |    |		Execute_Immediate	Raise,0x1
07dd 00e9       |    |		Load_Encached	String_Cache
07de 035b       | [  |		Declare_Type	Array,Constrained
07df 0337       | 7  |		Declare_Variable	Array
07e0 00e3       |    |		Load_Encached	Natural_Cache
07e1 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
07e2			BODY_07d0:
07e2 00cf       |    |		Action	Mark_Auxiliary
07e3 e9ff       |    |		Load	0x4,-0x1
07e4 01d9       |    |		Execute	Vector,Reverse_Bounds
07e5 0263       | c  |		Execute	Discrete,Above_Bound
07e6 7018       |p   |		Jump_Nonzero	0x7ff
07e7 00d8       |    |		Load_Top	At_Offset_0
07e8 e9ff       |    |		Load	0x4,-0x1
07e9 01d7       |    |		Execute	Vector,Field_Read
07ea e9fe       |    |		Load	0x4,-0x2
07eb 027f       |    |		Execute	Discrete,Equal
07ec 6807       |h   |		Jump_Zero	0x7f4
07ed e9fe       |    |		Load	0x4,-0x2
07ee ea03       |    |		Load	0x5,0x3
07ef ea02       |    |		Load	0x5,0x2
07f0 01d6       |    |		Execute	Vector,Field_Write
07f1 00db       |    |		Load_Top	At_Offset_3
07f2 0a01       |    |		Execute_Immediate	Plus,0x1
07f3 ca03       |    |		Store	0x5,0x3
07f4 00d8       |    |		Load_Top	At_Offset_0
07f5 e9ff       |    |		Load	0x4,-0x1
07f6 01d7       |    |		Execute	Vector,Field_Read
07f7 ea03       |    |		Load	0x5,0x3
07f8 ea02       |    |		Load	0x5,0x2
07f9 01d6       |    |		Execute	Vector,Field_Write
07fa 00db       |    |		Load_Top	At_Offset_3
07fb 0a01       |    |		Execute_Immediate	Plus,0x1
07fc ca03       |    |		Store	0x5,0x3
07fd 00c8       |    |		Action	Pop_Auxiliary_Range
07fe 3fe8       |?   |		Loop_Increasing	0x7e7
07ff 00ce       |    |		Action	Pop_Auxiliary
0800 00d9       |    |		Load_Top	At_Offset_1
0801 00e9       |    |		Load_Encached	String_Cache
0802 01c6       |    |		Execute	Vector,Convert_To_Formal
0803 00cb       |    |		Action	Pop_Block_With_Result
0804 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0805 0000 0000  |    |		.XXX[0x3]
0807 0000       |    |
0808 ; --------------------------------------------------------------------------------------
0808 ; SUBPROGRAM
0808 ; --------------------------------------------------------------------------------------
0808 080b       |    |		.CONST	0x080b								; Address of begin
0809 0004       |    |		.CONST	0x0004								; Address of exception handler
080a 0001       |    |		.CONST	0x0001								; Number of locals
080b			BODY_0808:
080b			INIT_0808:
080b 00db       |    |		Load_Top	At_Offset_3
080c 680c       |h   |		Jump_Zero	0x819
080d 0092 089c  |    |		Action	Push_String_Extended,0x89c					; "    "
080f 00db       |    |		Load_Top	At_Offset_3
0810 01cc       |    |		Execute	Vector,Catenate
0811 0092 089d  |    |		Action	Push_String_Extended,0x89d					; " => "
0813 01cc       |    |		Execute	Vector,Catenate
0814 ebfe       |    |		Load	0x5,-0x2
0815 0227       | '  |		Execute	Access,All_Reference
0816 01cc       |    |		Execute	Vector,Catenate
0817 e006       |    |		Load	0x0,0x6
0818 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0819 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
081a 0000 0000  |    |		.BLANK	0000[0x6]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0828       | (  |		.CONST	0x0828								; Address of begin
0821 0004       |    |		.CONST	0x0004								; Address of exception handler
0822 0003       |    |		.CONST	0x0003								; Number of locals
0823			INIT_0820:
0823 00da       |    |		Load_Top	At_Offset_2
0824 0227       | '  |		Execute	Access,All_Reference
0825 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0826 0007       |    |		Action	Break_Optional
0827 e602       |    |		Load	0x3,0x2
0828			BODY_0820:
0828 00cf       |    |		Action	Mark_Auxiliary
0829 781d       |x   |		Jump	0x847
082a ebfe       |    |		Load	0x5,-0x2
082b 003a       | :  |		Store_Top	Access,At_Offset_2
082c 00cf       |    |		Action	Mark_Auxiliary
082d 7805       |x   |		Jump	0x833
082e 00da       |    |		Load_Top	At_Offset_2
082f 0227       | '  |		Execute	Access,All_Reference
0830 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0831 003b       | ;  |		Store_Top	Access,At_Offset_3
0832 00c9       |    |		Action	Pop_Auxiliary_Loop
0833 00da       |    |		Load_Top	At_Offset_2
0834 6808       |h   |		Jump_Zero	0x83d
0835 00da       |    |		Load_Top	At_Offset_2
0836 0227       | '  |		Execute	Access,All_Reference
0837 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0838 ea02       |    |		Load	0x5,0x2
0839 0227       | '  |		Execute	Access,All_Reference
083a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
083b 022e       | .  |		Execute	Access,Not_Equal
083c 77f1       |w   |		Jump_Nonzero	0x82e
083d 00ce       |    |		Action	Pop_Auxiliary
083e 00d9       |    |		Load_Top	At_Offset_1
083f 7002       |p   |		Jump_Nonzero	0x842
0840 4800       |H   |		Short_Literal	0x0
0841 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0842 00da       |    |		Load_Top	At_Offset_2
0843 0227       | '  |		Execute	Access,All_Reference
0844 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0845 003b       | ;  |		Store_Top	Access,At_Offset_3
0846 00c9       |    |		Action	Pop_Auxiliary_Loop
0847 00da       |    |		Load_Top	At_Offset_2
0848 77e1       |w   |		Jump_Nonzero	0x82a
0849 00ce       |    |		Action	Pop_Auxiliary
084a 4801       |H   |		Short_Literal	0x1
084b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
084c ; --------------------------------------------------------------------------------------
084c ; STRING TABLE
084c ; --------------------------------------------------------------------------------------
084c 00a6       |    |		.STRTAB	0x00a6->0x089f							; "--|Prerequisite"
084d 00b3       |    |		.STRTAB	0x00b3->0x08a6							; "--|Wait"
084e 00b8       |    |		.STRTAB	0x00b8->0x08aa							; "--|No_Wait"
084f 00c0       |    |		.STRTAB	0x00c0->0x08af							; "--|Parameters"
0850 00cb       |    |		.STRTAB	0x00cb->0x08b5							; "--|Options"
0851 00d3       |    |		.STRTAB	0x00d3->0x08ba							; "--|Procedure_Name"
0852 00e2       |    |		.STRTAB	0x00e2->0x08c3							; "--|Procedure_Context"
0853 00f4       |    |		.STRTAB	0x00f4->0x08cd							; "--|Subsystem"
0854 00fe       |    |		.STRTAB	0x00fe->0x08d3							; "--|Activity"
0855 0107       |    |		.STRTAB	0x0107->0x08d8							; "--|Context"
0856 010f       |    |		.STRTAB	0x010f->0x08dd							; "!Machine.Error_Logs"
0857 0120       |    |		.STRTAB	0x0120->0x08e7							; "!Machine.Release.Current.Activity"
0858 013f       | ?  |		.STRTAB	0x013f->0x08f7							; "@"
0859 013e       | >  |		.STRTAB	0x013e->0x08f8							; "["
085a 013d       | =  |		.STRTAB	0x013d->0x08f8							; ","
085b 013c       | <  |		.STRTAB	0x013c->0x08f9							; "].["
085c 013d       | =  |		.STRTAB	0x013d->0x08fa							; "]"
085d 013c       | <  |		.STRTAB	0x013c->0x08fb							; "!Machine.Error_Logs.Machine_Initialize"
085e 0160       | `  |		.STRTAB	0x0160->0x090e							; "!Machine.Error_Logs.Machine_Initialize_Errors"
085f 018b       |    |		.STRTAB	0x018b->0x0924							; "Could not enable privileges."
0860 01a5       |    |		.STRTAB	0x01a5->0x0932							; "<PROFILE>"
0861 01ac       |    |		.STRTAB	0x01ac->0x0937							; "<ERRORS>"
0862 01b2       |    |		.STRTAB	0x01b2->0x093b							; ".[@'spec,@_Start'c(file)]"
0863 01c9       |    |		.STRTAB	0x01c9->0x0947							; "Start ordering:"
0864 01d6       |    |		.STRTAB	0x01d6->0x094f							; "---------------"
0865 01e3       |    |		.STRTAB	0x01e3->0x0956							; " is reserved: must not be used in Site initialization.  Will be ignored"
0866 0228       | (  |		.STRTAB	0x0228->0x097a							; "*** Exception raised processing "
0867 0246       | F  |		.STRTAB	0x0246->0x098a							; " in run context "
0868 0254       | T  |		.STRTAB	0x0254->0x0992							; ": "
0869 0254       | T  |		.STRTAB	0x0254->0x0993							; " in context "
086a 025e       | ^  |		.STRTAB	0x025e->0x0999							; "Exception_While_Starting"
086b 0274       | t  |		.STRTAB	0x0274->0x09a5							; "Machine_Initialization_Start"
086c 028e       |    |		.STRTAB	0x028e->0x09b3							; "List of initialization items and their characteristics:"
086d 02c3       |    |		.STRTAB	0x02c3->0x09ce							; "-------------------------------------------------------"
086e 02f8       |    |		.STRTAB	0x02f8->0x09ea							; "Item: "
086f 02fc       |    |		.STRTAB	0x02fc->0x09ed							; "      Wait   "
0870 0307       |    |		.STRTAB	0x0307->0x09f3							; "      No_Wait "
0871 0313       |    |		.STRTAB	0x0313->0x09fa							; "In Site or Local Directory "
0872 032c       | ,  |		.STRTAB	0x032c->0x0a08							; "In_Rational_Directory  "
0873 0341       | A  |		.STRTAB	0x0341->0x0a13							; "*Undefined* "
0874 034b       | K  |		.STRTAB	0x034b->0x0a19							; "Referenced_By_Others "
0875 035e       | ^  |		.STRTAB	0x035e->0x0a24							; "       Prerequisites: "
0876 0372       | r  |		.STRTAB	0x0372->0x0a2f							; " "
0877 0371       | q  |		.STRTAB	0x0371->0x0a2f							; "see !Machine.Error_Logs.Machine_Initialize"
0878 0399       |    |		.STRTAB	0x0399->0x0a44							; "Errors_Detected"
0879 03a6       |    |		.STRTAB	0x03a6->0x0a4c							; "Machine_Initialize_Start"
087a 03bc       |    |		.STRTAB	0x03bc->0x0a58							; "!Machine.Error_Logs."
087b 03ce       |    |		.STRTAB	0x03ce->0x0a62							; "_Log"
087c 03d0       |    |		.STRTAB	0x03d0->0x0a64							; "Output => ("
087d 03d9       |    |		.STRTAB	0x03d9->0x0a69							; "), Error => ("
087e 03e4       |    |		.STRTAB	0x03e4->0x0a70							; ")"
087f 03e3       |    |		.STRTAB	0x03e3->0x0a70							; "_Start"
0880 03e7       |    |		.STRTAB	0x03e7->0x0a73							; "("
0881 03e6       |    |		.STRTAB	0x03e6->0x0a74							; "\x22"
0882 03e5       |    |		.STRTAB	0x03e5->0x0a74							; "\x22."
0883 03e5       |    |		.STRTAB	0x03e5->0x0a75							; ");"
0884 03e5       |    |		.STRTAB	0x03e5->0x0a76							; "Program.Run (\x22"
0885 03f1       |    |		.STRTAB	0x03f1->0x0a7d							; "\x22,"
0886 03f1       |    |		.STRTAB	0x03f1->0x0a7e							; "             Context => \x22"
0887 0408       |    |		.STRTAB	0x0408->0x0a8b							; "\x22);"
0888 0409       |    |		.STRTAB	0x0409->0x0a8c							; "Starting"
0889 040f       |    |		.STRTAB	0x040f->0x0a90							; "Finishing"
088a 0416       |    |		.STRTAB	0x0416->0x0a95							; "Program.Run_Job (\x22"
088b 0426       | &  |		.STRTAB	0x0426->0x0a9e							; "                 Context => \x22"
088c 0441       | A  |		.STRTAB	0x0441->0x0aac							; "                 Options => \x22"
088d 045c       | \  |		.STRTAB	0x045c->0x0abb							; "Starting_No_Wait"
088e 046a       | j  |		.STRTAB	0x046a->0x0ac3							; "Parameters       "
088f 0479       | y  |		.STRTAB	0x0479->0x0acb							; "Options          "
0890 0488       |    |		.STRTAB	0x0488->0x0ad4							; "Activity         "
0891 0497       |    |		.STRTAB	0x0497->0x0adc							; "Procedure_Context"
0892 04a6       |    |		.STRTAB	0x04a6->0x0ae5							; "Procedure_Name   "
0893 04b5       |    |		.STRTAB	0x04b5->0x0aed							; "Subsystem        "
0894 04c4       |    |		.STRTAB	0x04c4->0x0af6							; "Context          "
0895 04d3       |    |		.STRTAB	0x04d3->0x0afe							; "Undefined Initialization Item: "
0896 04f0       |    |		.STRTAB	0x04f0->0x0b0e							; " in "
0897 04f2       |    |		.STRTAB	0x04f2->0x0b10							; "Loop in dependencies discovered.  Will now ignore prerequisites."
0898 0530       | 0  |		.STRTAB	0x0530->0x0b30							; "Error="
0899 0534       | 4  |		.STRTAB	0x0534->0x0b33							; "Output="
089a 0539       | 9  |		.STRTAB	0x0539->0x0b36							; ", Output => ("
089b 0544       | D  |		.STRTAB	0x0544->0x0b3d							; ", Error => ("
089c 054e       | N  |		.STRTAB	0x054e->0x0b43							; "    "
089d 0550       | P  |		.STRTAB	0x0550->0x0b45							; " => "
089e 0552       | R  |		.STREND 0x0552->0x0b47
089f 2d2d 7c50  |--|P|		.STRTAB_STRINGS
0b47 0000       |    |		.XXX[0x1]
0b48 ; --------------------------------------------------------------------------------------
0b48 ; Debug Table
0b48 ; --------------------------------------------------------------------------------------
0b48 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0x0d10,0x0000,0x0001,0x0000
0b4e 1b1a 0072  |   r|		.XXX[0xb2]
0b50 d48c 0380  |    |
0b52 06c6 401c  |  @ |
0b54 b533 80e0  | 3  |
0b56 01b2 4007  |  @ |
0b58 2d51 0038  |-Q 8|
0b5a 006c 6001  | l` |
0b5c cb55 480e  | UH |
0b5e 001b 2300  |  # |
0b60 72d5 9403  |r   |
0b62 8006 c440  |   @|
0b64 1cb5 7580  |  u |
0b66 e001 b0e0  |    |
0b68 072d 6180  | -a |
0b6a 3800 6c34  |8 l4|
0b6c 01cb 5968  |  Yh|
0b6e 0e00 1b0c  |    |
0b70 0072 d69c  | r  |
0b72 0380 06cc  |    |
0b74 001c b5b7  |    |
0b76 80e0 0142  |   B|
0b78 9007 2d72  |  -r|
0b7a 0038 006c  | 8 l|
0b7c 2801 cb5d  |(  ]|
0b7e 880e 001b  |    |
0b80 0f00 72d7  |  r |
0b82 a403 8003  |    |
0b84 5cc0 1cb5  |\   |
0b86 f980 e000  |    |
0b88 d740 072d  | @ -|
0b8a 8280 3800  |  8 |
0b8c 6c24 01cb  |l$  |
0b8e 61a8 0e00  |a   |
0b90 1b0b 0072  |   r|
0b92 d8ac 0380  |    |
0b94 06c1 401c  |  @ |
0b96 b63b 80e0  | ;  |
0b98 01b0 4007  |  @ |
0b9a 2d93 0038  |-  8|
0b9c 006c 1801  | l  |
0b9e cb65 c80e  | e  |
0ba0 000d 4a00  |  J |
0ba2 72d9 b403  |r   |
0ba4 8007 05c0  |    |
0ba6 1cb6 7d80  |  } |
0ba8 e001 c180  |    |
0baa 072d a380  | -  |
0bac 3800 7064  |8 pd|
0bae 01cb 69e8  |  i |
0bb0 0e00 1b2e  |   .|
0bb2 0072 dabc  | r  |
0bb4 0380 06cb  |    |
0bb6 c01c b6bf  |    |
0bb8 80e0 01b1  |    |
0bba 0007 2db4  |  - |
0bbc 0038 0050  | 8 P|
0bbe d001 cb6e  |   n|
0bc0 080e 001b  |    |
0bc2 0700 72db  |  r |
0bc4 c403 8006  |    |
0bc6 c200 1cb7  |    |
0bc8 0180 e001  |    |
0bca b260 072d  | ` -|
0bcc c480 3800  |  8 |
0bce 6c9c 01cb  |l   |
0bd0 7228 0e00  |r(  |
0bd2 1b28 0072  | ( r|
0bd4 dccc 0380  |    |
0bd6 06ca 401c  |  @ |
0bd8 b743 80e0  | C  |
0bda 01b2 a007  |    |
0bdc 2dd5 0038  |-  8|
0bde 006c ac01  | l  |
0be0 cb76 480e  | vH |
0be2 001b 2c00  |  , |
0be4 72dd d403  |r   |
0be6 8006 cb40  |   @|
0be8 1cb7 8580  |    |
0bea e001 b020  |    |
0bec 072d e580  | -  |
0bee 3800 6bf0  |8 k |
0bf0 01cb 7a68  |  zh|
0bf2 0e00 1afd  |    |
0bf4 0072 dedc  | r  |
0bf6 0380 0507  |    |
0bf8 801c b7c7  |    |
0bfa 80e0 01b0  |    |
0bfc 1007 2df6  |  - |
0bfe 0038 006b  | 8 k|