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

⟦af3966d69⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0b30       | 0  |		.CONST	0x0b30								; 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 0094       |    |		.CONST	0x0094								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0025       | %  |		.CONST	0x0025								; 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 e001       |    |		Load	0x0,0x1
0032 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0033 02c7       |    |		Declare_Variable	Any
0034 00d8       |    |		Load_Top	At_Offset_0
0035 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0036 e001       |    |		Load	0x0,0x1
0037 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0038 00e9       |    |		Load_Encached	String_Cache
0039 02a0       |    |		Declare_Subprogram	Null_Subprogram
003a 4818       |H   |		Short_Literal	0x18
003b 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
003c 0092 0856  |   V|		Action	Push_String_Extended,0x856					; "!Machine.Error_Logs"
003e 00d9       |    |		Load_Top	At_Offset_1
003f 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0040 0092 0857  |   W|		Action	Push_String_Extended,0x857					; "!Machine.Release.Current.Activity"
0042 00da       |    |		Load_Top	At_Offset_2
0043 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0044 00da       |    |		Load_Top	At_Offset_2
0045 0007       |    |		Action	Break_Optional
0046 4803       |H   |		Short_Literal	0x3
0047 032a       | *  |		Declare_Type	Record,Incomplete
0048 00d8       |    |		Load_Top	At_Offset_0
0049 02a0       |    |		Declare_Subprogram	Null_Subprogram
004a 4818       |H   |		Short_Literal	0x18
004b 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
004c 480d       |H   |		Short_Literal	0xd
004d 032a       | *  |		Declare_Type	Record,Incomplete
004e 00d8       |    |		Load_Top	At_Offset_0
004f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0050 4818       |H   |		Short_Literal	0x18
0051 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
0052 00da       |    |		Load_Top	At_Offset_2
0053 e40e       |    |		Load	0x2,0xe
0054 00da       |    |		Load_Top	At_Offset_2
0055 02a0       |    |		Declare_Subprogram	Null_Subprogram
0056 e413       |    |		Load	0x2,0x13
0057 0326       | &  |		Complete_Type	Record,By_Defining
0058 00e1       |    |		Load_Encached	Boolean_Cache
0059 00db       |    |		Load_Top	At_Offset_3
005a 00e1       |    |		Load_Encached	Boolean_Cache
005b 00e1       |    |		Load_Encached	Boolean_Cache
005c 00e1       |    |		Load_Encached	Boolean_Cache
005d e40e       |    |		Load	0x2,0xe
005e e40f       |    |		Load	0x2,0xf
005f 00d8       |    |		Load_Top	At_Offset_0
0060 e40f       |    |		Load	0x2,0xf
0061 00d8       |    |		Load_Top	At_Offset_0
0062 e40f       |    |		Load	0x2,0xf
0063 00d8       |    |		Load_Top	At_Offset_0
0064 e40f       |    |		Load	0x2,0xf
0065 02a0       |    |		Declare_Subprogram	Null_Subprogram
0066 e415       |    |		Load	0x2,0x15
0067 0326       | &  |		Complete_Type	Record,By_Defining
0068 e002       |    |		Load	0x0,0x2
0069 e003       |    |		Load	0x0,0x3
006a 4865       |He  |		Short_Literal	0x65
006b e40e       |    |		Load	0x2,0xe
006c e416       |    |		Load	0x2,0x16
006d e001       |    |		Load	0x0,0x1
006e 1919       |    |		Execute	Package,Field_Reference,Field_Number 0x19
006f e004       |    |		Load	0x0,0x4
0070 0387       |    |		Declare_Variable	Package
0071 00d8       |    |		Load_Top	At_Offset_0
0072 020f       |    |		Execute	Module,Activate
0073 00d8       |    |		Load_Top	At_Offset_0
0074 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0075 00e1       |    |		Load_Encached	Boolean_Cache
0076 e40f       |    |		Load	0x2,0xf
0077 0007       |    |		Action	Break_Optional
0078 029e 0143  |   C|		Declare_Subprogram	INIT_0140,For_Call,Unelaborated
007a e005       |    |		Load	0x0,0x5
007b 1980       |    |		Execute	Package,Field_Reference,Field_Number 0x80
007c 00c6       |    |		Action	Check_Subprogram_Elaborated
007d 481b       |H   |		Short_Literal	0x1b
007e 4802       |H   |		Short_Literal	0x2
007f 0099       |    |		Action	Reference_Dynamic
0080 e005       |    |		Load	0x0,0x5
0081 1964       | d  |		Execute	Package,Field_Reference,Field_Number 0x64
0082 e006       |    |		Load	0x0,0x6
0083 e007       |    |		Load	0x0,0x7
0084 4820       |H   |		Short_Literal	0x20
0085 0007       |    |		Action	Break_Optional
0086 029f 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Call
0088 029f 021b  |    |		Declare_Subprogram	INIT_0218,For_Call
008a 029f 024b  |   K|		Declare_Subprogram	INIT_0248,For_Call
008c 481b       |H   |		Short_Literal	0x1b
008d 4802       |H   |		Short_Literal	0x2
008e 0099       |    |		Action	Reference_Dynamic
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 029f 025b  |   [|		Declare_Subprogram	INIT_0258,For_Call
0092 029f 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Call
0094			BODY_0018:
0094 e417       |    |		Load	0x2,0x17
0095 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0096 4865       |He  |		Short_Literal	0x65
0097 e417       |    |		Load	0x2,0x17
0098 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0099 c418       |    |		Store	0x2,0x18
009a 487f       |H   |		Short_Literal	0x7f
009b e008       |    |		Load	0x0,0x8
009c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
009d e009       |    |		Load	0x0,0x9
009e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
009f e001       |    |		Load	0x0,0x1
00a0 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00a1 c40d       |    |		Store	0x2,0xd
00a2 e5fc       |    |		Load	0x2,-0x4
00a3 0092 0858  |   X|		Action	Push_String_Extended,0x858					; "@"
00a5 01df       |    |		Execute	Vector,Equal
00a6 701a       |p   |		Jump_Nonzero	0xc1
00a7 0092 0859  |   Y|		Action	Push_String_Extended,0x859					; "["
00a9 e5ff       |    |		Load	0x2,-0x1
00aa 01cc       |    |		Execute	Vector,Catenate
00ab 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; ","
00ad 01cc       |    |		Execute	Vector,Catenate
00ae e5fe       |    |		Load	0x2,-0x2
00af 01cc       |    |		Execute	Vector,Catenate
00b0 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; ","
00b2 01cc       |    |		Execute	Vector,Catenate
00b3 e5fd       |    |		Load	0x2,-0x3
00b4 01cc       |    |		Execute	Vector,Catenate
00b5 0092 085b  |   [|		Action	Push_String_Extended,0x85b					; "].["
00b7 01cc       |    |		Execute	Vector,Catenate
00b8 e5fc       |    |		Load	0x2,-0x4
00b9 01cc       |    |		Execute	Vector,Catenate
00ba 0092 085c  |   \|		Action	Push_String_Extended,0x85c					; "]"
00bc 01cc       |    |		Execute	Vector,Catenate
00bd 8421       | !  |		Call	0x2,0x21
00be e40f       |    |		Load	0x2,0xf
00bf 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00c0 a412       |    |		Store_Unchecked	0x2,0x12
00c1 e5fb       |    |		Load	0x2,-0x5
00c2 7017       |p   |		Jump_Nonzero	0xda
00c3 0092 085d  |   ]|		Action	Push_String_Extended,0x85d					; "!Machine.Error_Logs.Machine_Initialize"
00c5 e005       |    |		Load	0x0,0x5
00c6 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
00c7 e005       |    |		Load	0x0,0x5
00c8 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
00c9 e005       |    |		Load	0x0,0x5
00ca 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
00cb 4801       |H   |		Short_Literal	0x1
00cc e00a       |    |		Load	0x0,0xa
00cd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00ce e00a       |    |		Load	0x0,0xa
00cf 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00d0 7009       |p   |		Jump_Nonzero	0xda
00d1 4801       |H   |		Short_Literal	0x1
00d2 a40c       |    |		Store_Unchecked	0x2,0xc
00d3 e00b       |    |		Load	0x0,0xb
00d4 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00d5 4807       |H   |		Short_Literal	0x7
00d6 0092 085e  |   ^|		Action	Push_String_Extended,0x85e					; "Could not enable privileges."
00d8 e00c       |    |		Load	0x0,0xc
00d9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00da 0092 085f  |   _|		Action	Push_String_Extended,0x85f					; "<PROFILE>"
00dc 0092 0856  |   V|		Action	Push_String_Extended,0x856					; "!Machine.Error_Logs"
00de e00d       |    |		Load	0x0,0xd
00df 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00e0 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "<ERRORS>"
00e2 e411       |    |		Load	0x2,0x11
00e3 0227       | '  |		Execute	Access,All_Reference
00e4 e00e       |    |		Load	0x0,0xe
00e5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00e6 4800       |H   |		Short_Literal	0x0
00e7 a419       |    |		Store_Unchecked	0x2,0x19
00e8 e5ff       |    |		Load	0x2,-0x1
00e9 e40f       |    |		Load	0x2,0xf
00ea 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00eb a41a       |    |		Store_Unchecked	0x2,0x1a
00ec e5ff       |    |		Load	0x2,-0x1
00ed 01db       |    |		Execute	Vector,Length
00ee 680f       |h   |		Jump_Zero	0xfe
00ef e5ff       |    |		Load	0x2,-0x1
00f0 0092 0861  |   a|		Action	Push_String_Extended,0x861					; ".[@'spec,@_Start'c(file)]"
00f2 01cc       |    |		Execute	Vector,Catenate
00f3 481c       |H   |		Short_Literal	0x1c
00f4 4802       |H   |		Short_Literal	0x2
00f5 0099       |    |		Action	Reference_Dynamic
00f6 481d       |H   |		Short_Literal	0x1d
00f7 4802       |H   |		Short_Literal	0x2
00f8 0099       |    |		Action	Reference_Dynamic
00f9 481e       |H   |		Short_Literal	0x1e
00fa 4802       |H   |		Short_Literal	0x2
00fb 0099       |    |		Action	Reference_Dynamic
00fc e005       |    |		Load	0x0,0x5
00fd 1880       |    |		Execute	Package,Field_Execute,Field_Number 0x80
00fe 4801       |H   |		Short_Literal	0x1
00ff a419       |    |		Store_Unchecked	0x2,0x19
0100 e5fe       |    |		Load	0x2,-0x2
0101 e40f       |    |		Load	0x2,0xf
0102 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0103 a41a       |    |		Store_Unchecked	0x2,0x1a
0104 e5fe       |    |		Load	0x2,-0x2
0105 01db       |    |		Execute	Vector,Length
0106 680f       |h   |		Jump_Zero	0x116
0107 e5fe       |    |		Load	0x2,-0x2
0108 0092 0861  |   a|		Action	Push_String_Extended,0x861					; ".[@'spec,@_Start'c(file)]"
010a 01cc       |    |		Execute	Vector,Catenate
010b 481c       |H   |		Short_Literal	0x1c
010c 4802       |H   |		Short_Literal	0x2
010d 0099       |    |		Action	Reference_Dynamic
010e 481d       |H   |		Short_Literal	0x1d
010f 4802       |H   |		Short_Literal	0x2
0110 0099       |    |		Action	Reference_Dynamic
0111 481e       |H   |		Short_Literal	0x1e
0112 4802       |H   |		Short_Literal	0x2
0113 0099       |    |		Action	Reference_Dynamic
0114 e005       |    |		Load	0x0,0x5
0115 1880       |    |		Execute	Package,Field_Execute,Field_Number 0x80
0116 e5fd       |    |		Load	0x2,-0x3
0117 e40f       |    |		Load	0x2,0xf
0118 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0119 a41a       |    |		Store_Unchecked	0x2,0x1a
011a e5fd       |    |		Load	0x2,-0x3
011b 01db       |    |		Execute	Vector,Length
011c 680f       |h   |		Jump_Zero	0x12c
011d e5fd       |    |		Load	0x2,-0x3
011e 0092 0861  |   a|		Action	Push_String_Extended,0x861					; ".[@'spec,@_Start'c(file)]"
0120 01cc       |    |		Execute	Vector,Catenate
0121 481c       |H   |		Short_Literal	0x1c
0122 4802       |H   |		Short_Literal	0x2
0123 0099       |    |		Action	Reference_Dynamic
0124 481d       |H   |		Short_Literal	0x1d
0125 4802       |H   |		Short_Literal	0x2
0126 0099       |    |		Action	Reference_Dynamic
0127 481e       |H   |		Short_Literal	0x1e
0128 4802       |H   |		Short_Literal	0x2
0129 0099       |    |		Action	Reference_Dynamic
012a e005       |    |		Load	0x0,0x5
012b 1880       |    |		Execute	Package,Field_Execute,Field_Number 0x80
012c e5fb       |    |		Load	0x2,-0x5
012d 680c       |h   |		Jump_Zero	0x13a
012e 8424       | $  |		Call	0x2,0x24
012f 4801       |H   |		Short_Literal	0x1
0130 e005       |    |		Load	0x0,0x5
0131 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0132 0092 0862  |   b|		Action	Push_String_Extended,0x862					; "Start ordering:"
0134 e005       |    |		Load	0x0,0x5
0135 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0136 0092 0863  |   c|		Action	Push_String_Extended,0x863					; "---------------"
0138 e005       |    |		Load	0x0,0x5
0139 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
013a 8425       | %  |		Call	0x2,0x25
013b 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
013c 0000 0000  |    |		.BLANK	0000[0x4]
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 e005       |    |		Load	0x0,0x5
0145 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0146 00d8       |    |		Load_Top	At_Offset_0
0147 e00f       |    |		Load	0x0,0xf
0148 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0149 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
014a e001       |    |		Load	0x0,0x1
014b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014c e416       |    |		Load	0x2,0x16
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 e001       |    |		Load	0x0,0x1
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 e418       |    |		Load	0x2,0x18
015f e417       |    |		Load	0x2,0x17
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 e416       |    |		Load	0x2,0x16
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 e418       |    |		Load	0x2,0x18
0175 4800       |H   |		Short_Literal	0x0
0176 e605       |    |		Load	0x3,0x5
0177 e604       |    |		Load	0x3,0x4
0178 e417       |    |		Load	0x2,0x17
0179 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
017a c418       |    |		Store	0x2,0x18
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 0864  |   d|		Action	Push_String_Extended,0x864					; " is reserved: must not be used in Site initialization.  Will be ignored"
0183 01cc       |    |		Execute	Vector,Catenate
0184 e005       |    |		Load	0x0,0x5
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 e005       |    |		Load	0x0,0x5
018d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
018e 6ffa       |o   |		Jump_Zero	0x189
018f 00ce       |    |		Action	Pop_Auxiliary
0190 e419       |    |		Load	0x2,0x19
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 e40f       |    |		Load	0x2,0xf
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 e410       |    |		Load	0x2,0x10
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 e41a       |    |		Load	0x2,0x1a
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 e411       |    |		Load	0x2,0x11
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 e00f       |    |		Load	0x0,0xf
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 e00f       |    |		Load	0x0,0xf
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 e00f       |    |		Load	0x0,0xf
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 e010       |    |		Load	0x0,0x10
01dd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01de e008       |    |		Load	0x0,0x8
01df 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01e0 e009       |    |		Load	0x0,0x9
01e1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01e2 4801       |H   |		Short_Literal	0x1
01e3 4800       |H   |		Short_Literal	0x0
01e4 e008       |    |		Load	0x0,0x8
01e5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01e6 e00f       |    |		Load	0x0,0xf
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 e00f       |    |		Load	0x0,0xf
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 e00f       |    |		Load	0x0,0xf
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 e00f       |    |		Load	0x0,0xf
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 0865  |   e|		Action	Push_String_Extended,0x865					; "*** Exception raised processing "
0226 e7fe       |    |		Load	0x3,-0x2
0227 01cc       |    |		Execute	Vector,Catenate
0228 0092 0866  |   f|		Action	Push_String_Extended,0x866					; " in run context "
022a 01cc       |    |		Execute	Vector,Catenate
022b e7fd       |    |		Load	0x3,-0x3
022c 01cc       |    |		Execute	Vector,Catenate
022d 0092 0867  |   g|		Action	Push_String_Extended,0x867					; ": "
022f 01cc       |    |		Execute	Vector,Catenate
0230 4800       |H   |		Short_Literal	0x0
0231 4801       |H   |		Short_Literal	0x1
0232 e011       |    |		Load	0x0,0x11
0233 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0234 01cc       |    |		Execute	Vector,Catenate
0235 e005       |    |		Load	0x0,0x5
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 0868  |   h|		Action	Push_String_Extended,0x868					; " in context "
023c 01cc       |    |		Execute	Vector,Catenate
023d e7fd       |    |		Load	0x3,-0x3
023e 01cc       |    |		Execute	Vector,Catenate
023f 0092 0869  |   i|		Action	Push_String_Extended,0x869					; "Exception_While_Starting"
0241 4802       |H   |		Short_Literal	0x2
0242 0092 086a  |   j|		Action	Push_String_Extended,0x86a					; "Machine_Initialization_Start"
0244 e012       |    |		Load	0x0,0x12
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 e417       |    |		Load	0x2,0x17
025c 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
025d 0322       | "  |		Declare_Variable	Record
025e e416       |    |		Load	0x2,0x16
025f 0007       |    |		Action	Break_Optional
0260 e40e       |    |		Load	0x2,0xe
0261 0007       |    |		Action	Break_Optional
0262 e414       |    |		Load	0x2,0x14
0263 029f 058b  |    |		Declare_Subprogram	INIT_0588,For_Call
0265			BODY_0258:
0265 0092 086b  |   k|		Action	Push_String_Extended,0x86b					; "List of initialization items and their characteristics:"
0267 e005       |    |		Load	0x0,0x5
0268 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0269 0092 086c  |   l|		Action	Push_String_Extended,0x86c					; "-------------------------------------------------------"
026b e005       |    |		Load	0x0,0x5
026c 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
026d e602       |    |		Load	0x3,0x2
026e e418       |    |		Load	0x2,0x18
026f e417       |    |		Load	0x2,0x17
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 e417       |    |		Load	0x2,0x17
0276 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0277 a604       |    |		Store_Unchecked	0x3,0x4
0278 00db       |    |		Load_Top	At_Offset_3
0279 e418       |    |		Load	0x2,0x18
027a e417       |    |		Load	0x2,0x17
027b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
027c a603       |    |		Store_Unchecked	0x3,0x3
027d 0092 086d  |   m|		Action	Push_String_Extended,0x86d					; "Item: "
027f e604       |    |		Load	0x3,0x4
0280 e001       |    |		Load	0x0,0x1
0281 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0282 01cc       |    |		Execute	Vector,Catenate
0283 e005       |    |		Load	0x0,0x5
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 086e  |   n|		Action	Push_String_Extended,0x86e					; "      Wait   "
028b e005       |    |		Load	0x0,0x5
028c 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
028d 7804       |x   |		Jump	0x292
028e 0092 086f  |   o|		Action	Push_String_Extended,0x86f					; "      No_Wait "
0290 e005       |    |		Load	0x0,0x5
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 0870  |   p|		Action	Push_String_Extended,0x870					; "In Site or Local Directory "
0298 e005       |    |		Load	0x0,0x5
0299 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
029a 7804       |x   |		Jump	0x29f
029b 0092 0871  |   q|		Action	Push_String_Extended,0x871					; "In_Rational_Directory  "
029d e005       |    |		Load	0x0,0x5
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 0872  |   r|		Action	Push_String_Extended,0x872					; "*Undefined* "
02a5 e005       |    |		Load	0x0,0x5
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 0873  |   s|		Action	Push_String_Extended,0x873					; "Referenced_By_Others "
02ad e005       |    |		Load	0x0,0x5
02ae 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
02af 4801       |H   |		Short_Literal	0x1
02b0 e005       |    |		Load	0x0,0x5
02b1 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
02b2 0092 0874  |   t|		Action	Push_String_Extended,0x874					; "       Prerequisites: "
02b4 e005       |    |		Load	0x0,0x5
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 e001       |    |		Load	0x0,0x1
02c0 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02c1 0092 0875  |   u|		Action	Push_String_Extended,0x875					; " "
02c3 01cc       |    |		Execute	Vector,Catenate
02c4 e005       |    |		Load	0x0,0x5
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 e005       |    |		Load	0x0,0x5
02d0 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
02d1 8606       |    |		Call	0x3,0x6
02d2 e602       |    |		Load	0x3,0x2
02d3 e417       |    |		Load	0x2,0x17
02d4 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02d5 00d1       |    |		Pop_Control	Pop_Count_1
02d6 4801       |H   |		Short_Literal	0x1
02d7 e005       |    |		Load	0x0,0x5
02d8 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
02d9 00c9       |    |		Action	Pop_Auxiliary_Loop
02da e602       |    |		Load	0x3,0x2
02db e417       |    |		Load	0x2,0x17
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 4802       |H   |		Short_Literal	0x2
02e4 032a       | *  |		Declare_Type	Record,Incomplete
02e5 00d8       |    |		Load_Top	At_Offset_0
02e6 02a0       |    |		Declare_Subprogram	Null_Subprogram
02e7 4818       |H   |		Short_Literal	0x18
02e8 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
02e9 e416       |    |		Load	0x2,0x16
02ea 00d9       |    |		Load_Top	At_Offset_1
02eb 02a0       |    |		Declare_Subprogram	Null_Subprogram
02ec e602       |    |		Load	0x3,0x2
02ed 0326       | &  |		Complete_Type	Record,By_Defining
02ee 00d8       |    |		Load_Top	At_Offset_0
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 0876  |   v|		Action	Push_String_Extended,0x876					; "see !Machine.Error_Logs.Machine_Initialize"
02fb 0092 0877  |   w|		Action	Push_String_Extended,0x877					; "Errors_Detected"
02fd 4802       |H   |		Short_Literal	0x2
02fe 0092 0878  |   x|		Action	Push_String_Extended,0x878					; "Machine_Initialize_Start"
0300 e012       |    |		Load	0x0,0x12
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 031b       |    |		.CONST	0x031b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0005       |    |		.CONST	0x0005								; Number of locals
030b			INIT_0308:
030b 0092 0879  |   y|		Action	Push_String_Extended,0x879					; "!Machine.Error_Logs."
030d 00db       |    |		Load_Top	At_Offset_3
030e e013       |    |		Load	0x0,0x13
030f 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0310 01cc       |    |		Execute	Vector,Catenate
0311 0092 087a  |   z|		Action	Push_String_Extended,0x87a					; "_Log"
0313 01cc       |    |		Execute	Vector,Catenate
0314 0007       |    |		Action	Break_Optional
0315 00d8       |    |		Load_Top	At_Offset_0
0316 0007       |    |		Action	Break_Optional
0317 029f 06f3  |    |		Declare_Subprogram	INIT_06f0,For_Call
0319 029f 0723  |   #|		Declare_Subprogram	INIT_0720,For_Call
031b			BODY_0308:
031b e9fe       |    |		Load	0x4,-0x2
031c 7010       |p   |		Jump_Nonzero	0x32d
031d 0092 087b  |   {|		Action	Push_String_Extended,0x87b					; "Output => ("
031f 00db       |    |		Load_Top	At_Offset_3
0320 01cc       |    |		Execute	Vector,Catenate
0321 0092 087c  |   ||		Action	Push_String_Extended,0x87c					; "), Error => ("
0323 01cc       |    |		Execute	Vector,Catenate
0324 e802       |    |		Load	0x4,0x2
0325 01cc       |    |		Execute	Vector,Catenate
0326 0092 087d  |   }|		Action	Push_String_Extended,0x87d					; ")"
0328 01cc       |    |		Execute	Vector,Catenate
0329 e40f       |    |		Load	0x2,0xf
032a 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
032b a9fe       |    |		Store_Unchecked	0x4,-0x2
032c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
032d 8805       |    |		Call	0x4,0x5
032e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
032f 0000       |    |		.XXX[0x1]
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 e005       |    |		Load	0x0,0x5
0335 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0336 00e3       |    |		Load_Encached	Natural_Cache
0337 00e3       |    |		Load_Encached	Natural_Cache
0338 e40e       |    |		Load	0x2,0xe
0339 0007       |    |		Action	Break_Optional
033a e414       |    |		Load	0x2,0x14
033b 0007       |    |		Action	Break_Optional
033c e416       |    |		Load	0x2,0x16
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 e013       |    |		Load	0x0,0x13
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 e001       |    |		Load	0x0,0x1
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 e413       |    |		Load	0x2,0x13
0385 0322       | "  |		Declare_Variable	Record
0386 e414       |    |		Load	0x2,0x14
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 e416       |    |		Load	0x2,0x16
038d 00d9       |    |		Load_Top	At_Offset_1
038e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
038f e414       |    |		Load	0x2,0x14
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 e413       |    |		Load	0x2,0x13
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 e416       |    |		Load	0x2,0x16
03a2 00d9       |    |		Load_Top	At_Offset_1
03a3 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03a4 e414       |    |		Load	0x2,0x14
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 e418       |    |		Load	0x2,0x18
03ad e417       |    |		Load	0x2,0x17
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 e416       |    |		Load	0x2,0x16
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 e418       |    |		Load	0x2,0x18
03cc 4800       |H   |		Short_Literal	0x0
03cd e807       |    |		Load	0x4,0x7
03ce e805       |    |		Load	0x4,0x5
03cf e417       |    |		Load	0x2,0x17
03d0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03d1 c418       |    |		Store	0x2,0x18
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 e013       |    |		Load	0x0,0x13
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 e013       |    |		Load	0x0,0x13
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 087e  |   ~|		Action	Push_String_Extended,0x87e					; "_Start"
0437 e013       |    |		Load	0x0,0x13
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 e00f       |    |		Load	0x0,0xf
045d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
045e 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
045f e00f       |    |		Load	0x0,0xf
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 e014       |    |		Load	0x0,0x14
048e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
048f 00ca       |    |		Action	Exit_Nullary_Function
0490 e7fa       |    |		Load	0x3,-0x6
0491 0092 087f  |    |		Action	Push_String_Extended,0x87f					; "("
0493 e7fc       |    |		Load	0x3,-0x4
0494 01cc       |    |		Execute	Vector,Catenate
0495 0092 087d  |   }|		Action	Push_String_Extended,0x87d					; ")"
0497 01cc       |    |		Execute	Vector,Catenate
0498 e7fe       |    |		Load	0x3,-0x2
0499 e7fb       |    |		Load	0x3,-0x5
049a e014       |    |		Load	0x0,0x14
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 0880  |    |		Action	Push_String_Extended,0x880					; "\x22"
04a2 e7fd       |    |		Load	0x3,-0x3
04a3 01cc       |    |		Execute	Vector,Catenate
04a4 0092 0881  |    |		Action	Push_String_Extended,0x881					; "\x22."
04a6 01cc       |    |		Execute	Vector,Catenate
04a7 e7fe       |    |		Load	0x3,-0x2
04a8 01cc       |    |		Execute	Vector,Catenate
04a9 00ca       |    |		Action	Exit_Nullary_Function
04aa 0092 0880  |    |		Action	Push_String_Extended,0x880					; "\x22"
04ac e7fd       |    |		Load	0x3,-0x3
04ad 01cc       |    |		Execute	Vector,Catenate
04ae 0092 0881  |    |		Action	Push_String_Extended,0x881					; "\x22."
04b0 01cc       |    |		Execute	Vector,Catenate
04b1 e7fe       |    |		Load	0x3,-0x2
04b2 01cc       |    |		Execute	Vector,Catenate
04b3 0092 087f  |    |		Action	Push_String_Extended,0x87f					; "("
04b5 01cc       |    |		Execute	Vector,Catenate
04b6 e7fc       |    |		Load	0x3,-0x4
04b7 01cc       |    |		Execute	Vector,Catenate
04b8 0092 0882  |    |		Action	Push_String_Extended,0x882					; ");"
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 e014       |    |		Load	0x0,0x14
04e5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04e6 e014       |    |		Load	0x0,0x14
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 e412       |    |		Load	0x2,0x12
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 e013       |    |		Load	0x0,0x13
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 0883  |    |		Action	Push_String_Extended,0x883					; "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 0884  |    |		Action	Push_String_Extended,0x884					; "\x22,"
050a 01cc       |    |		Execute	Vector,Catenate
050b e005       |    |		Load	0x0,0x5
050c 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
050d 0092 0885  |    |		Action	Push_String_Extended,0x885					; "             Context => \x22"
050f e7f8       |    |		Load	0x3,-0x8
0510 01cc       |    |		Execute	Vector,Catenate
0511 0092 0886  |    |		Action	Push_String_Extended,0x886					; "\x22);"
0513 01cc       |    |		Execute	Vector,Catenate
0514 e005       |    |		Load	0x0,0x5
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 0887  |    |		Action	Push_String_Extended,0x887					; "Starting"
051b 4800       |H   |		Short_Literal	0x0
051c 0092 086a  |   j|		Action	Push_String_Extended,0x86a					; "Machine_Initialization_Start"
051e e012       |    |		Load	0x0,0x12
051f 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0520 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "<ERRORS>"
0522 e7fa       |    |		Load	0x3,-0x6
0523 e00e       |    |		Load	0x0,0xe
0524 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0525 0092 085f  |   _|		Action	Push_String_Extended,0x85f					; "<PROFILE>"
0527 e7f8       |    |		Load	0x3,-0x8
0528 e802       |    |		Load	0x4,0x2
0529 e014       |    |		Load	0x0,0x14
052a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
052b 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "<ERRORS>"
052d e411       |    |		Load	0x2,0x11
052e 0227       | '  |		Execute	Access,All_Reference
052f e00e       |    |		Load	0x0,0xe
0530 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0531 00da       |    |		Load_Top	At_Offset_2
0532 0092 0888  |    |		Action	Push_String_Extended,0x888					; "Finishing"
0534 4800       |H   |		Short_Literal	0x0
0535 0092 086a  |   j|		Action	Push_String_Extended,0x86a					; "Machine_Initialization_Start"
0537 e012       |    |		Load	0x0,0x12
0538 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0539 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
053a 0092 0889  |    |		Action	Push_String_Extended,0x889					; "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 0884  |    |		Action	Push_String_Extended,0x884					; "\x22,"
0542 01cc       |    |		Execute	Vector,Catenate
0543 e005       |    |		Load	0x0,0x5
0544 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0545 0092 088a  |    |		Action	Push_String_Extended,0x88a					; "                 Context => \x22"
0547 e7f8       |    |		Load	0x3,-0x8
0548 01cc       |    |		Execute	Vector,Catenate
0549 0092 0884  |    |		Action	Push_String_Extended,0x884					; "\x22,"
054b 01cc       |    |		Execute	Vector,Catenate
054c e005       |    |		Load	0x0,0x5
054d 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
054e 0092 088b  |    |		Action	Push_String_Extended,0x88b					; "                 Options => \x22"
0550 e7f9       |    |		Load	0x3,-0x7
0551 01cc       |    |		Execute	Vector,Catenate
0552 0092 0886  |    |		Action	Push_String_Extended,0x886					; "\x22);"
0554 01cc       |    |		Execute	Vector,Catenate
0555 e005       |    |		Load	0x0,0x5
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 088c  |    |		Action	Push_String_Extended,0x88c					; "Starting_No_Wait"
055c 4800       |H   |		Short_Literal	0x0
055d 0092 086a  |   j|		Action	Push_String_Extended,0x86a					; "Machine_Initialization_Start"
055f e012       |    |		Load	0x0,0x12
0560 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0561 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "<ERRORS>"
0563 e7fa       |    |		Load	0x3,-0x6
0564 e00e       |    |		Load	0x0,0xe
0565 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0566 00d8       |    |		Load_Top	At_Offset_0
0567 e014       |    |		Load	0x0,0x14
0568 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0569 0092 085f  |   _|		Action	Push_String_Extended,0x85f					; "<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 e014       |    |		Load	0x0,0x14
0571 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0572 005b       | [  |		Store_Top	Discrete,At_Offset_3
0573 c804       |    |		Store	0x4,0x4
0574 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "<ERRORS>"
0576 e411       |    |		Load	0x2,0x11
0577 0227       | '  |		Execute	Access,All_Reference
0578 e00e       |    |		Load	0x0,0xe
0579 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
057a 00d8       |    |		Load_Top	At_Offset_0
057b e014       |    |		Load	0x0,0x14
057c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
057d 7004       |p   |		Jump_Nonzero	0x582
057e 00d8       |    |		Load_Top	At_Offset_0
057f e012       |    |		Load	0x0,0x12
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 088d  |    |		Action	Push_String_Extended,0x88d					; "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 088e  |    |		Action	Push_String_Extended,0x88e					; "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 088f  |    |		Action	Push_String_Extended,0x88f					; "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 0890  |    |		Action	Push_String_Extended,0x890					; "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 0891  |    |		Action	Push_String_Extended,0x891					; "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 0892  |    |		Action	Push_String_Extended,0x892					; "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 0893  |    |		Action	Push_String_Extended,0x893					; "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 e417       |    |		Load	0x2,0x17
05bc 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
05bd 0322       | "  |		Declare_Variable	Record
05be e603       |    |		Load	0x3,0x3
05bf 0007       |    |		Action	Break_Optional
05c0 e40e       |    |		Load	0x2,0xe
05c1 0007       |    |		Action	Break_Optional
05c2 e416       |    |		Load	0x2,0x16
05c3 0007       |    |		Action	Break_Optional
05c4 e603       |    |		Load	0x3,0x3
05c5 0007       |    |		Action	Break_Optional
05c6			BODY_05b8:
05c6 e802       |    |		Load	0x4,0x2
05c7 e418       |    |		Load	0x2,0x18
05c8 e417       |    |		Load	0x2,0x17
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 e417       |    |		Load	0x2,0x17
05cf 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
05d0 a804       |    |		Store_Unchecked	0x4,0x4
05d1 00db       |    |		Load_Top	At_Offset_3
05d2 e418       |    |		Load	0x2,0x18
05d3 e417       |    |		Load	0x2,0x17
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 e602       |    |		Load	0x3,0x2
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 e603       |    |		Load	0x3,0x3
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 e417       |    |		Load	0x2,0x17
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 e417       |    |		Load	0x2,0x17
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 e603       |    |		Load	0x3,0x3
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 e603       |    |		Load	0x3,0x3
0615 a806       |    |		Store_Unchecked	0x4,0x6
0616 4800       |H   |		Short_Literal	0x0
0617 a807       |    |		Store_Unchecked	0x4,0x7
0618 e603       |    |		Load	0x3,0x3
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 8423       | #  |		Call	0x2,0x23
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 8423       | #  |		Call	0x2,0x23
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 8423       | #  |		Call	0x2,0x23
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 8423       | #  |		Call	0x2,0x23
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 8423       | #  |		Call	0x2,0x23
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 8423       | #  |		Call	0x2,0x23
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 8423       | #  |		Call	0x2,0x23
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 e001       |    |		Load	0x0,0x1
0664 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0665 8422       | "  |		Call	0x2,0x22
0666 7816       |x   |		Jump	0x67d
0667 4801       |H   |		Short_Literal	0x1
0668 a40c       |    |		Store_Unchecked	0x2,0xc
0669 e00b       |    |		Load	0x0,0xb
066a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
066b 4807       |H   |		Short_Literal	0x7
066c 0092 0894  |    |		Action	Push_String_Extended,0x894					; "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 e001       |    |		Load	0x0,0x1
0674 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0675 01cc       |    |		Execute	Vector,Catenate
0676 0092 0895  |    |		Action	Push_String_Extended,0x895					; " in "
0678 01cc       |    |		Execute	Vector,Catenate
0679 e9fe       |    |		Load	0x4,-0x2
067a 01cc       |    |		Execute	Vector,Catenate
067b e00c       |    |		Load	0x0,0xc
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 e00b       |    |		Load	0x0,0xb
06bc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
06bd 4807       |H   |		Short_Literal	0x7
06be 0092 0896  |    |		Action	Push_String_Extended,0x896					; "Loop in dependencies discovered.  Will now ignore prerequisites."
06c0 e00c       |    |		Load	0x0,0xc
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 e603       |    |		Load	0x3,0x3
06cc 0007       |    |		Action	Break_Optional
06cd			BODY_06c8:
06cd e603       |    |		Load	0x3,0x3
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 e603       |    |		Load	0x3,0x3
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 e603       |    |		Load	0x3,0x3
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 e603       |    |		Load	0x3,0x3
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 8804       |    |		Call	0x4,0x4
072a 0092 0897  |    |		Action	Push_String_Extended,0x897					; "Error="
072c e013       |    |		Load	0x0,0x13
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 8804       |    |		Call	0x4,0x4
0734 0092 0898  |    |		Action	Push_String_Extended,0x898					; "Output="
0736 e013       |    |		Load	0x0,0x13
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 0899  |    |		Action	Push_String_Extended,0x899					; ", Output => ("
0746 01cc       |    |		Execute	Vector,Catenate
0747 e803       |    |		Load	0x4,0x3
0748 01cc       |    |		Execute	Vector,Catenate
0749 0092 087d  |   }|		Action	Push_String_Extended,0x87d					; ")"
074b 01cc       |    |		Execute	Vector,Catenate
074c e40f       |    |		Load	0x2,0xf
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 089a  |    |		Action	Push_String_Extended,0x89a					; ", Error => ("
0755 01cc       |    |		Execute	Vector,Catenate
0756 e802       |    |		Load	0x4,0x2
0757 01cc       |    |		Execute	Vector,Catenate
0758 0092 087d  |   }|		Action	Push_String_Extended,0x87d					; ")"
075a 01cc       |    |		Execute	Vector,Catenate
075b e40f       |    |		Load	0x2,0xf
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 0899  |    |		Action	Push_String_Extended,0x899					; ", Output => ("
0762 01cc       |    |		Execute	Vector,Catenate
0763 e803       |    |		Load	0x4,0x3
0764 01cc       |    |		Execute	Vector,Catenate
0765 0092 087c  |   ||		Action	Push_String_Extended,0x87c					; "), Error => ("
0767 01cc       |    |		Execute	Vector,Catenate
0768 e802       |    |		Load	0x4,0x2
0769 01cc       |    |		Execute	Vector,Catenate
076a 0092 087d  |   }|		Action	Push_String_Extended,0x87d					; ")"
076c 01cc       |    |		Execute	Vector,Catenate
076d e40f       |    |		Load	0x2,0xf
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 e013       |    |		Load	0x0,0x13
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 0875  |   u|		Action	Push_String_Extended,0x875					; " "
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 e013       |    |		Load	0x0,0x13
07b7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
07b8 01cc       |    |		Execute	Vector,Catenate
07b9 e40f       |    |		Load	0x2,0xf
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 e013       |    |		Load	0x0,0x13
07c4 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
07c5 e40f       |    |		Load	0x2,0xf
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 089b  |    |		Action	Push_String_Extended,0x89b					; "    "
080f 00db       |    |		Load_Top	At_Offset_3
0810 01cc       |    |		Execute	Vector,Catenate
0811 0092 089c  |    |		Action	Push_String_Extended,0x89c					; " => "
0813 01cc       |    |		Execute	Vector,Catenate
0814 ebfe       |    |		Load	0x5,-0x2
0815 0227       | '  |		Execute	Access,All_Reference
0816 01cc       |    |		Execute	Vector,Catenate
0817 e005       |    |		Load	0x0,0x5
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 e603       |    |		Load	0x3,0x3
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 00a4       |    |		.STRTAB	0x00a4->0x089e							; "--|Prerequisite"
084d 00b1       |    |		.STRTAB	0x00b1->0x08a5							; "--|Wait"
084e 00b6       |    |		.STRTAB	0x00b6->0x08a9							; "--|No_Wait"
084f 00be       |    |		.STRTAB	0x00be->0x08ae							; "--|Parameters"
0850 00c9       |    |		.STRTAB	0x00c9->0x08b4							; "--|Options"
0851 00d1       |    |		.STRTAB	0x00d1->0x08b9							; "--|Procedure_Name"
0852 00e0       |    |		.STRTAB	0x00e0->0x08c2							; "--|Procedure_Context"
0853 00f2       |    |		.STRTAB	0x00f2->0x08cc							; "--|Subsystem"
0854 00fc       |    |		.STRTAB	0x00fc->0x08d2							; "--|Activity"
0855 0105       |    |		.STRTAB	0x0105->0x08d7							; "--|Context"
0856 010d       |    |		.STRTAB	0x010d->0x08dc							; "!Machine.Error_Logs"
0857 011e       |    |		.STRTAB	0x011e->0x08e6							; "!Machine.Release.Current.Activity"
0858 013d       | =  |		.STRTAB	0x013d->0x08f6							; "@"
0859 013c       | <  |		.STRTAB	0x013c->0x08f7							; "["
085a 013b       | ;  |		.STRTAB	0x013b->0x08f7							; ","
085b 013a       | :  |		.STRTAB	0x013a->0x08f8							; "].["
085c 013b       | ;  |		.STRTAB	0x013b->0x08f9							; "]"
085d 013a       | :  |		.STRTAB	0x013a->0x08fa							; "!Machine.Error_Logs.Machine_Initialize"
085e 015e       | ^  |		.STRTAB	0x015e->0x090d							; "Could not enable privileges."
085f 0178       | x  |		.STRTAB	0x0178->0x091b							; "<PROFILE>"
0860 017f       |    |		.STRTAB	0x017f->0x091f							; "<ERRORS>"
0861 0185       |    |		.STRTAB	0x0185->0x0923							; ".[@'spec,@_Start'c(file)]"
0862 019c       |    |		.STRTAB	0x019c->0x0930							; "Start ordering:"
0863 01a9       |    |		.STRTAB	0x01a9->0x0937							; "---------------"
0864 01b6       |    |		.STRTAB	0x01b6->0x093f							; " is reserved: must not be used in Site initialization.  Will be ignored"
0865 01fb       |    |		.STRTAB	0x01fb->0x0962							; "*** Exception raised processing "
0866 0219       |    |		.STRTAB	0x0219->0x0972							; " in run context "
0867 0227       | '  |		.STRTAB	0x0227->0x097a							; ": "
0868 0227       | '  |		.STRTAB	0x0227->0x097b							; " in context "
0869 0231       | 1  |		.STRTAB	0x0231->0x0981							; "Exception_While_Starting"
086a 0247       | G  |		.STRTAB	0x0247->0x098d							; "Machine_Initialization_Start"
086b 0261       | a  |		.STRTAB	0x0261->0x099b							; "List of initialization items and their characteristics:"
086c 0296       |    |		.STRTAB	0x0296->0x09b7							; "-------------------------------------------------------"
086d 02cb       |    |		.STRTAB	0x02cb->0x09d2							; "Item: "
086e 02cf       |    |		.STRTAB	0x02cf->0x09d5							; "      Wait   "
086f 02da       |    |		.STRTAB	0x02da->0x09dc							; "      No_Wait "
0870 02e6       |    |		.STRTAB	0x02e6->0x09e3							; "In Site or Local Directory "
0871 02ff       |    |		.STRTAB	0x02ff->0x09f0							; "In_Rational_Directory  "
0872 0314       |    |		.STRTAB	0x0314->0x09fc							; "*Undefined* "
0873 031e       |    |		.STRTAB	0x031e->0x0a02							; "Referenced_By_Others "
0874 0331       | 1  |		.STRTAB	0x0331->0x0a0c							; "       Prerequisites: "
0875 0345       | E  |		.STRTAB	0x0345->0x0a17							; " "
0876 0344       | D  |		.STRTAB	0x0344->0x0a18							; "see !Machine.Error_Logs.Machine_Initialize"
0877 036c       | l  |		.STRTAB	0x036c->0x0a2d							; "Errors_Detected"
0878 0379       | y  |		.STRTAB	0x0379->0x0a34							; "Machine_Initialize_Start"
0879 038f       |    |		.STRTAB	0x038f->0x0a40							; "!Machine.Error_Logs."
087a 03a1       |    |		.STRTAB	0x03a1->0x0a4a							; "_Log"
087b 03a3       |    |		.STRTAB	0x03a3->0x0a4c							; "Output => ("
087c 03ac       |    |		.STRTAB	0x03ac->0x0a52							; "), Error => ("
087d 03b7       |    |		.STRTAB	0x03b7->0x0a58							; ")"
087e 03b6       |    |		.STRTAB	0x03b6->0x0a59							; "_Start"
087f 03ba       |    |		.STRTAB	0x03ba->0x0a5c							; "("
0880 03b9       |    |		.STRTAB	0x03b9->0x0a5c							; "\x22"
0881 03b8       |    |		.STRTAB	0x03b8->0x0a5d							; "\x22."
0882 03b8       |    |		.STRTAB	0x03b8->0x0a5e							; ");"
0883 03b8       |    |		.STRTAB	0x03b8->0x0a5f							; "Program.Run (\x22"
0884 03c4       |    |		.STRTAB	0x03c4->0x0a66							; "\x22,"
0885 03c4       |    |		.STRTAB	0x03c4->0x0a67							; "             Context => \x22"
0886 03db       |    |		.STRTAB	0x03db->0x0a73							; "\x22);"
0887 03dc       |    |		.STRTAB	0x03dc->0x0a75							; "Starting"
0888 03e2       |    |		.STRTAB	0x03e2->0x0a79							; "Finishing"
0889 03e9       |    |		.STRTAB	0x03e9->0x0a7d							; "Program.Run_Job (\x22"
088a 03f9       |    |		.STRTAB	0x03f9->0x0a86							; "                 Context => \x22"
088b 0414       |    |		.STRTAB	0x0414->0x0a95							; "                 Options => \x22"
088c 042f       | /  |		.STRTAB	0x042f->0x0aa3							; "Starting_No_Wait"
088d 043d       | =  |		.STRTAB	0x043d->0x0aab							; "Parameters       "
088e 044c       | L  |		.STRTAB	0x044c->0x0ab4							; "Options          "
088f 045b       | [  |		.STRTAB	0x045b->0x0abc							; "Activity         "
0890 046a       | j  |		.STRTAB	0x046a->0x0ac5							; "Procedure_Context"
0891 0479       | y  |		.STRTAB	0x0479->0x0acd							; "Procedure_Name   "
0892 0488       |    |		.STRTAB	0x0488->0x0ad6							; "Subsystem        "
0893 0497       |    |		.STRTAB	0x0497->0x0ade							; "Context          "
0894 04a6       |    |		.STRTAB	0x04a6->0x0ae7							; "Undefined Initialization Item: "
0895 04c3       |    |		.STRTAB	0x04c3->0x0af6							; " in "
0896 04c5       |    |		.STRTAB	0x04c5->0x0af8							; "Loop in dependencies discovered.  Will now ignore prerequisites."
0897 0503       |    |		.STRTAB	0x0503->0x0b18							; "Error="
0898 0507       |    |		.STRTAB	0x0507->0x0b1b							; "Output="
0899 050c       |    |		.STRTAB	0x050c->0x0b1f							; ", Output => ("
089a 0517       |    |		.STRTAB	0x0517->0x0b25							; ", Error => ("
089b 0521       | !  |		.STRTAB	0x0521->0x0b2b							; "    "
089c 0523       | #  |		.STRTAB	0x0523->0x0b2d							; " => "
089d 0525       | %  |		.STREND 0x0525->0x0b2f
089e 2d2d 7c50  |--|P|		.STRTAB_STRINGS
0b30 ; --------------------------------------------------------------------------------------
0b30 ; Debug Table
0b30 ; --------------------------------------------------------------------------------------
0b30 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0xacee,0x0000,0x0001,0x0000
0b36 0000 0000  |    |		.BLANK	0000[0x2b]
0b61 8080 0e00  |    |		.XXX[0x2]
0b63 0000 0000  |    |		.BLANK	0000[0x8]
0b6b 0a5b 1800  | [  |		.XXX[0x4]
0b6d 0141 8a80  | A  |
0b6f 0000 0000  |    |		.BLANK	0000[0x5d]
0bcc 0002 0200  |    |		.XXX[0x3]
0bce 3800       |8   |
0bcf 0000 0000  |    |		.BLANK	0000[0x8]
0bd7 19d8 4000  |  @ |		.XXX[0x14]
0bd9 0313 a600  |    |
0bdb 0000 4faa  |  O |
0bdd c000 0000  |    |
0bdf 067d 2c00  | }, |
0be1 cc01 8e0c  |    |
0be3 609e 0000  |`   |
0be5 0000 0000  |    |
0be7 30c0 1a1f  |0   |
0be9 a006 7704  |  w |
0beb 0000 0000  |    |		.BLANK	0000[0x4]
0bef 0006 7c38  |  |8|		.XXX[0xb]
0bf1 0000 cee0  |    |
0bf3 8000 0010  |    |
0bf5 6300 f006  |c   |
0bf7 7898 0000  |x   |
0bf9 0048       | H  |
0bfa 0000 0000  |    |		.BLANK	0000[0x4]
0bfe 0006 7ff8  |    |		.XXX[0x2]