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

⟦1369dcc9c⟧

    Length: 9216 (0x2400)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0bf8df

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 10e8       |    |		.CONST	0x10e8								; 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 8009       |    |		.CONST	0x8009								; 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 013f       | ?  |		.CONST	0x013f								; Address of begin
0019 01e3       |    |		.CONST	0x01e3								; Address of exception handler
001a 003a       | :  |		.CONST	0x003a								; Number of locals
001b			INIT_0018:
001b 0093 0000  |    |		push_full_address	0x0
001d 61ee       |a   |		Indirect_Literal	Discrete,0x20c,{0x80000000, 0x00010000}
001e 0273       | s  |		Execute	Discrete,Plus
001f 0007       |    |		Action	Break_Optional
0020 4801       |H   |		Short_Literal	0x1
0021 e002       |    |		Load	0x0,0x2
0022 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0023 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0024 e5ff       |    |		Load	0x2,-0x1
0025 e002       |    |		Load	0x0,0x2
0026 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0027 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0028 e002       |    |		Load	0x0,0x2
0029 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
002a 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
002b e003       |    |		Load	0x0,0x3
002c 1856       | V  |		Execute	Package,Field_Execute,Field_Number 0x56
002d 0092 08aa  |    |		Action	Push_String_Extended,0x8aa					; "!Machine.Release.Archive.Environment."
002f 00da       |    |		Load_Top	At_Offset_2
0030 01cc       |    |		Execute	Vector,Catenate
0031 0007       |    |		Action	Break_Optional
0032 00d8       |    |		Load_Top	At_Offset_0
0033 0092 08ab  |    |		Action	Push_String_Extended,0x8ab					; ".Segments"
0035 01cc       |    |		Execute	Vector,Catenate
0036 0007       |    |		Action	Break_Optional
0037 00d9       |    |		Load_Top	At_Offset_1
0038 0092 08ac  |    |		Action	Push_String_Extended,0x8ac					; ".Dfs_Image"
003a 01cc       |    |		Execute	Vector,Catenate
003b 0007       |    |		Action	Break_Optional
003c e5ff       |    |		Load	0x2,-0x1
003d 0092 08ad  |    |		Action	Push_String_Extended,0x8ad					; ".Internal"
003f 01cc       |    |		Execute	Vector,Catenate
0040 0007       |    |		Action	Break_Optional
0041 00d8       |    |		Load_Top	At_Offset_0
0042 8004       |    |		Call	0x0,0x4
0043 00e1       |    |		Load_Encached	Boolean_Cache
0044 03f1       |    |		Declare_Variable	Discrete,With_Value
0045 e5ff       |    |		Load	0x2,-0x1
0046 0092 08ae  |    |		Action	Push_String_Extended,0x8ae					; ".Archives."
0048 01cc       |    |		Execute	Vector,Catenate
0049 0007       |    |		Action	Break_Optional
004a e5ff       |    |		Load	0x2,-0x1
004b 0092 08af  |    |		Action	Push_String_Extended,0x8af					; ".Lists."
004d 01cc       |    |		Execute	Vector,Catenate
004e 0007       |    |		Action	Break_Optional
004f e5ff       |    |		Load	0x2,-0x1
0050 0092 08b0  |    |		Action	Push_String_Extended,0x8b0					; ".Logs."
0052 01cc       |    |		Execute	Vector,Catenate
0053 0007       |    |		Action	Break_Optional
0054 e5ff       |    |		Load	0x2,-0x1
0055 0092 08b1  |    |		Action	Push_String_Extended,0x8b1					; ".Universe"
0057 01cc       |    |		Execute	Vector,Catenate
0058 0007       |    |		Action	Break_Optional
0059 e408       |    |		Load	0x2,0x8
005a 0092 08ae  |    |		Action	Push_String_Extended,0x8ae					; ".Archives."
005c 01cc       |    |		Execute	Vector,Catenate
005d 0007       |    |		Action	Break_Optional
005e e408       |    |		Load	0x2,0x8
005f 0092 08af  |    |		Action	Push_String_Extended,0x8af					; ".Lists."
0061 01cc       |    |		Execute	Vector,Catenate
0062 0007       |    |		Action	Break_Optional
0063 e408       |    |		Load	0x2,0x8
0064 0092 08b0  |    |		Action	Push_String_Extended,0x8b0					; ".Logs."
0066 01cc       |    |		Execute	Vector,Catenate
0067 0007       |    |		Action	Break_Optional
0068 e408       |    |		Load	0x2,0x8
0069 0092 08b1  |    |		Action	Push_String_Extended,0x8b1					; ".Universe"
006b 01cc       |    |		Execute	Vector,Catenate
006c 0007       |    |		Action	Break_Optional
006d 0092 08b2  |    |		Action	Push_String_Extended,0x8b2					; "Updated_Units"
006f 0092 08b3  |    |		Action	Push_String_Extended,0x8b3					; "Units_To_Be_Updated"
0071 0092 08b4  |    |		Action	Push_String_Extended,0x8b4					; "Forced_Units"
0073 0092 08b5  |    |		Action	Push_String_Extended,0x8b5					; "Banned_Units"
0075 0092 08b6  |    |		Action	Push_String_Extended,0x8b6					; "Incremental_Update_Directives"
0077 0092 08b7  |    |		Action	Push_String_Extended,0x8b7					; "Changes_To_Parameter_Defaults"
0079 0092 08b8  |    |		Action	Push_String_Extended,0x8b8					; "Worlds_Of_The_Universe"
007b 0092 08b9  |    |		Action	Push_String_Extended,0x8b9					; "Release_Subs"
007d 0092 08ba  |    |		Action	Push_String_Extended,0x8ba					; "[!Commands.Abbreviations.@, !Machine.[Editor_Data.@_Commands]]'Body"
007f e40c       |    |		Load	0x2,0xc
0080 0092 08bb  |    |		Action	Push_String_Extended,0x8bb					; "Current_Install_Step"
0082 01cc       |    |		Execute	Vector,Catenate
0083 0007       |    |		Action	Break_Optional
0084 e005       |    |		Load	0x0,0x5
0085 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0086 02c7       |    |		Declare_Variable	Any
0087 00d8       |    |		Load_Top	At_Offset_0
0088 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0089 e5ff       |    |		Load	0x2,-0x1
008a 0092 08bc  |    |		Action	Push_String_Extended,0x8bc					; ".Master_Log_File"
008c 01cc       |    |		Execute	Vector,Catenate
008d 0007       |    |		Action	Break_Optional
008e 485f       |H_  |		Short_Literal	0x5f
008f 4800       |H   |		Short_Literal	0x0
0090 4803       |H   |		Short_Literal	0x3
0091 4804       |H   |		Short_Literal	0x4
0092 e006       |    |		Load	0x0,0x6
0093 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0094 e006       |    |		Load	0x0,0x6
0095 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0096 01ca       |    |		Execute	Vector,Prepend
0097 0007       |    |		Action	Break_Optional
0098 e40c       |    |		Load	0x2,0xc
0099 0092 08bd  |    |		Action	Push_String_Extended,0x8bd					; "Install_Product"
009b 01cc       |    |		Execute	Vector,Catenate
009c 00d9       |    |		Load_Top	At_Offset_1
009d 01cc       |    |		Execute	Vector,Catenate
009e 0007       |    |		Action	Break_Optional
009f 0093 0000  |    |		push_full_address	0x0
00a1 6166       |af  |		Indirect_Literal	Discrete,0x208,{0x80000000, 0x00020000}
00a2 0273       | s  |		Execute	Discrete,Plus
00a3 e007       |    |		Load	0x0,0x7
00a4 0273       | s  |		Execute	Discrete,Plus
00a5 e008       |    |		Load	0x0,0x8
00a6 0273       | s  |		Execute	Discrete,Plus
00a7 00db       |    |		Load_Top	At_Offset_3
00a8 00da       |    |		Load_Top	At_Offset_2
00a9 e009       |    |		Load	0x0,0x9
00aa 0387       |    |		Declare_Variable	Package
00ab 00d8       |    |		Load_Top	At_Offset_0
00ac 020f       |    |		Execute	Module,Activate
00ad e00a       |    |		Load	0x0,0xa
00ae 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00af 02c7       |    |		Declare_Variable	Any
00b0 e00a       |    |		Load	0x0,0xa
00b1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00b2 a421       | !  |		Store_Unchecked	0x2,0x21
00b3 e00a       |    |		Load	0x0,0xa
00b4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00b5 02c7       |    |		Declare_Variable	Any
00b6 0092 08be  |    |		Action	Push_String_Extended,0x8be					; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
00b8 e00a       |    |		Load	0x0,0xa
00b9 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
00ba a422       | "  |		Store_Unchecked	0x2,0x22
00bb e00b       |    |		Load	0x0,0xb
00bc 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00bd 00e1       |    |		Load_Encached	Boolean_Cache
00be 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00bf 00e1       |    |		Load_Encached	Boolean_Cache
00c0 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00c1 e00c       |    |		Load	0x0,0xc
00c2 0322       | "  |		Declare_Variable	Record
00c3 00d8       |    |		Load_Top	At_Offset_0
00c4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00c5 4800       |H   |		Short_Literal	0x0
00c6 480c       |H   |		Short_Literal	0xc
00c7 029f 0213  |    |		Declare_Subprogram	INIT_0210,For_Call
00c9 03fd       |    |		Declare_Type	Discrete,Defined
00ca e00d       |    |		Load	0x0,0xd
00cb e00e       |    |		Load	0x0,0xe
00cc 00da       |    |		Load_Top	At_Offset_2
00cd 4800       |H   |		Short_Literal	0x0
00ce 4801       |H   |		Short_Literal	0x1
00cf 480c       |H   |		Short_Literal	0xc
00d0 0092 08bf  |    |		Action	Push_String_Extended,0x8bf					; "Eedb_Update..Internal_Only => Boolean"
00d2 00ea       |    |		Load_Encached	Null_String_Cache
00d3 0092 08c0  |    |		Action	Push_String_Extended,0x8c0					; "Pre_Demote => Pre-Demote"
00d5 4801       |H   |		Short_Literal	0x1
00d6 480c       |H   |		Short_Literal	0xc
00d7 e00f       |    |		Load	0x0,0xf
00d8 0387       |    |		Declare_Variable	Package
00d9 00d8       |    |		Load_Top	At_Offset_0
00da 020f       |    |		Execute	Module,Activate
00db e5fe       |    |		Load	0x2,-0x2
00dc 0092 08c1  |    |		Action	Push_String_Extended,0x8c1					; ", backup"
00de 01cc       |    |		Execute	Vector,Catenate
00df 00d9       |    |		Load_Top	At_Offset_1
00e0 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00e1 4801       |H   |		Short_Literal	0x1
00e2 4806       |H   |		Short_Literal	0x6
00e3 00da       |    |		Load_Top	At_Offset_2
00e4 e428       | (  |		Load	0x2,0x28
00e5 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
00e6 00e1       |    |		Load_Encached	Boolean_Cache
00e7 03f1       |    |		Declare_Variable	Discrete,With_Value
00e8 4801       |H   |		Short_Literal	0x1
00e9 4801       |H   |		Short_Literal	0x1
00ea 00db       |    |		Load_Top	At_Offset_3
00eb e428       | (  |		Load	0x2,0x28
00ec 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
00ed 00e1       |    |		Load_Encached	Boolean_Cache
00ee 03f1       |    |		Declare_Variable	Discrete,With_Value
00ef 4801       |H   |		Short_Literal	0x1
00f0 4802       |H   |		Short_Literal	0x2
00f1 e429       | )  |		Load	0x2,0x29
00f2 e428       | (  |		Load	0x2,0x28
00f3 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
00f4 00e1       |    |		Load_Encached	Boolean_Cache
00f5 03f1       |    |		Declare_Variable	Discrete,With_Value
00f6 4801       |H   |		Short_Literal	0x1
00f7 4803       |H   |		Short_Literal	0x3
00f8 e429       | )  |		Load	0x2,0x29
00f9 e428       | (  |		Load	0x2,0x28
00fa 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
00fb 00e1       |    |		Load_Encached	Boolean_Cache
00fc 03f1       |    |		Declare_Variable	Discrete,With_Value
00fd 4801       |H   |		Short_Literal	0x1
00fe 4804       |H   |		Short_Literal	0x4
00ff e429       | )  |		Load	0x2,0x29
0100 e428       | (  |		Load	0x2,0x28
0101 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0102 00e1       |    |		Load_Encached	Boolean_Cache
0103 03f1       |    |		Declare_Variable	Discrete,With_Value
0104 4801       |H   |		Short_Literal	0x1
0105 4805       |H   |		Short_Literal	0x5
0106 e429       | )  |		Load	0x2,0x29
0107 e428       | (  |		Load	0x2,0x28
0108 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0109 00e1       |    |		Load_Encached	Boolean_Cache
010a 03f1       |    |		Declare_Variable	Discrete,With_Value
010b 4801       |H   |		Short_Literal	0x1
010c 480a       |H   |		Short_Literal	0xa
010d e429       | )  |		Load	0x2,0x29
010e e428       | (  |		Load	0x2,0x28
010f 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0110 00e1       |    |		Load_Encached	Boolean_Cache
0111 03f1       |    |		Declare_Variable	Discrete,With_Value
0112 4800       |H   |		Short_Literal	0x0
0113 4807       |H   |		Short_Literal	0x7
0114 e429       | )  |		Load	0x2,0x29
0115 e428       | (  |		Load	0x2,0x28
0116 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0117 00e1       |    |		Load_Encached	Boolean_Cache
0118 03f1       |    |		Declare_Variable	Discrete,With_Value
0119 4801       |H   |		Short_Literal	0x1
011a 4808       |H   |		Short_Literal	0x8
011b e429       | )  |		Load	0x2,0x29
011c e428       | (  |		Load	0x2,0x28
011d 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
011e 00e1       |    |		Load_Encached	Boolean_Cache
011f 03f1       |    |		Declare_Variable	Discrete,With_Value
0120 4800       |H   |		Short_Literal	0x0
0121 480c       |H   |		Short_Literal	0xc
0122 e429       | )  |		Load	0x2,0x29
0123 e428       | (  |		Load	0x2,0x28
0124 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0125 00e1       |    |		Load_Encached	Boolean_Cache
0126 03f1       |    |		Declare_Variable	Discrete,With_Value
0127 4800       |H   |		Short_Literal	0x0
0128 4809       |H   |		Short_Literal	0x9
0129 e429       | )  |		Load	0x2,0x29
012a e428       | (  |		Load	0x2,0x28
012b 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
012c 00e1       |    |		Load_Encached	Boolean_Cache
012d 03f1       |    |		Declare_Variable	Discrete,With_Value
012e 4800       |H   |		Short_Literal	0x0
012f 480b       |H   |		Short_Literal	0xb
0130 e429       | )  |		Load	0x2,0x29
0131 e428       | (  |		Load	0x2,0x28
0132 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0133 00e1       |    |		Load_Encached	Boolean_Cache
0134 03f1       |    |		Declare_Variable	Discrete,With_Value
0135 029f 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Call
0137 029f 028b  |    |		Declare_Subprogram	INIT_0288,For_Call
0139 029f 0353  |   S|		Declare_Subprogram	INIT_0350,For_Call
013b 029f 060b  |    |		Declare_Subprogram	INIT_0608,For_Call
013d 029f 0763  |   c|		Declare_Subprogram	INIT_0760,For_Call
013f			BODY_0018:
013f e00a       |    |		Load	0x0,0xa
0140 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0141 4800       |H   |		Short_Literal	0x0
0142 0092 08c2  |    |		Action	Push_String_Extended,0x8c2					; "[Install_Product (Release_World => \x22"
0144 e5ff       |    |		Load	0x2,-0x1
0145 01cc       |    |		Execute	Vector,Catenate
0146 0092 08c3  |    |		Action	Push_String_Extended,0x8c3					; "\x22, Options => \x22"
0148 01cc       |    |		Execute	Vector,Catenate
0149 e5fe       |    |		Load	0x2,-0x2
014a 01cc       |    |		Execute	Vector,Catenate
014b 0092 08c4  |    |		Action	Push_String_Extended,0x8c4					; "\x22);]"
014d 01cc       |    |		Execute	Vector,Catenate
014e e010       |    |		Load	0x0,0x10
014f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0150 4801       |H   |		Short_Literal	0x1
0151 e00b       |    |		Load	0x0,0xb
0152 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0153 e00b       |    |		Load	0x0,0xb
0154 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0155 7009       |p   |		Jump_Nonzero	0x15f
0156 e00a       |    |		Load	0x0,0xa
0157 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0158 4805       |H   |		Short_Literal	0x5
0159 0092 08c5  |    |		Action	Push_String_Extended,0x8c5					; "Aborting environment installation: Could not set PRIVILEGED MODE."
015b e010       |    |		Load	0x0,0x10
015c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
015d e402       |    |		Load	0x2,0x2
015e 0257       | W  |		Execute	Discrete,Raise
015f e40b       |    |		Load	0x2,0xb
0160 0092 08c6  |    |		Action	Push_String_Extended,0x8c6					; "Combined_Mload"
0162 01cc       |    |		Execute	Vector,Catenate
0163 8004       |    |		Call	0x0,0x4
0164 7019       |p   |		Jump_Nonzero	0x17e
0165 e00a       |    |		Load	0x0,0xa
0166 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0167 4805       |H   |		Short_Literal	0x5
0168 0092 08c7  |    |		Action	Push_String_Extended,0x8c7					; "Aborting environment installation: "
016a 6099       |`   |		Indirect_Literal	Discrete,0x204,{0x00000000, 0x00004000}
016b e011       |    |		Load	0x0,0x11
016c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
016d e012       |    |		Load	0x0,0x12
016e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
016f e013       |    |		Load	0x0,0x13
0170 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0171 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0172 e5ff       |    |		Load	0x2,-0x1
0173 e013       |    |		Load	0x0,0x13
0174 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0175 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0176 01cc       |    |		Execute	Vector,Catenate
0177 0092 08c8  |    |		Action	Push_String_Extended,0x8c8					; " is not a release world."
0179 01cc       |    |		Execute	Vector,Catenate
017a e010       |    |		Load	0x0,0x10
017b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
017c e402       |    |		Load	0x2,0x2
017d 0257       | W  |		Execute	Discrete,Raise
017e e433       | 3  |		Load	0x2,0x33
017f 6804       |h   |		Jump_Zero	0x184
0180 4800       |H   |		Short_Literal	0x0
0181 a42b       | +  |		Store_Unchecked	0x2,0x2b
0182 4800       |H   |		Short_Literal	0x0
0183 a42e       | .  |		Store_Unchecked	0x2,0x2e
0184 e40c       |    |		Load	0x2,0xc
0185 8004       |    |		Call	0x0,0x4
0186 7013       |p   |		Jump_Nonzero	0x19a
0187 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
0189 00ea       |    |		Load_Encached	Null_String_Cache
018a 4800       |H   |		Short_Literal	0x0
018b 4801       |H   |		Short_Literal	0x1
018c e40c       |    |		Load	0x2,0xc
018d 01dd       |    |		Execute	Vector,First
018e e40c       |    |		Load	0x2,0xc
018f 01dc       |    |		Execute	Vector,Last
0190 0aff       |    |		Execute_Immediate	Plus,-0x1
0191 00d8       |    |		Load_Top	At_Offset_0
0192 00e2       |    |		Load_Encached	Integer_Cache
0193 0260       | `  |		Execute	Discrete,In_Type
0194 7001       |p   |		Jump_Nonzero	0x196
0195 0801       |    |		Execute_Immediate	Raise,0x1
0196 e40c       |    |		Load	0x2,0xc
0197 01cf       |    |		Execute	Vector,Slice_Read
0198 e014       |    |		Load	0x0,0x14
0199 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
019a e422       | "  |		Load	0x2,0x22
019b e00a       |    |		Load	0x0,0xa
019c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
019d 0092 08ca  |    |		Action	Push_String_Extended,0x8ca					; "Installing Environment Release "
019f e403       |    |		Load	0x2,0x3
01a0 01cc       |    |		Execute	Vector,Catenate
01a1 e015       |    |		Load	0x0,0x15
01a2 e420       |    |		Load	0x2,0x20
01a3 0096       |    |		Execute	Package,Entry
01a4 4801       |H   |		Short_Literal	0x1
01a5 a424       | $  |		Store_Unchecked	0x2,0x24
01a6 e003       |    |		Load	0x0,0x3
01a7 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01a8 e003       |    |		Load	0x0,0x3
01a9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01aa 00d9       |    |		Load_Top	At_Offset_1
01ab 00d0       |    |		Action	Swap_Control
01ac 0260       | `  |		Execute	Discrete,In_Type
01ad 7001       |p   |		Jump_Nonzero	0x1af
01ae 0801       |    |		Execute_Immediate	Raise,0x1
01af 6050       |`P  |		Indirect_Literal	Discrete,0x200,{0x00000000, 0x00003e80}
01b0 e003       |    |		Load	0x0,0x3
01b1 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
01b2 e42a       | *  |		Load	0x2,0x2a
01b3 6808       |h   |		Jump_Zero	0x1bc
01b4 4800       |H   |		Short_Literal	0x0
01b5 0092 08cb  |    |		Action	Push_String_Extended,0x8cb					; "D_12_6_5"
01b7 e404       |    |		Load	0x2,0x4
01b8 e016       |    |		Load	0x0,0x16
01b9 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01ba 6801       |h   |		Jump_Zero	0x1bc
01bb 8436       | 6  |		Call	0x2,0x36
01bc e42b       | +  |		Load	0x2,0x2b
01bd 6801       |h   |		Jump_Zero	0x1bf
01be 8437       | 7  |		Call	0x2,0x37
01bf e42d       | -  |		Load	0x2,0x2d
01c0 6801       |h   |		Jump_Zero	0x1c2
01c1 8438       | 8  |		Call	0x2,0x38
01c2 8439       | 9  |		Call	0x2,0x39
01c3 e42c       | ,  |		Load	0x2,0x2c
01c4 6801       |h   |		Jump_Zero	0x1c6
01c5 843a       | :  |		Call	0x2,0x3a
01c6 e425       | %  |		Load	0x2,0x25
01c7 6806       |h   |		Jump_Zero	0x1ce
01c8 0092 08cc  |    |		Action	Push_String_Extended,0x8cc					; "Install_Product has failed"
01ca e017       |    |		Load	0x0,0x17
01cb e420       |    |		Load	0x2,0x20
01cc 0096       |    |		Execute	Package,Entry
01cd 7805       |x   |		Jump	0x1d3
01ce 0092 08cd  |    |		Action	Push_String_Extended,0x8cd					; "Install_Product has completed"
01d0 e018       |    |		Load	0x0,0x18
01d1 e420       |    |		Load	0x2,0x20
01d2 0096       |    |		Execute	Package,Entry
01d3 4800       |H   |		Short_Literal	0x0
01d4 a424       | $  |		Store_Unchecked	0x2,0x24
01d5 e421       | !  |		Load	0x2,0x21
01d6 e00a       |    |		Load	0x0,0xa
01d7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01d8 e423       | #  |		Load	0x2,0x23
01d9 e00b       |    |		Load	0x0,0xb
01da 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01db e00a       |    |		Load	0x0,0xa
01dc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01dd 4800       |H   |		Short_Literal	0x0
01de 0092 08ce  |    |		Action	Push_String_Extended,0x8ce					; "[Install_Product has completed]"
01e0 e010       |    |		Load	0x0,0x10
01e1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01e2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e3			TRAP_0018:
01e3 e402       |    |		Load	0x2,0x2
01e4 010f       |    |		Execute	Exception,Equal
01e5 680b       |h   |		Jump_Zero	0x1f1
01e6 e423       | #  |		Load	0x2,0x23
01e7 e00b       |    |		Load	0x0,0xb
01e8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01e9 e00a       |    |		Load	0x0,0xa
01ea 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01eb 4800       |H   |		Short_Literal	0x0
01ec 0092 08cf  |    |		Action	Push_String_Extended,0x8cf					; "[Install_Product has failed]"
01ee e010       |    |		Load	0x0,0x10
01ef 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01f0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01f1 e424       | $  |		Load	0x2,0x24
01f2 6805       |h   |		Jump_Zero	0x1f8
01f3 0092 08cc  |    |		Action	Push_String_Extended,0x8cc					; "Install_Product has failed"
01f5 e017       |    |		Load	0x0,0x17
01f6 e420       |    |		Load	0x2,0x20
01f7 0096       |    |		Execute	Package,Entry
01f8 e421       | !  |		Load	0x2,0x21
01f9 e00a       |    |		Load	0x0,0xa
01fa 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01fb e423       | #  |		Load	0x2,0x23
01fc e00b       |    |		Load	0x0,0xb
01fd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01fe 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01ff 0000       |    |		.XXX[0x1]
0200 0000 0000  |    |		.LITERAL	{0x00000000, 0x00003e80}
0204 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0208 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
020c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 4607       |F   |		Jump_Case	0x8
0214 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0215 7807       |x   |		Jump	0x21d								; case 0x1
0216 780a       |x   |		Jump	0x221								; case 0x2
0217 780e       |x   |		Jump	0x226								; case 0x3
0218 7811       |x   |		Jump	0x22a								; case 0x4
0219 7812       |x   |		Jump	0x22c								; case 0x5
021a 7813       |x   |		Jump	0x22e								; case 0x6
021b 7816       |x   |		Jump	0x232								; case 0x7
021c 4302       |C   |		.XXX[0x1]
021d 00da       |    |		Load_Top	At_Offset_2
021e 0091 089d  |    |		Action	Push_String_Extended_Indexed,0x89d				; "NIL"
0220 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0221 00db       |    |		Load_Top	At_Offset_3
0222 00db       |    |		Load_Top	At_Offset_3
0223 00e0       |    |		Load_Encached	Standard_Cache
0224 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0225 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0226 00da       |    |		Load_Top	At_Offset_2
0227 00e0       |    |		Load_Encached	Standard_Cache
0228 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0229 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
022a 00db       |    |		Load_Top	At_Offset_3
022b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
022c 00db       |    |		Load_Top	At_Offset_3
022d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
022e e427       | '  |		Load	0x2,0x27
022f 00dc       |    |		Load_Top	At_Offset_4
0230 0267       | g  |		Execute	Discrete,Predecessor
0231 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0232 e427       | '  |		Load	0x2,0x27
0233 00dc       |    |		Load_Top	At_Offset_4
0234 0268       | h  |		Execute	Discrete,Successor
0235 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0236 0000 0000  |    |		.XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 025a       | Z  |		.CONST	0x025a								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 0092 08d0  |    |		Action	Push_String_Extended,0x8d0					; "Preserving Machine State"
023d e019       |    |		Load	0x0,0x19
023e e420       |    |		Load	0x2,0x20
023f 0096       |    |		Execute	Package,Entry
0240 e433       | 3  |		Load	0x2,0x33
0241 7017       |p   |		Jump_Nonzero	0x259
0242 e41c       |    |		Load	0x2,0x1c
0243 0120       |    |		Execute	Any,Is_Value
0244 6803       |h   |		Jump_Zero	0x248
0245 e005       |    |		Load	0x0,0x5
0246 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0247 7801       |x   |		Jump	0x249
0248 e41c       |    |		Load	0x2,0x1c
0249 e41b       |    |		Load	0x2,0x1b
024a 0092 08d1  |    |		Action	Push_String_Extended,0x8d1					; "Processing Switch Files"
024c e01a       |    |		Load	0x0,0x1a
024d e420       |    |		Load	0x2,0x20
024e 0096       |    |		Execute	Package,Entry
024f c41c       |    |		Store	0x2,0x1c
0250 0092 08d2  |    |		Action	Push_String_Extended,0x8d2					; "!.??'c(Switch)"
0252 801b       |    |		Call	0x0,0x1b
0253 e41c       |    |		Load	0x2,0x1c
0254 e41b       |    |		Load	0x2,0x1b
0255 e01c       |    |		Load	0x0,0x1c
0256 e420       |    |		Load	0x2,0x20
0257 0096       |    |		Execute	Package,Entry
0258 c41c       |    |		Store	0x2,0x1c
0259 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
025a			TRAP_0238:
025a 0007       |    |		Action	Break_Optional
025b e00a       |    |		Load	0x0,0xa
025c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
025d 4808       |H   |		Short_Literal	0x8
025e 4801       |H   |		Short_Literal	0x1
025f 4801       |H   |		Short_Literal	0x1
0260 e01d       |    |		Load	0x0,0x1d
0261 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0262 0092 08d3  |    |		Action	Push_String_Extended,0x8d3					; " raised while Preserving Machine State"
0264 01cc       |    |		Execute	Vector,Catenate
0265 e010       |    |		Load	0x0,0x10
0266 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0267 e005       |    |		Load	0x0,0x5
0268 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0269 e41c       |    |		Load	0x2,0x1c
026a 012f       | /  |		Execute	Any,Equal
026b 680d       |h   |		Jump_Zero	0x279
026c e00a       |    |		Load	0x0,0xa
026d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
026e 4805       |H   |		Short_Literal	0x5
026f 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; "Step has Failed"
0271 e010       |    |		Load	0x0,0x10
0272 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0273 e41c       |    |		Load	0x2,0x1c
0274 e41b       |    |		Load	0x2,0x1b
0275 e01c       |    |		Load	0x0,0x1c
0276 e420       |    |		Load	0x2,0x20
0277 0096       |    |		Execute	Package,Entry
0278 c41c       |    |		Store	0x2,0x1c
0279 0092 08d5  |    |		Action	Push_String_Extended,0x8d5					; "Preservation of Machine State has failed"
027b e01e       |    |		Load	0x0,0x1e
027c e420       |    |		Load	0x2,0x20
027d 0096       |    |		Execute	Package,Entry
027e 4801       |H   |		Short_Literal	0x1
027f a425       | %  |		Store_Unchecked	0x2,0x25
0280 00d8       |    |		Load_Top	At_Offset_0
0281 0101       |    |		Execute	Exception,Reraise
0282 0000 0000  |    |		.BLANK	0000[0x6]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 0291       |    |		.CONST	0x0291								; Address of begin
0289 0324       | $  |		.CONST	0x0324								; Address of exception handler
028a 0004       |    |		.CONST	0x0004								; Number of locals
028b			INIT_0288:
028b 029f 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Call
028d 029f 0823  |   #|		Declare_Subprogram	INIT_0820,For_Call
028f 029f 084b  |   K|		Declare_Subprogram	INIT_0848,For_Call
0291			BODY_0288:
0291 0092 08d6  |    |		Action	Push_String_Extended,0x8d6					; "Updating the Segments in the Elaborator Database"
0293 e019       |    |		Load	0x0,0x19
0294 e420       |    |		Load	0x2,0x20
0295 0096       |    |		Execute	Package,Entry
0296 e406       |    |		Load	0x2,0x6
0297 8004       |    |		Call	0x0,0x4
0298 6828       |h(  |		Jump_Zero	0x2c1
0299 e41c       |    |		Load	0x2,0x1c
029a 0120       |    |		Execute	Any,Is_Value
029b 6803       |h   |		Jump_Zero	0x29f
029c e005       |    |		Load	0x0,0x5
029d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
029e 7801       |x   |		Jump	0x2a0
029f e41c       |    |		Load	0x2,0x1c
02a0 e41b       |    |		Load	0x2,0x1b
02a1 0092 08d7  |    |		Action	Push_String_Extended,0x8d7					; "Loading New Code Segments"
02a3 e01a       |    |		Load	0x0,0x1a
02a4 e420       |    |		Load	0x2,0x20
02a5 0096       |    |		Execute	Package,Entry
02a6 c41c       |    |		Store	0x2,0x1c
02a7 e431       | 1  |		Load	0x2,0x31
02a8 6809       |h   |		Jump_Zero	0x2b2
02a9 4800       |H   |		Short_Literal	0x0
02aa 00ea       |    |		Load_Encached	Null_String_Cache
02ab 00ea       |    |		Load_Encached	Null_String_Cache
02ac e406       |    |		Load	0x2,0x6
02ad 0092 08d8  |    |		Action	Push_String_Extended,0x8d8					; ":No_Mail"
02af 01cc       |    |		Execute	Vector,Catenate
02b0 801f       |    |		Call	0x0,0x1f
02b1 7808       |x   |		Jump	0x2ba
02b2 4800       |H   |		Short_Literal	0x0
02b3 00ea       |    |		Load_Encached	Null_String_Cache
02b4 00ea       |    |		Load_Encached	Null_String_Cache
02b5 e406       |    |		Load	0x2,0x6
02b6 0092 08d9  |    |		Action	Push_String_Extended,0x8d9					; ":Ae"
02b8 01cc       |    |		Execute	Vector,Catenate
02b9 801f       |    |		Call	0x0,0x1f
02ba e41c       |    |		Load	0x2,0x1c
02bb e41b       |    |		Load	0x2,0x1b
02bc e01c       |    |		Load	0x0,0x1c
02bd e420       |    |		Load	0x2,0x20
02be 0096       |    |		Execute	Package,Entry
02bf c41c       |    |		Store	0x2,0x1c
02c0 7815       |x   |		Jump	0x2d6
02c1 e41c       |    |		Load	0x2,0x1c
02c2 0120       |    |		Execute	Any,Is_Value
02c3 6803       |h   |		Jump_Zero	0x2c7
02c4 e005       |    |		Load	0x0,0x5
02c5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02c6 7801       |x   |		Jump	0x2c8
02c7 e41c       |    |		Load	0x2,0x1c
02c8 e41b       |    |		Load	0x2,0x1b
02c9 0092 08da  |    |		Action	Push_String_Extended,0x8da					; "Checking Network Segment Install"
02cb e01a       |    |		Load	0x0,0x1a
02cc e420       |    |		Load	0x2,0x20
02cd 0096       |    |		Execute	Package,Entry
02ce c41c       |    |		Store	0x2,0x1c
02cf 8602       |    |		Call	0x3,0x2
02d0 e41c       |    |		Load	0x2,0x1c
02d1 e41b       |    |		Load	0x2,0x1b
02d2 e01c       |    |		Load	0x0,0x1c
02d3 e420       |    |		Load	0x2,0x20
02d4 0096       |    |		Execute	Package,Entry
02d5 c41c       |    |		Store	0x2,0x1c
02d6 e41c       |    |		Load	0x2,0x1c
02d7 0120       |    |		Execute	Any,Is_Value
02d8 6803       |h   |		Jump_Zero	0x2dc
02d9 e005       |    |		Load	0x0,0x5
02da 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02db 7801       |x   |		Jump	0x2dd
02dc e41c       |    |		Load	0x2,0x1c
02dd e41b       |    |		Load	0x2,0x1b
02de 0092 08db  |    |		Action	Push_String_Extended,0x8db					; "Updating the Design_Facility Subsystem"
02e0 e01a       |    |		Load	0x0,0x1a
02e1 e420       |    |		Load	0x2,0x20
02e2 0096       |    |		Execute	Package,Entry
02e3 c41c       |    |		Store	0x2,0x1c
02e4 8603       |    |		Call	0x3,0x3
02e5 e41c       |    |		Load	0x2,0x1c
02e6 e41b       |    |		Load	0x2,0x1b
02e7 e01c       |    |		Load	0x0,0x1c
02e8 e420       |    |		Load	0x2,0x20
02e9 0096       |    |		Execute	Package,Entry
02ea c41c       |    |		Store	0x2,0x1c
02eb e432       | 2  |		Load	0x2,0x32
02ec 681a       |h   |		Jump_Zero	0x307
02ed 0092 08dc  |    |		Action	Push_String_Extended,0x8dc					; "MAIL"
02ef e020       |    |		Load	0x0,0x20
02f0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02f1 7015       |p   |		Jump_Nonzero	0x307
02f2 e41c       |    |		Load	0x2,0x1c
02f3 0120       |    |		Execute	Any,Is_Value
02f4 6803       |h   |		Jump_Zero	0x2f8
02f5 e005       |    |		Load	0x0,0x5
02f6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02f7 7801       |x   |		Jump	0x2f9
02f8 e41c       |    |		Load	0x2,0x1c
02f9 e41b       |    |		Load	0x2,0x1b
02fa 0092 08dd  |    |		Action	Push_String_Extended,0x8dd					; "Updating the Mail Subsystem"
02fc e01a       |    |		Load	0x0,0x1a
02fd e420       |    |		Load	0x2,0x20
02fe 0096       |    |		Execute	Package,Entry
02ff c41c       |    |		Store	0x2,0x1c
0300 8604       |    |		Call	0x3,0x4
0301 e41c       |    |		Load	0x2,0x1c
0302 e41b       |    |		Load	0x2,0x1b
0303 e01c       |    |		Load	0x0,0x1c
0304 e420       |    |		Load	0x2,0x20
0305 0096       |    |		Execute	Package,Entry
0306 c41c       |    |		Store	0x2,0x1c
0307 e41c       |    |		Load	0x2,0x1c
0308 0120       |    |		Execute	Any,Is_Value
0309 6803       |h   |		Jump_Zero	0x30d
030a e005       |    |		Load	0x0,0x5
030b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
030c 7801       |x   |		Jump	0x30e
030d e41c       |    |		Load	0x2,0x1c
030e e41b       |    |		Load	0x2,0x1b
030f 0092 08de  |    |		Action	Push_String_Extended,0x8de					; "Checking the Configuration in the Elaborator Database"
0311 e01a       |    |		Load	0x0,0x1a
0312 e420       |    |		Load	0x2,0x20
0313 0096       |    |		Execute	Package,Entry
0314 c41c       |    |		Store	0x2,0x1c
0315 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
0317 0092 08df  |    |		Action	Push_String_Extended,0x8df					; "<RELEASE>"
0319 e40b       |    |		Load	0x2,0xb
031a e419       |    |		Load	0x2,0x19
031b 01cc       |    |		Execute	Vector,Catenate
031c 8021       | !  |		Call	0x0,0x21
031d e41c       |    |		Load	0x2,0x1c
031e e41b       |    |		Load	0x2,0x1b
031f e01c       |    |		Load	0x0,0x1c
0320 e420       |    |		Load	0x2,0x20
0321 0096       |    |		Execute	Package,Entry
0322 c41c       |    |		Store	0x2,0x1c
0323 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0324			TRAP_0288:
0324 0007       |    |		Action	Break_Optional
0325 e00a       |    |		Load	0x0,0xa
0326 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0327 4808       |H   |		Short_Literal	0x8
0328 4801       |H   |		Short_Literal	0x1
0329 4801       |H   |		Short_Literal	0x1
032a e01d       |    |		Load	0x0,0x1d
032b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
032c 0092 08e0  |    |		Action	Push_String_Extended,0x8e0					; " raised while Updating Elaborator Database"
032e 01cc       |    |		Execute	Vector,Catenate
032f e010       |    |		Load	0x0,0x10
0330 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0331 e005       |    |		Load	0x0,0x5
0332 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0333 e41c       |    |		Load	0x2,0x1c
0334 012f       | /  |		Execute	Any,Equal
0335 680d       |h   |		Jump_Zero	0x343
0336 e00a       |    |		Load	0x0,0xa
0337 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0338 4805       |H   |		Short_Literal	0x5
0339 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; "Step has Failed"
033b e010       |    |		Load	0x0,0x10
033c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
033d e41c       |    |		Load	0x2,0x1c
033e e41b       |    |		Load	0x2,0x1b
033f e01c       |    |		Load	0x0,0x1c
0340 e420       |    |		Load	0x2,0x20
0341 0096       |    |		Execute	Package,Entry
0342 c41c       |    |		Store	0x2,0x1c
0343 0092 08e1  |    |		Action	Push_String_Extended,0x8e1					; "Updating Elaborator Database has failed"
0345 e01e       |    |		Load	0x0,0x1e
0346 e420       |    |		Load	0x2,0x20
0347 0096       |    |		Execute	Package,Entry
0348 4801       |H   |		Short_Literal	0x1
0349 a425       | %  |		Store_Unchecked	0x2,0x25
034a 00d8       |    |		Load_Top	At_Offset_0
034b 0101       |    |		Execute	Exception,Reraise
034c 0000 0000  |    |		.BLANK	0000[0x4]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0357       | W  |		.CONST	0x0357								; Address of begin
0351 05da       |    |		.CONST	0x05da								; Address of exception handler
0352 0003       |    |		.CONST	0x0003								; Number of locals
0353			INIT_0350:
0353 029f 0873  |   s|		Declare_Subprogram	INIT_0870,For_Call
0355 029f 088b  |    |		Declare_Subprogram	INIT_0888,For_Call
0357			BODY_0350:
0357 0092 08e2  |    |		Action	Push_String_Extended,0x8e2					; "Updating the Universe Specs"
0359 e019       |    |		Load	0x0,0x19
035a e420       |    |		Load	0x2,0x20
035b 0096       |    |		Execute	Package,Entry
035c e00a       |    |		Load	0x0,0xa
035d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
035e e00a       |    |		Load	0x0,0xa
035f 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0360 e40b       |    |		Load	0x2,0xb
0361 0092 08e3  |    |		Action	Push_String_Extended,0x8e3					; "Frozen_Worlds_Of_The_Universe"
0363 01cc       |    |		Execute	Vector,Catenate
0364 e010       |    |		Load	0x0,0x10
0365 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0366 0092 08e4  |    |		Action	Push_String_Extended,0x8e4					; "<QUIET>"
0368 4801       |H   |		Short_Literal	0x1
0369 00ea       |    |		Load_Encached	Null_String_Cache
036a 0092 08e5  |    |		Action	Push_String_Extended,0x8e5					; "[_"
036c e40b       |    |		Load	0x2,0xb
036d 01cc       |    |		Execute	Vector,Catenate
036e e418       |    |		Load	0x2,0x18
036f 01cc       |    |		Execute	Vector,Catenate
0370 0092 08e6  |    |		Action	Push_String_Extended,0x8e6					; "]'if(FROZEN)"
0372 01cc       |    |		Execute	Vector,Catenate
0373 e014       |    |		Load	0x0,0x14
0374 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0375 e00a       |    |		Load	0x0,0xa
0376 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0377 e00a       |    |		Load	0x0,0xa
0378 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0379 e010       |    |		Load	0x0,0x10
037a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
037b e40b       |    |		Load	0x2,0xb
037c 0092 08e3  |    |		Action	Push_String_Extended,0x8e3					; "Frozen_Worlds_Of_The_Universe"
037e 01cc       |    |		Execute	Vector,Catenate
037f 8022       | "  |		Call	0x0,0x22
0380 680c       |h   |		Jump_Zero	0x38d
0381 0092 08e4  |    |		Action	Push_String_Extended,0x8e4					; "<QUIET>"
0383 0092 08e7  |    |		Action	Push_String_Extended,0x8e7					; "<DIRECTORIES>"
0385 4801       |H   |		Short_Literal	0x1
0386 e40b       |    |		Load	0x2,0xb
0387 0092 08e3  |    |		Action	Push_String_Extended,0x8e3					; "Frozen_Worlds_Of_The_Universe"
0389 01cc       |    |		Execute	Vector,Catenate
038a e014       |    |		Load	0x0,0x14
038b 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
038c 7820       |x   |		Jump	0x3ad
038d e41c       |    |		Load	0x2,0x1c
038e 0120       |    |		Execute	Any,Is_Value
038f 6803       |h   |		Jump_Zero	0x393
0390 e005       |    |		Load	0x0,0x5
0391 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0392 7801       |x   |		Jump	0x394
0393 e41c       |    |		Load	0x2,0x1c
0394 e41b       |    |		Load	0x2,0x1b
0395 0092 08e8  |    |		Action	Push_String_Extended,0x8e8					; "Unfreezing Frozen Worlds"
0397 e01a       |    |		Load	0x0,0x1a
0398 e420       |    |		Load	0x2,0x20
0399 0096       |    |		Execute	Package,Entry
039a c41c       |    |		Store	0x2,0x1c
039b 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
039d 4800       |H   |		Short_Literal	0x0
039e 0092 08e9  |    |		Action	Push_String_Extended,0x8e9					; "_"
03a0 e40b       |    |		Load	0x2,0xb
03a1 01cc       |    |		Execute	Vector,Catenate
03a2 0092 08e3  |    |		Action	Push_String_Extended,0x8e3					; "Frozen_Worlds_Of_The_Universe"
03a4 01cc       |    |		Execute	Vector,Catenate
03a5 e014       |    |		Load	0x0,0x14
03a6 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
03a7 e41c       |    |		Load	0x2,0x1c
03a8 e41b       |    |		Load	0x2,0x1b
03a9 e01c       |    |		Load	0x0,0x1c
03aa e420       |    |		Load	0x2,0x20
03ab 0096       |    |		Execute	Package,Entry
03ac c41c       |    |		Store	0x2,0x1c
03ad e434       | 4  |		Load	0x2,0x34
03ae 681d       |h   |		Jump_Zero	0x3cc
03af e41c       |    |		Load	0x2,0x1c
03b0 0120       |    |		Execute	Any,Is_Value
03b1 6803       |h   |		Jump_Zero	0x3b5
03b2 e005       |    |		Load	0x0,0x5
03b3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03b4 7801       |x   |		Jump	0x3b6
03b5 e41c       |    |		Load	0x2,0x1c
03b6 e41b       |    |		Load	0x2,0x1b
03b7 0092 08ea  |    |		Action	Push_String_Extended,0x8ea					; "Demoting Keymap/Abbreviations Bodies for Universe Upgrade"
03b9 e01a       |    |		Load	0x0,0x1a
03ba e420       |    |		Load	0x2,0x20
03bb 0096       |    |		Execute	Package,Entry
03bc c41c       |    |		Store	0x2,0x1c
03bd 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
03bf 4800       |H   |		Short_Literal	0x0
03c0 0092 08eb  |    |		Action	Push_String_Extended,0x8eb					; "<WORLDS>"
03c2 4801       |H   |		Short_Literal	0x1
03c3 e41a       |    |		Load	0x2,0x1a
03c4 e023       | #  |		Load	0x0,0x23
03c5 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03c6 e41c       |    |		Load	0x2,0x1c
03c7 e41b       |    |		Load	0x2,0x1b
03c8 e01c       |    |		Load	0x0,0x1c
03c9 e420       |    |		Load	0x2,0x20
03ca 0096       |    |		Execute	Package,Entry
03cb c41c       |    |		Store	0x2,0x1c
03cc e433       | 3  |		Load	0x2,0x33
03cd 70e3       |p   |		Jump_Nonzero	0x4b1
03ce e41c       |    |		Load	0x2,0x1c
03cf 0120       |    |		Execute	Any,Is_Value
03d0 6803       |h   |		Jump_Zero	0x3d4
03d1 e005       |    |		Load	0x0,0x5
03d2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03d3 7801       |x   |		Jump	0x3d5
03d4 e41c       |    |		Load	0x2,0x1c
03d5 e41b       |    |		Load	0x2,0x1b
03d6 0092 08ec  |    |		Action	Push_String_Extended,0x8ec					; "Restoring New Universe Items"
03d8 e01a       |    |		Load	0x0,0x1a
03d9 e420       |    |		Load	0x2,0x20
03da 0096       |    |		Execute	Package,Entry
03db c41c       |    |		Store	0x2,0x1c
03dc e40b       |    |		Load	0x2,0xb
03dd 0092 08ed  |    |		Action	Push_String_Extended,0x8ed					; "New_Units"
03df 01cc       |    |		Execute	Vector,Catenate
03e0 e40b       |    |		Load	0x2,0xb
03e1 e418       |    |		Load	0x2,0x18
03e2 01cc       |    |		Execute	Vector,Catenate
03e3 e40a       |    |		Load	0x2,0xa
03e4 0092 08ee  |    |		Action	Push_String_Extended,0x8ee					; "Universe"
03e6 01cc       |    |		Execute	Vector,Catenate
03e7 0092 08ef  |    |		Action	Push_String_Extended,0x8ef					; "!"
03e9 8024       | $  |		Call	0x0,0x24
03ea e41c       |    |		Load	0x2,0x1c
03eb e41b       |    |		Load	0x2,0x1b
03ec e01c       |    |		Load	0x0,0x1c
03ed e420       |    |		Load	0x2,0x20
03ee 0096       |    |		Execute	Package,Entry
03ef c41c       |    |		Store	0x2,0x1c
03f0 e41c       |    |		Load	0x2,0x1c
03f1 0120       |    |		Execute	Any,Is_Value
03f2 6803       |h   |		Jump_Zero	0x3f6
03f3 e005       |    |		Load	0x0,0x5
03f4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03f5 7801       |x   |		Jump	0x3f7
03f6 e41c       |    |		Load	0x2,0x1c
03f7 e41b       |    |		Load	0x2,0x1b
03f8 0092 08f0  |    |		Action	Push_String_Extended,0x8f0					; "Restoring a Prototype Universe (takes about an hour)"
03fa e01a       |    |		Load	0x0,0x1a
03fb e420       |    |		Load	0x2,0x20
03fc 0096       |    |		Execute	Package,Entry
03fd c41c       |    |		Store	0x2,0x1c
03fe 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
0400 e40a       |    |		Load	0x2,0xa
0401 0092 08ee  |    |		Action	Push_String_Extended,0x8ee					; "Universe"
0403 01cc       |    |		Execute	Vector,Catenate
0404 0092 08f1  |    |		Action	Push_String_Extended,0x8f1					; "R1000, New, Goal => Source"
0406 0092 08f2  |    |		Action	Push_String_Extended,0x8f2					; "*"
0408 e40d       |    |		Load	0x2,0xd
0409 0092 08f3  |    |		Action	Push_String_Extended,0x8f3					; "?"
040b e025       | %  |		Load	0x0,0x25
040c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
040d e41c       |    |		Load	0x2,0x1c
040e e41b       |    |		Load	0x2,0x1b
040f e01c       |    |		Load	0x0,0x1c
0410 e420       |    |		Load	0x2,0x20
0411 0096       |    |		Execute	Package,Entry
0412 c41c       |    |		Store	0x2,0x1c
0413 e40b       |    |		Load	0x2,0xb
0414 e416       |    |		Load	0x2,0x16
0415 01cc       |    |		Execute	Vector,Catenate
0416 8022       | "  |		Call	0x0,0x22
0417 7018       |p   |		Jump_Nonzero	0x430
0418 e41c       |    |		Load	0x2,0x1c
0419 0120       |    |		Execute	Any,Is_Value
041a 6803       |h   |		Jump_Zero	0x41e
041b e005       |    |		Load	0x0,0x5
041c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
041d 7801       |x   |		Jump	0x41f
041e e41c       |    |		Load	0x2,0x1c
041f e41b       |    |		Load	0x2,0x1b
0420 0092 08f4  |    |		Action	Push_String_Extended,0x8f4					; "Inserting New Declarations Incrementally"
0422 e01a       |    |		Load	0x0,0x1a
0423 e420       |    |		Load	0x2,0x20
0424 0096       |    |		Execute	Package,Entry
0425 c41c       |    |		Store	0x2,0x1c
0426 e40b       |    |		Load	0x2,0xb
0427 e416       |    |		Load	0x2,0x16
0428 01cc       |    |		Execute	Vector,Catenate
0429 8026       | &  |		Call	0x0,0x26
042a e41c       |    |		Load	0x2,0x1c
042b e41b       |    |		Load	0x2,0x1b
042c e01c       |    |		Load	0x0,0x1c
042d e420       |    |		Load	0x2,0x20
042e 0096       |    |		Execute	Package,Entry
042f c41c       |    |		Store	0x2,0x1c
0430 e40b       |    |		Load	0x2,0xb
0431 e417       |    |		Load	0x2,0x17
0432 01cc       |    |		Execute	Vector,Catenate
0433 8022       | "  |		Call	0x0,0x22
0434 7018       |p   |		Jump_Nonzero	0x44d
0435 e41c       |    |		Load	0x2,0x1c
0436 0120       |    |		Execute	Any,Is_Value
0437 6803       |h   |		Jump_Zero	0x43b
0438 e005       |    |		Load	0x0,0x5
0439 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
043a 7801       |x   |		Jump	0x43c
043b e41c       |    |		Load	0x2,0x1c
043c e41b       |    |		Load	0x2,0x1b
043d 0092 08f5  |    |		Action	Push_String_Extended,0x8f5					; "Changing Default Values of Selected Command Parameters"
043f e01a       |    |		Load	0x0,0x1a
0440 e420       |    |		Load	0x2,0x20
0441 0096       |    |		Execute	Package,Entry
0442 c41c       |    |		Store	0x2,0x1c
0443 e40b       |    |		Load	0x2,0xb
0444 e417       |    |		Load	0x2,0x17
0445 01cc       |    |		Execute	Vector,Catenate
0446 8027       | '  |		Call	0x0,0x27
0447 e41c       |    |		Load	0x2,0x1c
0448 e41b       |    |		Load	0x2,0x1b
0449 e01c       |    |		Load	0x0,0x1c
044a e420       |    |		Load	0x2,0x20
044b 0096       |    |		Execute	Package,Entry
044c c41c       |    |		Store	0x2,0x1c
044d e41c       |    |		Load	0x2,0x1c
044e 0120       |    |		Execute	Any,Is_Value
044f 6803       |h   |		Jump_Zero	0x453
0450 e005       |    |		Load	0x0,0x5
0451 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0452 7801       |x   |		Jump	0x454
0453 e41c       |    |		Load	0x2,0x1c
0454 e41b       |    |		Load	0x2,0x1b
0455 0092 08f6  |    |		Action	Push_String_Extended,0x8f6					; "Scanning for Changes in the Universe Specs"
0457 e01a       |    |		Load	0x0,0x1a
0458 e420       |    |		Load	0x2,0x20
0459 0096       |    |		Execute	Package,Entry
045a c41c       |    |		Store	0x2,0x1c
045b e40b       |    |		Load	0x2,0xb
045c e415       |    |		Load	0x2,0x15
045d 01cc       |    |		Execute	Vector,Catenate
045e e40b       |    |		Load	0x2,0xb
045f e414       |    |		Load	0x2,0x14
0460 01cc       |    |		Execute	Vector,Catenate
0461 e40b       |    |		Load	0x2,0xb
0462 e413       |    |		Load	0x2,0x13
0463 01cc       |    |		Execute	Vector,Catenate
0464 e40b       |    |		Load	0x2,0xb
0465 e412       |    |		Load	0x2,0x12
0466 01cc       |    |		Execute	Vector,Catenate
0467 0092 08ef  |    |		Action	Push_String_Extended,0x8ef					; "!"
0469 e40d       |    |		Load	0x2,0xd
046a 8028       | (  |		Call	0x0,0x28
046b e41c       |    |		Load	0x2,0x1c
046c e41b       |    |		Load	0x2,0x1b
046d e01c       |    |		Load	0x0,0x1c
046e e420       |    |		Load	0x2,0x20
046f 0096       |    |		Execute	Package,Entry
0470 c41c       |    |		Store	0x2,0x1c
0471 e430       | 0  |		Load	0x2,0x30
0472 683e       |h>  |		Jump_Zero	0x4b1
0473 0092 08f7  |    |		Action	Push_String_Extended,0x8f7					; "![_[]"
0475 e40b       |    |		Load	0x2,0xb
0476 01cc       |    |		Execute	Vector,Catenate
0477 e413       |    |		Load	0x2,0x13
0478 01cc       |    |		Execute	Vector,Catenate
0479 0092 08f8  |    |		Action	Push_String_Extended,0x8f8					; "]'BODY"
047b 01cc       |    |		Execute	Vector,Catenate
047c 8004       |    |		Call	0x0,0x4
047d 700b       |p   |		Jump_Nonzero	0x489
047e 0092 08f7  |    |		Action	Push_String_Extended,0x8f7					; "![_[]"
0480 e40b       |    |		Load	0x2,0xb
0481 01cc       |    |		Execute	Vector,Catenate
0482 e413       |    |		Load	0x2,0x13
0483 01cc       |    |		Execute	Vector,Catenate
0484 0092 08f8  |    |		Action	Push_String_Extended,0x8f8					; "]'BODY"
0486 01cc       |    |		Execute	Vector,Catenate
0487 8004       |    |		Call	0x0,0x4
0488 6828       |h(  |		Jump_Zero	0x4b1
0489 e41c       |    |		Load	0x2,0x1c
048a 0120       |    |		Execute	Any,Is_Value
048b 6803       |h   |		Jump_Zero	0x48f
048c e005       |    |		Load	0x0,0x5
048d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
048e 7801       |x   |		Jump	0x490
048f e41c       |    |		Load	0x2,0x1c
0490 e41b       |    |		Load	0x2,0x1b
0491 0092 08f9  |    |		Action	Push_String_Extended,0x8f9					; "Creating Text Backup of Existing Bodies to be Modified"
0493 e01a       |    |		Load	0x0,0x1a
0494 e420       |    |		Load	0x2,0x20
0495 0096       |    |		Execute	Package,Entry
0496 c41c       |    |		Store	0x2,0x1c
0497 0092 08f7  |    |		Action	Push_String_Extended,0x8f7					; "![_[]"
0499 e40b       |    |		Load	0x2,0xb
049a 01cc       |    |		Execute	Vector,Catenate
049b e413       |    |		Load	0x2,0x13
049c 01cc       |    |		Execute	Vector,Catenate
049d 0092 08f8  |    |		Action	Push_String_Extended,0x8f8					; "]'BODY"
049f 01cc       |    |		Execute	Vector,Catenate
04a0 8029       | )  |		Call	0x0,0x29
04a1 0092 08f7  |    |		Action	Push_String_Extended,0x8f7					; "![_[]"
04a3 e40b       |    |		Load	0x2,0xb
04a4 01cc       |    |		Execute	Vector,Catenate
04a5 e412       |    |		Load	0x2,0x12
04a6 01cc       |    |		Execute	Vector,Catenate
04a7 0092 08f8  |    |		Action	Push_String_Extended,0x8f8					; "]'BODY"
04a9 01cc       |    |		Execute	Vector,Catenate
04aa 8029       | )  |		Call	0x0,0x29
04ab e41c       |    |		Load	0x2,0x1c
04ac e41b       |    |		Load	0x2,0x1b
04ad e01c       |    |		Load	0x0,0x1c
04ae e420       |    |		Load	0x2,0x20
04af 0096       |    |		Execute	Package,Entry
04b0 c41c       |    |		Store	0x2,0x1c
04b1 e409       |    |		Load	0x2,0x9
04b2 68e3       |h   |		Jump_Zero	0x596
04b3 e41c       |    |		Load	0x2,0x1c
04b4 0120       |    |		Execute	Any,Is_Value
04b5 6803       |h   |		Jump_Zero	0x4b9
04b6 e005       |    |		Load	0x0,0x5
04b7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04b8 7801       |x   |		Jump	0x4ba
04b9 e41c       |    |		Load	0x2,0x1c
04ba e41b       |    |		Load	0x2,0x1b
04bb 0092 08fa  |    |		Action	Push_String_Extended,0x8fa					; "Restoring New Internal Universe Items"
04bd e01a       |    |		Load	0x0,0x1a
04be e420       |    |		Load	0x2,0x20
04bf 0096       |    |		Execute	Package,Entry
04c0 c41c       |    |		Store	0x2,0x1c
04c1 e40f       |    |		Load	0x2,0xf
04c2 0092 08ed  |    |		Action	Push_String_Extended,0x8ed					; "New_Units"
04c4 01cc       |    |		Execute	Vector,Catenate
04c5 e40b       |    |		Load	0x2,0xb
04c6 e418       |    |		Load	0x2,0x18
04c7 01cc       |    |		Execute	Vector,Catenate
04c8 e40e       |    |		Load	0x2,0xe
04c9 0092 08ee  |    |		Action	Push_String_Extended,0x8ee					; "Universe"
04cb 01cc       |    |		Execute	Vector,Catenate
04cc 0092 08ef  |    |		Action	Push_String_Extended,0x8ef					; "!"
04ce 8024       | $  |		Call	0x0,0x24
04cf e41c       |    |		Load	0x2,0x1c
04d0 e41b       |    |		Load	0x2,0x1b
04d1 e01c       |    |		Load	0x0,0x1c
04d2 e420       |    |		Load	0x2,0x20
04d3 0096       |    |		Execute	Package,Entry
04d4 c41c       |    |		Store	0x2,0x1c
04d5 e41c       |    |		Load	0x2,0x1c
04d6 0120       |    |		Execute	Any,Is_Value
04d7 6803       |h   |		Jump_Zero	0x4db
04d8 e005       |    |		Load	0x0,0x5
04d9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04da 7801       |x   |		Jump	0x4dc
04db e41c       |    |		Load	0x2,0x1c
04dc e41b       |    |		Load	0x2,0x1b
04dd 0092 08fb  |    |		Action	Push_String_Extended,0x8fb					; "Restoring a Prototype Internal Universe"
04df e01a       |    |		Load	0x0,0x1a
04e0 e420       |    |		Load	0x2,0x20
04e1 0096       |    |		Execute	Package,Entry
04e2 c41c       |    |		Store	0x2,0x1c
04e3 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
04e5 e40e       |    |		Load	0x2,0xe
04e6 0092 08ee  |    |		Action	Push_String_Extended,0x8ee					; "Universe"
04e8 01cc       |    |		Execute	Vector,Catenate
04e9 0092 08f1  |    |		Action	Push_String_Extended,0x8f1					; "R1000, New, Goal => Source"
04eb 0092 08f2  |    |		Action	Push_String_Extended,0x8f2					; "*"
04ed e411       |    |		Load	0x2,0x11
04ee 0092 08f3  |    |		Action	Push_String_Extended,0x8f3					; "?"
04f0 e025       | %  |		Load	0x0,0x25
04f1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04f2 e41c       |    |		Load	0x2,0x1c
04f3 e41b       |    |		Load	0x2,0x1b
04f4 e01c       |    |		Load	0x0,0x1c
04f5 e420       |    |		Load	0x2,0x20
04f6 0096       |    |		Execute	Package,Entry
04f7 c41c       |    |		Store	0x2,0x1c
04f8 e40f       |    |		Load	0x2,0xf
04f9 e416       |    |		Load	0x2,0x16
04fa 01cc       |    |		Execute	Vector,Catenate
04fb 8022       | "  |		Call	0x0,0x22
04fc 7018       |p   |		Jump_Nonzero	0x515
04fd e41c       |    |		Load	0x2,0x1c
04fe 0120       |    |		Execute	Any,Is_Value
04ff 6803       |h   |		Jump_Zero	0x503
0500 e005       |    |		Load	0x0,0x5
0501 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0502 7801       |x   |		Jump	0x504
0503 e41c       |    |		Load	0x2,0x1c
0504 e41b       |    |		Load	0x2,0x1b
0505 0092 08f4  |    |		Action	Push_String_Extended,0x8f4					; "Inserting New Declarations Incrementally"
0507 e01a       |    |		Load	0x0,0x1a
0508 e420       |    |		Load	0x2,0x20
0509 0096       |    |		Execute	Package,Entry
050a c41c       |    |		Store	0x2,0x1c
050b e40f       |    |		Load	0x2,0xf
050c e416       |    |		Load	0x2,0x16
050d 01cc       |    |		Execute	Vector,Catenate
050e 8026       | &  |		Call	0x0,0x26
050f e41c       |    |		Load	0x2,0x1c
0510 e41b       |    |		Load	0x2,0x1b
0511 e01c       |    |		Load	0x0,0x1c
0512 e420       |    |		Load	0x2,0x20
0513 0096       |    |		Execute	Package,Entry
0514 c41c       |    |		Store	0x2,0x1c
0515 e40f       |    |		Load	0x2,0xf
0516 e417       |    |		Load	0x2,0x17
0517 01cc       |    |		Execute	Vector,Catenate
0518 8022       | "  |		Call	0x0,0x22
0519 7018       |p   |		Jump_Nonzero	0x532
051a e41c       |    |		Load	0x2,0x1c
051b 0120       |    |		Execute	Any,Is_Value
051c 6803       |h   |		Jump_Zero	0x520
051d e005       |    |		Load	0x0,0x5
051e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
051f 7801       |x   |		Jump	0x521
0520 e41c       |    |		Load	0x2,0x1c
0521 e41b       |    |		Load	0x2,0x1b
0522 0092 08f5  |    |		Action	Push_String_Extended,0x8f5					; "Changing Default Values of Selected Command Parameters"
0524 e01a       |    |		Load	0x0,0x1a
0525 e420       |    |		Load	0x2,0x20
0526 0096       |    |		Execute	Package,Entry
0527 c41c       |    |		Store	0x2,0x1c
0528 e40f       |    |		Load	0x2,0xf
0529 e417       |    |		Load	0x2,0x17
052a 01cc       |    |		Execute	Vector,Catenate
052b 8027       | '  |		Call	0x0,0x27
052c e41c       |    |		Load	0x2,0x1c
052d e41b       |    |		Load	0x2,0x1b
052e e01c       |    |		Load	0x0,0x1c
052f e420       |    |		Load	0x2,0x20
0530 0096       |    |		Execute	Package,Entry
0531 c41c       |    |		Store	0x2,0x1c
0532 e41c       |    |		Load	0x2,0x1c
0533 0120       |    |		Execute	Any,Is_Value
0534 6803       |h   |		Jump_Zero	0x538
0535 e005       |    |		Load	0x0,0x5
0536 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0537 7801       |x   |		Jump	0x539
0538 e41c       |    |		Load	0x2,0x1c
0539 e41b       |    |		Load	0x2,0x1b
053a 0092 08fc  |    |		Action	Push_String_Extended,0x8fc					; "Scanning for Changes in Internal Universe Specs"
053c e01a       |    |		Load	0x0,0x1a
053d e420       |    |		Load	0x2,0x20
053e 0096       |    |		Execute	Package,Entry
053f c41c       |    |		Store	0x2,0x1c
0540 e40f       |    |		Load	0x2,0xf
0541 e415       |    |		Load	0x2,0x15
0542 01cc       |    |		Execute	Vector,Catenate
0543 e40f       |    |		Load	0x2,0xf
0544 e414       |    |		Load	0x2,0x14
0545 01cc       |    |		Execute	Vector,Catenate
0546 e40f       |    |		Load	0x2,0xf
0547 e413       |    |		Load	0x2,0x13
0548 01cc       |    |		Execute	Vector,Catenate
0549 e40f       |    |		Load	0x2,0xf
054a e412       |    |		Load	0x2,0x12
054b 01cc       |    |		Execute	Vector,Catenate
054c 0092 08ef  |    |		Action	Push_String_Extended,0x8ef					; "!"
054e e411       |    |		Load	0x2,0x11
054f 8028       | (  |		Call	0x0,0x28
0550 e41c       |    |		Load	0x2,0x1c
0551 e41b       |    |		Load	0x2,0x1b
0552 e01c       |    |		Load	0x0,0x1c
0553 e420       |    |		Load	0x2,0x20
0554 0096       |    |		Execute	Package,Entry
0555 c41c       |    |		Store	0x2,0x1c
0556 e430       | 0  |		Load	0x2,0x30
0557 683e       |h>  |		Jump_Zero	0x596
0558 0092 08f7  |    |		Action	Push_String_Extended,0x8f7					; "![_[]"
055a e40f       |    |		Load	0x2,0xf
055b 01cc       |    |		Execute	Vector,Catenate
055c e413       |    |		Load	0x2,0x13
055d 01cc       |    |		Execute	Vector,Catenate
055e 0092 08f8  |    |		Action	Push_String_Extended,0x8f8					; "]'BODY"
0560 01cc       |    |		Execute	Vector,Catenate
0561 8004       |    |		Call	0x0,0x4
0562 700b       |p   |		Jump_Nonzero	0x56e
0563 0092 08f7  |    |		Action	Push_String_Extended,0x8f7					; "![_[]"
0565 e40f       |    |		Load	0x2,0xf
0566 01cc       |    |		Execute	Vector,Catenate
0567 e412       |    |		Load	0x2,0x12
0568 01cc       |    |		Execute	Vector,Catenate
0569 0092 08f8  |    |		Action	Push_String_Extended,0x8f8					; "]'BODY"
056b 01cc       |    |		Execute	Vector,Catenate
056c 8004       |    |		Call	0x0,0x4
056d 6828       |h(  |		Jump_Zero	0x596
056e e41c       |    |		Load	0x2,0x1c
056f 0120       |    |		Execute	Any,Is_Value
0570 6803       |h   |		Jump_Zero	0x574
0571 e005       |    |		Load	0x0,0x5
0572 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0573 7801       |x   |		Jump	0x575
0574 e41c       |    |		Load	0x2,0x1c
0575 e41b       |    |		Load	0x2,0x1b
0576 0092 08f9  |    |		Action	Push_String_Extended,0x8f9					; "Creating Text Backup of Existing Bodies to be Modified"
0578 e01a       |    |		Load	0x0,0x1a
0579 e420       |    |		Load	0x2,0x20
057a 0096       |    |		Execute	Package,Entry
057b c41c       |    |		Store	0x2,0x1c
057c 0092 08f7  |    |		Action	Push_String_Extended,0x8f7					; "![_[]"
057e e40f       |    |		Load	0x2,0xf
057f 01cc       |    |		Execute	Vector,Catenate
0580 e413       |    |		Load	0x2,0x13
0581 01cc       |    |		Execute	Vector,Catenate
0582 0092 08f8  |    |		Action	Push_String_Extended,0x8f8					; "]'BODY"
0584 01cc       |    |		Execute	Vector,Catenate
0585 8029       | )  |		Call	0x0,0x29
0586 0092 08f7  |    |		Action	Push_String_Extended,0x8f7					; "![_[]"
0588 e40f       |    |		Load	0x2,0xf
0589 01cc       |    |		Execute	Vector,Catenate
058a e412       |    |		Load	0x2,0x12
058b 01cc       |    |		Execute	Vector,Catenate
058c 0092 08f8  |    |		Action	Push_String_Extended,0x8f8					; "]'BODY"
058e 01cc       |    |		Execute	Vector,Catenate
058f 8029       | )  |		Call	0x0,0x29
0590 e41c       |    |		Load	0x2,0x1c
0591 e41b       |    |		Load	0x2,0x1b
0592 e01c       |    |		Load	0x0,0x1c
0593 e420       |    |		Load	0x2,0x20
0594 0096       |    |		Execute	Package,Entry
0595 c41c       |    |		Store	0x2,0x1c
0596 e435       | 5  |		Load	0x2,0x35
0597 6807       |h   |		Jump_Zero	0x59f
0598 4801       |H   |		Short_Literal	0x1
0599 e40d       |    |		Load	0x2,0xd
059a 0092 08fd  |    |		Action	Push_String_Extended,0x8fd					; ".Lrm.System"
059c 01cc       |    |		Execute	Vector,Catenate
059d e02a       | *  |		Load	0x0,0x2a
059e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
059f e433       | 3  |		Load	0x2,0x33
05a0 700b       |p   |		Jump_Nonzero	0x5ac
05a1 e40b       |    |		Load	0x2,0xb
05a2 e412       |    |		Load	0x2,0x12
05a3 01cc       |    |		Execute	Vector,Catenate
05a4 8022       | "  |		Call	0x0,0x22
05a5 7006       |p   |		Jump_Nonzero	0x5ac
05a6 0092 08fe  |    |		Action	Push_String_Extended,0x8fe					; "Installing Changed Universe Units"
05a8 e019       |    |		Load	0x0,0x19
05a9 e420       |    |		Load	0x2,0x20
05aa 0096       |    |		Execute	Package,Entry
05ab 8602       |    |		Call	0x3,0x2
05ac e409       |    |		Load	0x2,0x9
05ad 680b       |h   |		Jump_Zero	0x5b9
05ae e40f       |    |		Load	0x2,0xf
05af e412       |    |		Load	0x2,0x12
05b0 01cc       |    |		Execute	Vector,Catenate
05b1 8022       | "  |		Call	0x0,0x22
05b2 7006       |p   |		Jump_Nonzero	0x5b9
05b3 0092 08ff  |    |		Action	Push_String_Extended,0x8ff					; "Installing Changed Internal Universe Units"
05b5 e019       |    |		Load	0x0,0x19
05b6 e420       |    |		Load	0x2,0x20
05b7 0096       |    |		Execute	Package,Entry
05b8 8603       |    |		Call	0x3,0x3
05b9 e434       | 4  |		Load	0x2,0x34
05ba 681e       |h   |		Jump_Zero	0x5d9
05bb e41c       |    |		Load	0x2,0x1c
05bc 0120       |    |		Execute	Any,Is_Value
05bd 6803       |h   |		Jump_Zero	0x5c1
05be e005       |    |		Load	0x0,0x5
05bf 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05c0 7801       |x   |		Jump	0x5c2
05c1 e41c       |    |		Load	0x2,0x1c
05c2 e41b       |    |		Load	0x2,0x1b
05c3 0092 0900  |    |		Action	Push_String_Extended,0x900					; "Re-Installing Keymap/Initialize/Abbreviations Bodies."
05c5 e01a       |    |		Load	0x0,0x1a
05c6 e420       |    |		Load	0x2,0x20
05c7 0096       |    |		Execute	Package,Entry
05c8 c41c       |    |		Store	0x2,0x1c
05c9 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
05cb 4800       |H   |		Short_Literal	0x0
05cc 0092 0901  |    |		Action	Push_String_Extended,0x901					; "<ALL_WORLDS>"
05ce 4803       |H   |		Short_Literal	0x3
05cf 4803       |H   |		Short_Literal	0x3
05d0 e41a       |    |		Load	0x2,0x1a
05d1 e023       | #  |		Load	0x0,0x23
05d2 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
05d3 e41c       |    |		Load	0x2,0x1c
05d4 e41b       |    |		Load	0x2,0x1b
05d5 e01c       |    |		Load	0x0,0x1c
05d6 e420       |    |		Load	0x2,0x20
05d7 0096       |    |		Execute	Package,Entry
05d8 c41c       |    |		Store	0x2,0x1c
05d9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05da			TRAP_0350:
05da 0007       |    |		Action	Break_Optional
05db e00a       |    |		Load	0x0,0xa
05dc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05dd 4808       |H   |		Short_Literal	0x8
05de 4801       |H   |		Short_Literal	0x1
05df 4801       |H   |		Short_Literal	0x1
05e0 e01d       |    |		Load	0x0,0x1d
05e1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05e2 0092 0902  |    |		Action	Push_String_Extended,0x902					; " raised while Updating Environment Specs"
05e4 01cc       |    |		Execute	Vector,Catenate
05e5 e010       |    |		Load	0x0,0x10
05e6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05e7 e005       |    |		Load	0x0,0x5
05e8 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
05e9 e41c       |    |		Load	0x2,0x1c
05ea 012f       | /  |		Execute	Any,Equal
05eb 680d       |h   |		Jump_Zero	0x5f9
05ec e00a       |    |		Load	0x0,0xa
05ed 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05ee 4805       |H   |		Short_Literal	0x5
05ef 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; "Step has Failed"
05f1 e010       |    |		Load	0x0,0x10
05f2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05f3 e41c       |    |		Load	0x2,0x1c
05f4 e41b       |    |		Load	0x2,0x1b
05f5 e01c       |    |		Load	0x0,0x1c
05f6 e420       |    |		Load	0x2,0x20
05f7 0096       |    |		Execute	Package,Entry
05f8 c41c       |    |		Store	0x2,0x1c
05f9 0092 0903  |    |		Action	Push_String_Extended,0x903					; "Updating Environment Specs has failed"
05fb e01e       |    |		Load	0x0,0x1e
05fc e420       |    |		Load	0x2,0x20
05fd 0096       |    |		Execute	Package,Entry
05fe 4801       |H   |		Short_Literal	0x1
05ff a425       | %  |		Store_Unchecked	0x2,0x25
0600 00d8       |    |		Load_Top	At_Offset_0
0601 0101       |    |		Execute	Exception,Reraise
0602 0000 0000  |    |		.BLANK	0000[0x6]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b       |    |		.CONST	0x060b								; Address of begin
0609 0731       | 1  |		.CONST	0x0731								; Address of exception handler
060a 0001       |    |		.CONST	0x0001								; Number of locals
060b			BODY_0608:
060b			INIT_0608:
060b 0092 0904  |    |		Action	Push_String_Extended,0x904					; "Updating Miscellaneous Universe Items"
060d e019       |    |		Load	0x0,0x19
060e e420       |    |		Load	0x2,0x20
060f 0096       |    |		Execute	Package,Entry
0610 e42f       | /  |		Load	0x2,0x2f
0611 6864       |hd  |		Jump_Zero	0x676
0612 e41c       |    |		Load	0x2,0x1c
0613 0120       |    |		Execute	Any,Is_Value
0614 6803       |h   |		Jump_Zero	0x618
0615 e005       |    |		Load	0x0,0x5
0616 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0617 7801       |x   |		Jump	0x619
0618 e41c       |    |		Load	0x2,0x1c
0619 e41b       |    |		Load	0x2,0x1b
061a 0092 0905  |    |		Action	Push_String_Extended,0x905					; "Restoring Miscellaneous System Components"
061c e01a       |    |		Load	0x0,0x1a
061d e420       |    |		Load	0x2,0x20
061e 0096       |    |		Execute	Package,Entry
061f c41c       |    |		Store	0x2,0x1c
0620 e426       | &  |		Load	0x2,0x26
0621 0092 0906  |    |		Action	Push_String_Extended,0x906					; "!Copyright_Rational"
0623 802b       | +  |		Call	0x0,0x2b
0624 00d1       |    |		Pop_Control	Pop_Count_1
0625 00ea       |    |		Load_Encached	Null_String_Cache
0626 4801       |H   |		Short_Literal	0x1
0627 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
0629 4801       |H   |		Short_Literal	0x1
062a 0092 0906  |    |		Action	Push_String_Extended,0x906					; "!Copyright_Rational"
062c e40b       |    |		Load	0x2,0xb
062d 0092 0907  |    |		Action	Push_String_Extended,0x907					; "Copyright_Notice"
062f 01cc       |    |		Execute	Vector,Catenate
0630 e014       |    |		Load	0x0,0x14
0631 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0632 e426       | &  |		Load	0x2,0x26
0633 802c       | ,  |		Call	0x0,0x2c
0634 00d1       |    |		Pop_Control	Pop_Count_1
0635 e40b       |    |		Load	0x2,0xb
0636 0092 0908  |    |		Action	Push_String_Extended,0x908					; "Environment_Release@"
0638 01cc       |    |		Execute	Vector,Catenate
0639 8004       |    |		Call	0x0,0x4
063a 680d       |h   |		Jump_Zero	0x648
063b 00ea       |    |		Load_Encached	Null_String_Cache
063c 4801       |H   |		Short_Literal	0x1
063d 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
063f 4801       |H   |		Short_Literal	0x1
0640 0092 0909  |    |		Action	Push_String_Extended,0x909					; "!Machine.Release.Release_Notes"
0642 e40b       |    |		Load	0x2,0xb
0643 0092 0908  |    |		Action	Push_String_Extended,0x908					; "Environment_Release@"
0645 01cc       |    |		Execute	Vector,Catenate
0646 e014       |    |		Load	0x0,0x14
0647 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0648 e433       | 3  |		Load	0x2,0x33
0649 7010       |p   |		Jump_Nonzero	0x65a
064a 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
064c e40a       |    |		Load	0x2,0xa
064d 0092 090a  |    |		Action	Push_String_Extended,0x90a					; "Miscellany"
064f 01cc       |    |		Execute	Vector,Catenate
0650 0092 090b  |    |		Action	Push_String_Extended,0x90b					; "R1000, Changed, Replace, Remake"
0652 0092 08f2  |    |		Action	Push_String_Extended,0x8f2					; "*"
0654 0092 08f2  |    |		Action	Push_String_Extended,0x8f2					; "*"
0656 0092 08f3  |    |		Action	Push_String_Extended,0x8f3					; "?"
0658 e025       | %  |		Load	0x0,0x25
0659 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
065a e40e       |    |		Load	0x2,0xe
065b 0092 090a  |    |		Action	Push_String_Extended,0x90a					; "Miscellany"
065d 01cc       |    |		Execute	Vector,Catenate
065e 8004       |    |		Call	0x0,0x4
065f 6810       |h   |		Jump_Zero	0x670
0660 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
0662 e40e       |    |		Load	0x2,0xe
0663 0092 090a  |    |		Action	Push_String_Extended,0x90a					; "Miscellany"
0665 01cc       |    |		Execute	Vector,Catenate
0666 0092 090c  |    |		Action	Push_String_Extended,0x90c					; "R1000, New, Replace, Remake"
0668 0092 08f2  |    |		Action	Push_String_Extended,0x8f2					; "*"
066a 0092 08f2  |    |		Action	Push_String_Extended,0x8f2					; "*"
066c 0092 08f3  |    |		Action	Push_String_Extended,0x8f3					; "?"
066e e025       | %  |		Load	0x0,0x25
066f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0670 e41c       |    |		Load	0x2,0x1c
0671 e41b       |    |		Load	0x2,0x1b
0672 e01c       |    |		Load	0x0,0x1c
0673 e420       |    |		Load	0x2,0x20
0674 0096       |    |		Execute	Package,Entry
0675 c41c       |    |		Store	0x2,0x1c
0676 e433       | 3  |		Load	0x2,0x33
0677 7020       |p   |		Jump_Nonzero	0x698
0678 e41c       |    |		Load	0x2,0x1c
0679 0120       |    |		Execute	Any,Is_Value
067a 6803       |h   |		Jump_Zero	0x67e
067b e005       |    |		Load	0x0,0x5
067c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
067d 7801       |x   |		Jump	0x67f
067e e41c       |    |		Load	0x2,0x1c
067f e41b       |    |		Load	0x2,0x1b
0680 0092 090d  |    |		Action	Push_String_Extended,0x90d					; "Authorizing Lrm_Interface"
0682 e01a       |    |		Load	0x0,0x1a
0683 e420       |    |		Load	0x2,0x20
0684 0096       |    |		Execute	Package,Entry
0685 c41c       |    |		Store	0x2,0x1c
0686 00ea       |    |		Load_Encached	Null_String_Cache
0687 00ea       |    |		Load_Encached	Null_String_Cache
0688 e02d       | -  |		Load	0x0,0x2d
0689 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
068a 0092 090e  |    |		Action	Push_String_Extended,0x90e					; "Lrm_Interface"
068c e020       |    |		Load	0x0,0x20
068d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
068e 0092 090e  |    |		Action	Push_String_Extended,0x90e					; "Lrm_Interface"
0690 e020       |    |		Load	0x0,0x20
0691 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0692 e41c       |    |		Load	0x2,0x1c
0693 e41b       |    |		Load	0x2,0x1b
0694 e01c       |    |		Load	0x0,0x1c
0695 e420       |    |		Load	0x2,0x20
0696 0096       |    |		Execute	Package,Entry
0697 c41c       |    |		Store	0x2,0x1c
0698 e433       | 3  |		Load	0x2,0x33
0699 7020       |p   |		Jump_Nonzero	0x6ba
069a e41c       |    |		Load	0x2,0x1c
069b 0120       |    |		Execute	Any,Is_Value
069c 6803       |h   |		Jump_Zero	0x6a0
069d e005       |    |		Load	0x0,0x5
069e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
069f 7801       |x   |		Jump	0x6a1
06a0 e41c       |    |		Load	0x2,0x1c
06a1 e41b       |    |		Load	0x2,0x1b
06a2 0092 090f  |    |		Action	Push_String_Extended,0x90f					; "Authorizing X Interface"
06a4 e01a       |    |		Load	0x0,0x1a
06a5 e420       |    |		Load	0x2,0x20
06a6 0096       |    |		Execute	Package,Entry
06a7 c41c       |    |		Store	0x2,0x1c
06a8 00ea       |    |		Load_Encached	Null_String_Cache
06a9 00ea       |    |		Load_Encached	Null_String_Cache
06aa e02d       | -  |		Load	0x0,0x2d
06ab 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
06ac 0092 0910  |    |		Action	Push_String_Extended,0x910					; "X Interface"
06ae e020       |    |		Load	0x0,0x20
06af 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
06b0 0092 0910  |    |		Action	Push_String_Extended,0x910					; "X Interface"
06b2 e020       |    |		Load	0x0,0x20
06b3 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
06b4 e41c       |    |		Load	0x2,0x1c
06b5 e41b       |    |		Load	0x2,0x1b
06b6 e01c       |    |		Load	0x0,0x1c
06b7 e420       |    |		Load	0x2,0x20
06b8 0096       |    |		Execute	Package,Entry
06b9 c41c       |    |		Store	0x2,0x1c
06ba e42e       | .  |		Load	0x2,0x2e
06bb 6834       |h4  |		Jump_Zero	0x6f0
06bc e41c       |    |		Load	0x2,0x1c
06bd 0120       |    |		Execute	Any,Is_Value
06be 6803       |h   |		Jump_Zero	0x6c2
06bf e005       |    |		Load	0x0,0x5
06c0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06c1 7801       |x   |		Jump	0x6c3
06c2 e41c       |    |		Load	0x2,0x1c
06c3 e41b       |    |		Load	0x2,0x1b
06c4 0092 0911  |    |		Action	Push_String_Extended,0x911					; "Enabling \x22Install_Subsystems\x22 to run on next reboot."
06c6 e01a       |    |		Load	0x0,0x1a
06c7 e420       |    |		Load	0x2,0x20
06c8 0096       |    |		Execute	Package,Entry
06c9 c41c       |    |		Store	0x2,0x1c
06ca 0092 0912  |    |		Action	Push_String_Extended,0x912					; "!Machine"
06cc 4800       |H   |		Short_Literal	0x0
06cd 0092 08f3  |    |		Action	Push_String_Extended,0x8f3					; "?"
06cf 0092 0913  |    |		Action	Push_String_Extended,0x913					; "Install_Subsystems"
06d1 e02e       | .  |		Load	0x0,0x2e
06d2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
06d3 680a       |h   |		Jump_Zero	0x6de
06d4 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
06d6 4800       |H   |		Short_Literal	0x0
06d7 0092 0901  |    |		Action	Push_String_Extended,0x901					; "<ALL_WORLDS>"
06d9 4801       |H   |		Short_Literal	0x1
06da 0092 0914  |    |		Action	Push_String_Extended,0x914					; "!Machine`Install_Subsystems"
06dc e023       | #  |		Load	0x0,0x23
06dd 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
06de 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
06e0 0092 0912  |    |		Action	Push_String_Extended,0x912					; "!Machine"
06e2 0092 0915  |    |		Action	Push_String_Extended,0x915					; "#"
06e4 e5ff       |    |		Load	0x2,-0x1
06e5 0092 0916  |    |		Action	Push_String_Extended,0x916					; "`Install_Subsystems"
06e7 01cc       |    |		Execute	Vector,Catenate
06e8 e02f       | /  |		Load	0x0,0x2f
06e9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06ea e41c       |    |		Load	0x2,0x1c
06eb e41b       |    |		Load	0x2,0x1b
06ec e01c       |    |		Load	0x0,0x1c
06ed e420       |    |		Load	0x2,0x20
06ee 0096       |    |		Execute	Package,Entry
06ef c41c       |    |		Store	0x2,0x1c
06f0 e40b       |    |		Load	0x2,0xb
06f1 0092 08e3  |    |		Action	Push_String_Extended,0x8e3					; "Frozen_Worlds_Of_The_Universe"
06f3 01cc       |    |		Execute	Vector,Catenate
06f4 8004       |    |		Call	0x0,0x4
06f5 6820       |h   |		Jump_Zero	0x716
06f6 e41c       |    |		Load	0x2,0x1c
06f7 0120       |    |		Execute	Any,Is_Value
06f8 6803       |h   |		Jump_Zero	0x6fc
06f9 e005       |    |		Load	0x0,0x5
06fa 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06fb 7801       |x   |		Jump	0x6fd
06fc e41c       |    |		Load	0x2,0x1c
06fd e41b       |    |		Load	0x2,0x1b
06fe 0092 0917  |    |		Action	Push_String_Extended,0x917					; "Refreezing Worlds of the Universe"
0700 e01a       |    |		Load	0x0,0x1a
0701 e420       |    |		Load	0x2,0x20
0702 0096       |    |		Execute	Package,Entry
0703 c41c       |    |		Store	0x2,0x1c
0704 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
0706 4800       |H   |		Short_Literal	0x0
0707 0092 08e9  |    |		Action	Push_String_Extended,0x8e9					; "_"
0709 e40b       |    |		Load	0x2,0xb
070a 01cc       |    |		Execute	Vector,Catenate
070b 0092 08e3  |    |		Action	Push_String_Extended,0x8e3					; "Frozen_Worlds_Of_The_Universe"
070d 01cc       |    |		Execute	Vector,Catenate
070e e014       |    |		Load	0x0,0x14
070f 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0710 e41c       |    |		Load	0x2,0x1c
0711 e41b       |    |		Load	0x2,0x1b
0712 e01c       |    |		Load	0x0,0x1c
0713 e420       |    |		Load	0x2,0x20
0714 0096       |    |		Execute	Package,Entry
0715 c41c       |    |		Store	0x2,0x1c
0716 e41c       |    |		Load	0x2,0x1c
0717 0120       |    |		Execute	Any,Is_Value
0718 6803       |h   |		Jump_Zero	0x71c
0719 e005       |    |		Load	0x0,0x5
071a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
071b 7801       |x   |		Jump	0x71d
071c e41c       |    |		Load	0x2,0x1c
071d e41b       |    |		Load	0x2,0x1b
071e 0092 0918  |    |		Action	Push_String_Extended,0x918					; "Running Snapshot Daemon"
0720 e01a       |    |		Load	0x0,0x1a
0721 e420       |    |		Load	0x2,0x20
0722 0096       |    |		Execute	Package,Entry
0723 c41c       |    |		Store	0x2,0x1c
0724 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
0726 0092 0919  |    |		Action	Push_String_Extended,0x919					; "snap"
0728 e030       | 0  |		Load	0x0,0x30
0729 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
072a e41c       |    |		Load	0x2,0x1c
072b e41b       |    |		Load	0x2,0x1b
072c e01c       |    |		Load	0x0,0x1c
072d e420       |    |		Load	0x2,0x20
072e 0096       |    |		Execute	Package,Entry
072f c41c       |    |		Store	0x2,0x1c
0730 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0731			TRAP_0608:
0731 0007       |    |		Action	Break_Optional
0732 e00a       |    |		Load	0x0,0xa
0733 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0734 4808       |H   |		Short_Literal	0x8
0735 4801       |H   |		Short_Literal	0x1
0736 4801       |H   |		Short_Literal	0x1
0737 e01d       |    |		Load	0x0,0x1d
0738 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0739 0092 091a  |    |		Action	Push_String_Extended,0x91a					; " raised while Updating Miscellaneous Items"
073b 01cc       |    |		Execute	Vector,Catenate
073c e010       |    |		Load	0x0,0x10
073d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
073e e005       |    |		Load	0x0,0x5
073f 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0740 e41c       |    |		Load	0x2,0x1c
0741 012f       | /  |		Execute	Any,Equal
0742 680d       |h   |		Jump_Zero	0x750
0743 e00a       |    |		Load	0x0,0xa
0744 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0745 4805       |H   |		Short_Literal	0x5
0746 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; "Step has Failed"
0748 e010       |    |		Load	0x0,0x10
0749 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
074a e41c       |    |		Load	0x2,0x1c
074b e41b       |    |		Load	0x2,0x1b
074c e01c       |    |		Load	0x0,0x1c
074d e420       |    |		Load	0x2,0x20
074e 0096       |    |		Execute	Package,Entry
074f c41c       |    |		Store	0x2,0x1c
0750 0092 091b  |    |		Action	Push_String_Extended,0x91b					; "Updating Miscellaneous Items has failed"
0752 e01e       |    |		Load	0x0,0x1e
0753 e420       |    |		Load	0x2,0x20
0754 0096       |    |		Execute	Package,Entry
0755 4801       |H   |		Short_Literal	0x1
0756 a425       | %  |		Store_Unchecked	0x2,0x25
0757 00d8       |    |		Load_Top	At_Offset_0
0758 0101       |    |		Execute	Exception,Reraise
0759 0000 0000  |    |		.BLANK	0000[0x7]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0768       | h  |		.CONST	0x0768								; Address of begin
0761 07c3       |    |		.CONST	0x07c3								; Address of exception handler
0762 0002       |    |		.CONST	0x0002								; Number of locals
0763			INIT_0760:
0763 e005       |    |		Load	0x0,0x5
0764 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0765 02c7       |    |		Declare_Variable	Any
0766 00d8       |    |		Load_Top	At_Offset_0
0767 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0768			BODY_0760:
0768 0092 091c  |    |		Action	Push_String_Extended,0x91c					; "Updating Dfs Files"
076a e019       |    |		Load	0x0,0x19
076b e420       |    |		Load	0x2,0x20
076c 0096       |    |		Execute	Package,Entry
076d 4800       |H   |		Short_Literal	0x0
076e 0092 091d  |    |		Action	Push_String_Extended,0x91d					; "D_12_6_4"
0770 e404       |    |		Load	0x2,0x4
0771 e016       |    |		Load	0x0,0x16
0772 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0773 6848       |hH  |		Jump_Zero	0x7bc
0774 e407       |    |		Load	0x2,0x7
0775 8004       |    |		Call	0x0,0x4
0776 683e       |h>  |		Jump_Zero	0x7b5
0777 e40b       |    |		Load	0x2,0xb
0778 0092 091e  |    |		Action	Push_String_Extended,0x91e					; "Dfs_Installed"
077a 01cc       |    |		Execute	Vector,Catenate
077b 8004       |    |		Call	0x0,0x4
077c 7031       |p1  |		Jump_Nonzero	0x7ae
077d e41c       |    |		Load	0x2,0x1c
077e 0120       |    |		Execute	Any,Is_Value
077f 6803       |h   |		Jump_Zero	0x783
0780 e005       |    |		Load	0x0,0x5
0781 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0782 7801       |x   |		Jump	0x784
0783 e41c       |    |		Load	0x2,0x1c
0784 e41b       |    |		Load	0x2,0x1b
0785 0092 091f  |    |		Action	Push_String_Extended,0x91f					; "Installing Dfs"
0787 e01a       |    |		Load	0x0,0x1a
0788 e420       |    |		Load	0x2,0x20
0789 0096       |    |		Execute	Package,Entry
078a c41c       |    |		Store	0x2,0x1c
078b 4800       |H   |		Short_Literal	0x0
078c 0092 08c9  |    |		Action	Push_String_Extended,0x8c9					; "<PROFILE>"
078e 4801       |H   |		Short_Literal	0x1
078f e407       |    |		Load	0x2,0x7
0790 0092 0920  |    |		Action	Push_String_Extended,0x920					; "Dfs_Image_File"
0792 8031       | 1  |		Call	0x0,0x31
0793 00d8       |    |		Load_Top	At_Offset_0
0794 00ea       |    |		Load_Encached	Null_String_Cache
0795 e40b       |    |		Load	0x2,0xb
0796 0092 091e  |    |		Action	Push_String_Extended,0x91e					; "Dfs_Installed"
0798 01cc       |    |		Execute	Vector,Catenate
0799 4801       |H   |		Short_Literal	0x1
079a e005       |    |		Load	0x0,0x5
079b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
079c c602       |    |		Store	0x3,0x2
079d 00d8       |    |		Load_Top	At_Offset_0
079e e005       |    |		Load	0x0,0x5
079f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
07a0 c602       |    |		Store	0x3,0x2
07a1 e41c       |    |		Load	0x2,0x1c
07a2 e41b       |    |		Load	0x2,0x1b
07a3 e01c       |    |		Load	0x0,0x1c
07a4 e420       |    |		Load	0x2,0x20
07a5 0096       |    |		Execute	Package,Entry
07a6 c41c       |    |		Store	0x2,0x1c
07a7 4803       |H   |		Short_Literal	0x3
07a8 0092 0921  |   !|		Action	Push_String_Extended,0x921					; "The new Dfs has been installed.  You may now reboot the machine using Reboot_For_New_Release."
07aa e032       | 2  |		Load	0x0,0x32
07ab e420       |    |		Load	0x2,0x20
07ac 0096       |    |		Execute	Package,Entry
07ad 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07ae 4806       |H   |		Short_Literal	0x6
07af 0092 0922  |   "|		Action	Push_String_Extended,0x922					; "It appears that the Dfs has already been installed.  If this is not the case then load the Dfs from tape or contact Rational."
07b1 e032       | 2  |		Load	0x0,0x32
07b2 e420       |    |		Load	0x2,0x20
07b3 0096       |    |		Execute	Package,Entry
07b4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07b5 4806       |H   |		Short_Literal	0x6
07b6 0092 0923  |   #|		Action	Push_String_Extended,0x923					; "The Dfs archive files required to do an environment install of the Dfs do not exist.  The Dfs should be installed from tape, or these files should be copied and installed."
07b8 e032       | 2  |		Load	0x0,0x32
07b9 e420       |    |		Load	0x2,0x20
07ba 0096       |    |		Execute	Package,Entry
07bb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07bc 4806       |H   |		Short_Literal	0x6
07bd 0092 0924  |   $|		Action	Push_String_Extended,0x924					; "The release you are currently running does not allow an environment install of the Dfs.  Please load the Dfs from tape when the machine is brought down."
07bf e032       | 2  |		Load	0x0,0x32
07c0 e420       |    |		Load	0x2,0x20
07c1 0096       |    |		Execute	Package,Entry
07c2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07c3			TRAP_0760:
07c3 0007       |    |		Action	Break_Optional
07c4 e00a       |    |		Load	0x0,0xa
07c5 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
07c6 4808       |H   |		Short_Literal	0x8
07c7 4801       |H   |		Short_Literal	0x1
07c8 4801       |H   |		Short_Literal	0x1
07c9 e01d       |    |		Load	0x0,0x1d
07ca 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
07cb 0092 0925  |   %|		Action	Push_String_Extended,0x925					; " raised while Installing the Dfs"
07cd 01cc       |    |		Execute	Vector,Catenate
07ce e010       |    |		Load	0x0,0x10
07cf 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07d0 e005       |    |		Load	0x0,0x5
07d1 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
07d2 e41c       |    |		Load	0x2,0x1c
07d3 012f       | /  |		Execute	Any,Equal
07d4 680d       |h   |		Jump_Zero	0x7e2
07d5 e00a       |    |		Load	0x0,0xa
07d6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
07d7 4805       |H   |		Short_Literal	0x5
07d8 0092 0926  |   &|		Action	Push_String_Extended,0x926					; "Step has Failed: the machine should be brought down as soon as possible and the Dfs installed by tape."
07da e010       |    |		Load	0x0,0x10
07db 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07dc e41c       |    |		Load	0x2,0x1c
07dd e41b       |    |		Load	0x2,0x1b
07de e01c       |    |		Load	0x0,0x1c
07df e420       |    |		Load	0x2,0x20
07e0 0096       |    |		Execute	Package,Entry
07e1 c41c       |    |		Store	0x2,0x1c
07e2 0092 0927  |   '|		Action	Push_String_Extended,0x927					; "Installation of the Dfs has failed"
07e4 e01e       |    |		Load	0x0,0x1e
07e5 e420       |    |		Load	0x2,0x20
07e6 0096       |    |		Execute	Package,Entry
07e7 4801       |H   |		Short_Literal	0x1
07e8 a425       | %  |		Store_Unchecked	0x2,0x25
07e9 00d8       |    |		Load_Top	At_Offset_0
07ea 0101       |    |		Execute	Exception,Reraise
07eb 0000 0000  |    |		.BLANK	0000[0x5]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f8       |    |		.CONST	0x07f8								; Address of begin
07f1 0814       |    |		.CONST	0x0814								; Address of exception handler
07f2 0002       |    |		.CONST	0x0002								; Number of locals
07f3			INIT_07f0:
07f3 e005       |    |		Load	0x0,0x5
07f4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07f5 02c7       |    |		Declare_Variable	Any
07f6 00d8       |    |		Load_Top	At_Offset_0
07f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07f8			BODY_07f0:
07f8 00d8       |    |		Load_Top	At_Offset_0
07f9 00ea       |    |		Load_Encached	Null_String_Cache
07fa e40c       |    |		Load	0x2,0xc
07fb 0092 0928  |   (|		Action	Push_String_Extended,0x928					; "[Get_Xfer@, ~@_Errors, ~@_Negatives]"
07fd 01cc       |    |		Execute	Vector,Catenate
07fe 4800       |H   |		Short_Literal	0x0
07ff e005       |    |		Load	0x0,0x5
0800 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0801 c802       |    |		Store	0x4,0x2
0802 00cf       |    |		Action	Mark_Auxiliary
0803 7806       |x   |		Jump	0x80a
0804 00d9       |    |		Load_Top	At_Offset_1
0805 e005       |    |		Load	0x0,0x5
0806 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0807 e005       |    |		Load	0x0,0x5
0808 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0809 00c9       |    |		Action	Pop_Auxiliary_Loop
080a 00d9       |    |		Load_Top	At_Offset_1
080b e005       |    |		Load	0x0,0x5
080c 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
080d 6ff6       |o   |		Jump_Zero	0x804
080e 00ce       |    |		Action	Pop_Auxiliary
080f 00d8       |    |		Load_Top	At_Offset_0
0810 e005       |    |		Load	0x0,0x5
0811 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0812 c802       |    |		Store	0x4,0x2
0813 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0814			TRAP_07f0:
0814 00d8       |    |		Load_Top	At_Offset_0
0815 0107       |    |		Execute	Exception,Get_Name
0816 4920       |I   |		Short_Literal	0x120
0817 492f       |I/  |		Short_Literal	0x12f
0818 0262       | b  |		Execute	Discrete,In_Range
0819 6801       |h   |		Jump_Zero	0x81b
081a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
081b 0100       |    |		Execute	Exception,Raise
081c 0000 0000  |    |		.BLANK	0000[0x4]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0828       | (  |		.CONST	0x0828								; Address of begin
0821 0004       |    |		.CONST	0x0004								; Address of exception handler
0822 0002       |    |		.CONST	0x0002								; Number of locals
0823			INIT_0820:
0823 e005       |    |		Load	0x0,0x5
0824 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0825 02c7       |    |		Declare_Variable	Any
0826 00d8       |    |		Load_Top	At_Offset_0
0827 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0828			BODY_0820:
0828 00d8       |    |		Load_Top	At_Offset_0
0829 00ea       |    |		Load_Encached	Null_String_Cache
082a e40b       |    |		Load	0x2,0xb
082b 0092 0929  |   )|		Action	Push_String_Extended,0x929					; "Design_Facility_Xfer"
082d 01cc       |    |		Execute	Vector,Catenate
082e 4801       |H   |		Short_Literal	0x1
082f e005       |    |		Load	0x0,0x5
0830 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0831 c802       |    |		Store	0x4,0x2
0832 0092 092a  |   *|		Action	Push_String_Extended,0x92a					; ":Design_Facility.Mload"
0834 00d9       |    |		Load_Top	At_Offset_1
0835 e005       |    |		Load	0x0,0x5
0836 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0837 00d8       |    |		Load_Top	At_Offset_0
0838 e005       |    |		Load	0x0,0x5
0839 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
083a c802       |    |		Store	0x4,0x2
083b 4801       |H   |		Short_Literal	0x1
083c e40b       |    |		Load	0x2,0xb
083d 0092 0929  |   )|		Action	Push_String_Extended,0x929					; "Design_Facility_Xfer"
083f 01cc       |    |		Execute	Vector,Catenate
0840 8033       | 3  |		Call	0x0,0x33
0841 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0842 0000 0000  |    |		.BLANK	0000[0x6]
0848 ; --------------------------------------------------------------------------------------
0848 ; SUBPROGRAM
0848 ; --------------------------------------------------------------------------------------
0848 0850       | P  |		.CONST	0x0850								; Address of begin
0849 0004       |    |		.CONST	0x0004								; Address of exception handler
084a 0002       |    |		.CONST	0x0002								; Number of locals
084b			INIT_0848:
084b e005       |    |		Load	0x0,0x5
084c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
084d 02c7       |    |		Declare_Variable	Any
084e 00d8       |    |		Load_Top	At_Offset_0
084f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0850			BODY_0848:
0850 00d8       |    |		Load_Top	At_Offset_0
0851 00ea       |    |		Load_Encached	Null_String_Cache
0852 e40b       |    |		Load	0x2,0xb
0853 0092 092b  |   +|		Action	Push_String_Extended,0x92b					; "Mail_Xfer"
0855 01cc       |    |		Execute	Vector,Catenate
0856 4801       |H   |		Short_Literal	0x1
0857 e005       |    |		Load	0x0,0x5
0858 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0859 c802       |    |		Store	0x4,0x2
085a 0092 092c  |   ,|		Action	Push_String_Extended,0x92c					; ":Mail.Mload"
085c 00d9       |    |		Load_Top	At_Offset_1
085d e005       |    |		Load	0x0,0x5
085e 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
085f 00d8       |    |		Load_Top	At_Offset_0
0860 e005       |    |		Load	0x0,0x5
0861 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0862 c802       |    |		Store	0x4,0x2
0863 4801       |H   |		Short_Literal	0x1
0864 e40b       |    |		Load	0x2,0xb
0865 0092 092b  |   +|		Action	Push_String_Extended,0x92b					; "Mail_Xfer"
0867 01cc       |    |		Execute	Vector,Catenate
0868 8033       | 3  |		Call	0x0,0x33
0869 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
086a 0000 0000  |    |		.BLANK	0000[0x6]
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 0873       | s  |		.CONST	0x0873								; Address of begin
0871 087c       | |  |		.CONST	0x087c								; Address of exception handler
0872 0001       |    |		.CONST	0x0001								; Number of locals
0873			BODY_0870:
0873			INIT_0870:
0873 e40a       |    |		Load	0x2,0xa
0874 0092 08ee  |    |		Action	Push_String_Extended,0x8ee					; "Universe"
0876 01cc       |    |		Execute	Vector,Catenate
0877 e40b       |    |		Load	0x2,0xb
0878 e412       |    |		Load	0x2,0x12
0879 01cc       |    |		Execute	Vector,Catenate
087a 8034       | 4  |		Call	0x0,0x34
087b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
087c			TRAP_0870:
087c 0007       |    |		Action	Break_Optional
087d 0092 092d  |   -|		Action	Push_String_Extended,0x92d					; "Installing Changed Universe Units has failed"
087f e01e       |    |		Load	0x0,0x1e
0880 e420       |    |		Load	0x2,0x20
0881 0096       |    |		Execute	Package,Entry
0882 4801       |H   |		Short_Literal	0x1
0883 a425       | %  |		Store_Unchecked	0x2,0x25
0884 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0885 0000 0000  |    |		.XXX[0x3]
0887 0000       |    |
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 088b       |    |		.CONST	0x088b								; Address of begin
0889 0894       |    |		.CONST	0x0894								; Address of exception handler
088a 0001       |    |		.CONST	0x0001								; Number of locals
088b			BODY_0888:
088b			INIT_0888:
088b e40e       |    |		Load	0x2,0xe
088c 0092 08ee  |    |		Action	Push_String_Extended,0x8ee					; "Universe"
088e 01cc       |    |		Execute	Vector,Catenate
088f e40f       |    |		Load	0x2,0xf
0890 e412       |    |		Load	0x2,0x12
0891 01cc       |    |		Execute	Vector,Catenate
0892 8034       | 4  |		Call	0x0,0x34
0893 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0894			TRAP_0888:
0894 0007       |    |		Action	Break_Optional
0895 0092 092e  |   .|		Action	Push_String_Extended,0x92e					; "Installing Changed Internal Universe Units has failed"
0897 e01e       |    |		Load	0x0,0x1e
0898 e420       |    |		Load	0x2,0x20
0899 0096       |    |		Execute	Package,Entry
089a 4801       |H   |		Short_Literal	0x1
089b a425       | %  |		Store_Unchecked	0x2,0x25
089c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
089d ; --------------------------------------------------------------------------------------
089d ; STRING TABLE
089d ; --------------------------------------------------------------------------------------
089d 0126       | &  |		.STRTAB	0x0126->0x0930							; "NIL"
089e 0127       | '  |		.STRTAB	0x0127->0x0931							; "EEDB_UPDATE"
089f 0130       | 0  |		.STRTAB	0x0130->0x0937							; "DFS_UPDATE"
08a0 0138       | 8  |		.STRTAB	0x0138->0x093c							; "UNIVERSE_UPDATE"
08a1 0145       | E  |		.STRTAB	0x0145->0x0943							; "SUBSYSTEMS_UPDATE"
08a2 0154       | T  |		.STRTAB	0x0154->0x094c							; "MISCELLANY_UPDATE"
08a3 0163       | c  |		.STRTAB	0x0163->0x0954							; "SWITCHES_UPDATE"
08a4 0170       | p  |		.STRTAB	0x0170->0x095c							; "MAIL_INIT"
08a5 0177       | w  |		.STRTAB	0x0177->0x0960							; "MAIL_UPDATE"
08a6 0180       |    |		.STRTAB	0x0180->0x0966							; "PRE_DEMOTE"
08a7 0188       |    |		.STRTAB	0x0188->0x096b							; "BACKUP_BODIES"
08a8 0193       |    |		.STRTAB	0x0193->0x0971							; "REMOVE_READ_ONLY_PRAGMA"
08a9 01a8       |    |		.STRTAB	0x01a8->0x097d							; "INTERNAL_ONLY"
08aa 01b3       |    |		.STRTAB	0x01b3->0x0983							; "!Machine.Release.Archive.Environment."
08ab 01d6       |    |		.STRTAB	0x01d6->0x0996							; ".Segments"
08ac 01dd       |    |		.STRTAB	0x01dd->0x099a							; ".Dfs_Image"
08ad 01e5       |    |		.STRTAB	0x01e5->0x099f							; ".Internal"
08ae 01ec       |    |		.STRTAB	0x01ec->0x09a4							; ".Archives."
08af 01f4       |    |		.STRTAB	0x01f4->0x09a9							; ".Lists."
08b0 01f9       |    |		.STRTAB	0x01f9->0x09ac							; ".Logs."
08b1 01fd       |    |		.STRTAB	0x01fd->0x09af							; ".Universe"
08b2 0204       |    |		.STRTAB	0x0204->0x09b4							; "Updated_Units"
08b3 020f       |    |		.STRTAB	0x020f->0x09ba							; "Units_To_Be_Updated"
08b4 0220       |    |		.STRTAB	0x0220->0x09c4							; "Forced_Units"
08b5 022a       | *  |		.STRTAB	0x022a->0x09ca							; "Banned_Units"
08b6 0234       | 4  |		.STRTAB	0x0234->0x09d0							; "Incremental_Update_Directives"
08b7 024f       | O  |		.STRTAB	0x024f->0x09de							; "Changes_To_Parameter_Defaults"
08b8 026a       | j  |		.STRTAB	0x026a->0x09ed							; "Worlds_Of_The_Universe"
08b9 027e       | ~  |		.STRTAB	0x027e->0x09f8							; "Release_Subs"
08ba 0288       |    |		.STRTAB	0x0288->0x09fe							; "[!Commands.Abbreviations.@, !Machine.[Editor_Data.@_Commands]]'Body"
08bb 02c9       |    |		.STRTAB	0x02c9->0x0a1f							; "Current_Install_Step"
08bc 02db       |    |		.STRTAB	0x02db->0x0a29							; ".Master_Log_File"
08bd 02e9       |    |		.STRTAB	0x02e9->0x0a31							; "Install_Product"
08be 02f6       |    |		.STRTAB	0x02f6->0x0a39							; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
08bf 0367       | g  |		.STRTAB	0x0367->0x0a72							; "Eedb_Update..Internal_Only => Boolean"
08c0 038a       |    |		.STRTAB	0x038a->0x0a85							; "Pre_Demote => Pre-Demote"
08c1 03a0       |    |		.STRTAB	0x03a0->0x0a91							; ", backup"
08c2 03a6       |    |		.STRTAB	0x03a6->0x0a95							; "[Install_Product (Release_World => \x22"
08c3 03c8       |    |		.STRTAB	0x03c8->0x0aa7							; "\x22, Options => \x22"
08c4 03d5       |    |		.STRTAB	0x03d5->0x0aae							; "\x22);]"
08c5 03d7       |    |		.STRTAB	0x03d7->0x0ab0							; "Aborting environment installation: Could not set PRIVILEGED MODE."
08c6 0416       |    |		.STRTAB	0x0416->0x0ad1							; "Combined_Mload"
08c7 0422       | "  |		.STRTAB	0x0422->0x0ad8							; "Aborting environment installation: "
08c8 0443       | C  |		.STRTAB	0x0443->0x0ae9							; " is not a release world."
08c9 0459       | Y  |		.STRTAB	0x0459->0x0af5							; "<PROFILE>"
08ca 0460       | `  |		.STRTAB	0x0460->0x0afa							; "Installing Environment Release "
08cb 047d       | }  |		.STRTAB	0x047d->0x0b09							; "D_12_6_5"
08cc 0483       |    |		.STRTAB	0x0483->0x0b0d							; "Install_Product has failed"
08cd 049b       |    |		.STRTAB	0x049b->0x0b1a							; "Install_Product has completed"
08ce 04b6       |    |		.STRTAB	0x04b6->0x0b29							; "[Install_Product has completed]"
08cf 04d3       |    |		.STRTAB	0x04d3->0x0b38							; "[Install_Product has failed]"
08d0 04ed       |    |		.STRTAB	0x04ed->0x0b46							; "Preserving Machine State"
08d1 0503       |    |		.STRTAB	0x0503->0x0b52							; "Processing Switch Files"
08d2 0518       |    |		.STRTAB	0x0518->0x0b5e							; "!.??'c(Switch)"
08d3 0524       | $  |		.STRTAB	0x0524->0x0b65							; " raised while Preserving Machine State"
08d4 0548       | H  |		.STRTAB	0x0548->0x0b78							; "Step has Failed"
08d5 0555       | U  |		.STRTAB	0x0555->0x0b7f							; "Preservation of Machine State has failed"
08d6 057b       | {  |		.STRTAB	0x057b->0x0b93							; "Updating the Segments in the Elaborator Database"
08d7 05a9       |    |		.STRTAB	0x05a9->0x0bab							; "Loading New Code Segments"
08d8 05c0       |    |		.STRTAB	0x05c0->0x0bb8							; ":No_Mail"
08d9 05c6       |    |		.STRTAB	0x05c6->0x0bbc							; ":Ae"
08da 05c7       |    |		.STRTAB	0x05c7->0x0bbd							; "Checking Network Segment Install"
08db 05e5       |    |		.STRTAB	0x05e5->0x0bcd							; "Updating the Design_Facility Subsystem"
08dc 0609       |    |		.STRTAB	0x0609->0x0be0							; "MAIL"
08dd 060b       |    |		.STRTAB	0x060b->0x0be2							; "Updating the Mail Subsystem"
08de 0624       | $  |		.STRTAB	0x0624->0x0bf0							; "Checking the Configuration in the Elaborator Database"
08df 0657       | W  |		.STRTAB	0x0657->0x0c0a							; "<RELEASE>"
08e0 065e       | ^  |		.STRTAB	0x065e->0x0c0f							; " raised while Updating Elaborator Database"
08e1 0686       |    |		.STRTAB	0x0686->0x0c24							; "Updating Elaborator Database has failed"
08e2 06ab       |    |		.STRTAB	0x06ab->0x0c37							; "Updating the Universe Specs"
08e3 06c4       |    |		.STRTAB	0x06c4->0x0c45							; "Frozen_Worlds_Of_The_Universe"
08e4 06df       |    |		.STRTAB	0x06df->0x0c53							; "<QUIET>"
08e5 06e4       |    |		.STRTAB	0x06e4->0x0c57							; "[_"
08e6 06e4       |    |		.STRTAB	0x06e4->0x0c58							; "]'if(FROZEN)"
08e7 06ee       |    |		.STRTAB	0x06ee->0x0c5e							; "<DIRECTORIES>"
08e8 06f9       |    |		.STRTAB	0x06f9->0x0c64							; "Unfreezing Frozen Worlds"
08e9 070f       |    |		.STRTAB	0x070f->0x0c70							; "_"
08ea 070e       |    |		.STRTAB	0x070e->0x0c71							; "Demoting Keymap/Abbreviations Bodies for Universe Upgrade"
08eb 0745       | E  |		.STRTAB	0x0745->0x0c8d							; "<WORLDS>"
08ec 074b       | K  |		.STRTAB	0x074b->0x0c91							; "Restoring New Universe Items"
08ed 0765       | e  |		.STRTAB	0x0765->0x0c9f							; "New_Units"
08ee 076c       | l  |		.STRTAB	0x076c->0x0ca4							; "Universe"
08ef 0772       | r  |		.STRTAB	0x0772->0x0ca8							; "!"
08f0 0771       | q  |		.STRTAB	0x0771->0x0ca8							; "Restoring a Prototype Universe (takes about an hour)"
08f1 07a3       |    |		.STRTAB	0x07a3->0x0cc2							; "R1000, New, Goal => Source"
08f2 07bb       |    |		.STRTAB	0x07bb->0x0ccf							; "*"
08f3 07ba       |    |		.STRTAB	0x07ba->0x0cd0							; "?"
08f4 07b9       |    |		.STRTAB	0x07b9->0x0cd0							; "Inserting New Declarations Incrementally"
08f5 07df       |    |		.STRTAB	0x07df->0x0ce4							; "Changing Default Values of Selected Command Parameters"
08f6 0813       |    |		.STRTAB	0x0813->0x0cff							; "Scanning for Changes in the Universe Specs"
08f7 083b       | ;  |		.STRTAB	0x083b->0x0d14							; "![_[]"
08f8 083e       | >  |		.STRTAB	0x083e->0x0d17							; "]'BODY"
08f9 0842       | B  |		.STRTAB	0x0842->0x0d1a							; "Creating Text Backup of Existing Bodies to be Modified"
08fa 0876       | v  |		.STRTAB	0x0876->0x0d35							; "Restoring New Internal Universe Items"
08fb 0899       |    |		.STRTAB	0x0899->0x0d47							; "Restoring a Prototype Internal Universe"
08fc 08be       |    |		.STRTAB	0x08be->0x0d5b							; "Scanning for Changes in Internal Universe Specs"
08fd 08eb       |    |		.STRTAB	0x08eb->0x0d72							; ".Lrm.System"
08fe 08f4       |    |		.STRTAB	0x08f4->0x0d78							; "Installing Changed Universe Units"
08ff 0913       |    |		.STRTAB	0x0913->0x0d88							; "Installing Changed Internal Universe Units"
0900 093b       | ;  |		.STRTAB	0x093b->0x0d9d							; "Re-Installing Keymap/Initialize/Abbreviations Bodies."
0901 096e       | n  |		.STRTAB	0x096e->0x0db8							; "<ALL_WORLDS>"
0902 0978       | x  |		.STRTAB	0x0978->0x0dbe							; " raised while Updating Environment Specs"
0903 099e       |    |		.STRTAB	0x099e->0x0dd2							; "Updating Environment Specs has failed"
0904 09c1       |    |		.STRTAB	0x09c1->0x0de4							; "Updating Miscellaneous Universe Items"
0905 09e4       |    |		.STRTAB	0x09e4->0x0df7							; "Restoring Miscellaneous System Components"
0906 0a0b       |    |		.STRTAB	0x0a0b->0x0e0b							; "!Copyright_Rational"
0907 0a1c       |    |		.STRTAB	0x0a1c->0x0e15							; "Copyright_Notice"
0908 0a2a       | *  |		.STRTAB	0x0a2a->0x0e1d							; "Environment_Release@"
0909 0a3c       | <  |		.STRTAB	0x0a3c->0x0e27							; "!Machine.Release.Release_Notes"
090a 0a58       | X  |		.STRTAB	0x0a58->0x0e36							; "Miscellany"
090b 0a60       | `  |		.STRTAB	0x0a60->0x0e3b							; "R1000, Changed, Replace, Remake"
090c 0a7d       | }  |		.STRTAB	0x0a7d->0x0e4a							; "R1000, New, Replace, Remake"
090d 0a96       |    |		.STRTAB	0x0a96->0x0e58							; "Authorizing Lrm_Interface"
090e 0aad       |    |		.STRTAB	0x0aad->0x0e64							; "Lrm_Interface"
090f 0ab8       |    |		.STRTAB	0x0ab8->0x0e6b							; "Authorizing X Interface"
0910 0acd       |    |		.STRTAB	0x0acd->0x0e76							; "X Interface"
0911 0ad6       |    |		.STRTAB	0x0ad6->0x0e7c							; "Enabling \x22Install_Subsystems\x22 to run on next reboot."
0912 0b08       |    |		.STRTAB	0x0b08->0x0e96							; "!Machine"
0913 0b0e       |    |		.STRTAB	0x0b0e->0x0e9a							; "Install_Subsystems"
0914 0b1e       |    |		.STRTAB	0x0b1e->0x0ea3							; "!Machine`Install_Subsystems"
0915 0b37       | 7  |		.STRTAB	0x0b37->0x0eb0							; "#"
0916 0b36       | 6  |		.STRTAB	0x0b36->0x0eb1							; "`Install_Subsystems"
0917 0b47       | G  |		.STRTAB	0x0b47->0x0eba							; "Refreezing Worlds of the Universe"
0918 0b66       | f  |		.STRTAB	0x0b66->0x0ecb							; "Running Snapshot Daemon"
0919 0b7b       | {  |		.STRTAB	0x0b7b->0x0ed6							; "snap"
091a 0b7d       | }  |		.STRTAB	0x0b7d->0x0ed8							; " raised while Updating Miscellaneous Items"
091b 0ba5       |    |		.STRTAB	0x0ba5->0x0eed							; "Updating Miscellaneous Items has failed"
091c 0bca       |    |		.STRTAB	0x0bca->0x0f01							; "Updating Dfs Files"
091d 0bda       |    |		.STRTAB	0x0bda->0x0f0a							; "D_12_6_4"
091e 0be0       |    |		.STRTAB	0x0be0->0x0f0e							; "Dfs_Installed"
091f 0beb       |    |		.STRTAB	0x0beb->0x0f14							; "Installing Dfs"
0920 0bf7       |    |		.STRTAB	0x0bf7->0x0f1b							; "Dfs_Image_File"
0921 0c03       |    |		.STRTAB	0x0c03->0x0f22							; "The new Dfs has been installed.  You may now reboot the machine using Reboot_For_New_Release."
0922 0c5e       | ^  |		.STRTAB	0x0c5e->0x0f51							; "It appears that the Dfs has already been installed.  If this is not the case then load the Dfs from tape or contact Rational."
0923 0cd9       |    |		.STRTAB	0x0cd9->0x0f8f							; "The Dfs archive files required to do an environment install of the Dfs do not exist.  The Dfs should be installed from tape, or these files should be copied and installed."
0924 0d82       |    |		.STRTAB	0x0d82->0x0fe5							; "The release you are currently running does not allow an environment install of the Dfs.  Please load the Dfs from tape when the machine is brought down."
0925 0e18       |    |		.STRTAB	0x0e18->0x1031							; " raised while Installing the Dfs"
0926 0e36       | 6  |		.STRTAB	0x0e36->0x1041							; "Step has Failed: the machine should be brought down as soon as possible and the Dfs installed by tape."
0927 0e9a       |    |		.STRTAB	0x0e9a->0x1074							; "Installation of the Dfs has failed"
0928 0eba       |    |		.STRTAB	0x0eba->0x1085							; "[Get_Xfer@, ~@_Errors, ~@_Negatives]"
0929 0edc       |    |		.STRTAB	0x0edc->0x1097							; "Design_Facility_Xfer"
092a 0eee       |    |		.STRTAB	0x0eee->0x10a1							; ":Design_Facility.Mload"
092b 0f02       |    |		.STRTAB	0x0f02->0x10ac							; "Mail_Xfer"
092c 0f09       |    |		.STRTAB	0x0f09->0x10b0							; ":Mail.Mload"
092d 0f12       |    |		.STRTAB	0x0f12->0x10b6							; "Installing Changed Universe Units has failed"
092e 0f3c       | <  |		.STRTAB	0x0f3c->0x10cc							; "Installing Changed Internal Universe Units has failed"
092f 0f6f       | o  |		.STREND 0x0f6f->0x10e6
0930 4e49 4c45  |NILE|		.STRTAB_STRINGS
10e7 0000       |    |		.XXX[0x1]
10e8 ; --------------------------------------------------------------------------------------
10e8 ; Debug Table
10e8 ; --------------------------------------------------------------------------------------
10e8 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0x3435,0x0000,0x0001,0x0000
10ee 8080 8080  |    |		.XXX[0x3]
10f0 8080       |    |
10f1 8081 c1c9  |    |		.XXX[0x19]
10f3 bd8d 9591  |    |
10f5 d5c9 9481  |    |
10f7 05dd 85a5  |    |
10f9 d17d 15b1  | }  |
10fb 8589 bdc9  |    |
10fd 85d1 a5bd  |    |
10ff b881 a5cc  |    |
1101 2880 8080  |(   |
1103 8080 8080  |    |
1105 8189 959d  |    |
1107 a5b8 8080  |    |
1109 2880       |(   |
110a 8080 8080  |    |		.BLANK	8080[0x5]
110f 81a5 9881  |    |		.XXX[0x1a]
1111 b9bd d081  |    |
1113 41c9 bd9d  |A   |
1115 c985 b4b9  |    |
1117 4dd1 85c9  |M   |
1119 d195 917d  |   }|
111b 4dd5 8d8d  |M   |
111d 95cd cd99  |    |
111f d5b1 b1e4  |    |
1121 80a1 4dd1  |  M |
1123 85d1 d5cc  |    |
1125 a481 d1a1  |    |
1127 95b8 2880  |  ( |
1129 8080 8080  |    |		.BLANK	8080[0x7]
1130 8115 c9c9  |    |		.XXX[0xf]
1132 bdc9 7d49  |  }I|
1134 95c1 bdc9  |    |
1136 d1a5 b99c  |    |
1138 b949 95c1  | I  |
113a bdc9 d17d  |   }|
113c 15c9 c9bd  |    |
113e c828       | (  |
113f 8080 8080  |    |		.BLANK	8080[0x9]
1148 80a1 0d85  |    |		.XXX[0xa]
114a b1b1 95c8  |    |
114c 80f4 f881  |    |
114e 0d85 b1b1  |    |
1150 95c8 b028  |   (|
1152 8080 8080  |    |		.BLANK	8080[0x9]
115b 8081 4995  |  I |		.XXX[0x19]
115d 85cd bdb8  |    |
115f 80f4 f881  |    |
1161 15c9 c9bd  |    |
1163 c97d 4995  | }I |
1165 c1bd c9d1  |    |
1167 a5b9 9cb9  |    |
1169 0dc9 9585  |    |
116b d195 7d0d  |  } |
116d bdb9 91a5  |    |
116f d1a5 bdb9  |    |
1171 7d39 85b5  |}9  |
1173 9428       | (  |
1174 8080 8080  |    |		.BLANK	8080[0x10]
1184 80a0 8955  |   U|		.XXX[0xf]
1186 b985 89b1  |    |
1188 9481 d1bc  |    |
118a 81cd d185  |    |
118c c9d0 818d  |    |
118e bdb5 c1a5  |    |
1190 b195 c888  |    |
1192 b028       | (  |
1193 8080 8080  |    |		.BLANK	8080[0x10]
11a3 8081 15c9  |    |		.XXX[0xe]
11a5 c9bd c97d  |   }|
11a7 4995 c1bd  |I   |
11a9 c9d1 a5b9  |    |
11ab 9cb9 41c9  |  A |
11ad bd89 b195  |    |
11af b4a4 b028  |   (|
11b1 8080 8080  |    |		.BLANK	8080[0x9]
11ba 8081 15e1  |    |		.XXX[0x1d]
11bc c1b1 85b9  |    |
11be 85d1 a5bd  |    |
11c0 b880 f4f8  |    |
11c2 814d a5b5  | M  |
11c4 c1b1 957d  |   }|
11c6 4dd1 85d1  |M   |
11c8 d5cc b911  |    |
11ca a5cd c1b1  |    |
11cc 85e5 7d35  |  }5|
11ce 95cd cd85  |    |
11d0 9d94 80a1  |    |
11d2 4dd1 85d1  |M   |
11d4 d5cc a4a4  |    |
11d6 ec28       | (  |
11d7 8080 8080  |    |		.BLANK	8080[0x5]
11dc 8081 95b9  |    |		.XXX[0x6]
11de 9081 a598  |    |
11e0 ec28 2880  | (( |
11e2 8080 8080  |    |		.BLANK	8080[0x5]
11e7 8199 bdc8  |    |		.XXX[0xc]
11e9 8124 81a5  | $  |
11eb b880 c480  |    |
11ed b8b8 80c4  |    |
11ef c0c0 81b1  |    |
11f1 bdbd c028  |   (|
11f3 8080 8080  |    |		.BLANK	8080[0x7]
11fa 8081 8995  |    |		.XXX[0x6]
11fc 9da5 b828  |   (|
11fe 8080 8080  |    |