|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 8192 (0x2000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0d2ce3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0ea0 | | .CONST 0x0ea0 ; 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 8008 | | .CONST 0x8008 ; 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 0129 | ) | .CONST 0x0129 ; Address of begin
0019 01bf | | .CONST 0x01bf ; Address of exception handler
001a 0037 | 7 | .CONST 0x0037 ; Number of locals
001b INIT_0018:
001b 4801 |H | Short_Literal 0x1
001c e001 | | Load 0x0,0x1
001d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
001e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
001f e5ff | | Load 0x2,-0x1
0020 e001 | | Load 0x0,0x1
0021 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0022 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0023 e001 | | Load 0x0,0x1
0024 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0025 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0026 0092 0800 | | Action Push_String_Extended,0x800 ; "!Machine.Release.Archive.Environment."
0028 00d9 | | Load_Top At_Offset_1
0029 01cc | | Execute Vector,Catenate
002a 0092 0801 | | Action Push_String_Extended,0x801 ; ".Segments"
002c 01cc | | Execute Vector,Catenate
002d 0007 | | Action Break_Optional
002e e5ff | | Load 0x2,-0x1
002f 0092 0802 | | Action Push_String_Extended,0x802 ; ".Internal"
0031 01cc | | Execute Vector,Catenate
0032 0007 | | Action Break_Optional
0033 00d8 | | Load_Top At_Offset_0
0034 8002 | | Call 0x0,0x2
0035 00e1 | | Load_Encached Boolean_Cache
0036 03f1 | | Declare_Variable Discrete,With_Value
0037 e5ff | | Load 0x2,-0x1
0038 0092 0803 | | Action Push_String_Extended,0x803 ; ".Archives."
003a 01cc | | Execute Vector,Catenate
003b 0007 | | Action Break_Optional
003c e5ff | | Load 0x2,-0x1
003d 0092 0804 | | Action Push_String_Extended,0x804 ; ".Lists."
003f 01cc | | Execute Vector,Catenate
0040 0007 | | Action Break_Optional
0041 e5ff | | Load 0x2,-0x1
0042 0092 0805 | | Action Push_String_Extended,0x805 ; ".Logs."
0044 01cc | | Execute Vector,Catenate
0045 0007 | | Action Break_Optional
0046 e5ff | | Load 0x2,-0x1
0047 0092 0806 | | Action Push_String_Extended,0x806 ; ".Universe"
0049 01cc | | Execute Vector,Catenate
004a 0007 | | Action Break_Optional
004b e404 | | Load 0x2,0x4
004c 0092 0803 | | Action Push_String_Extended,0x803 ; ".Archives."
004e 01cc | | Execute Vector,Catenate
004f 0007 | | Action Break_Optional
0050 e404 | | Load 0x2,0x4
0051 0092 0804 | | Action Push_String_Extended,0x804 ; ".Lists."
0053 01cc | | Execute Vector,Catenate
0054 0007 | | Action Break_Optional
0055 e404 | | Load 0x2,0x4
0056 0092 0805 | | Action Push_String_Extended,0x805 ; ".Logs."
0058 01cc | | Execute Vector,Catenate
0059 0007 | | Action Break_Optional
005a e404 | | Load 0x2,0x4
005b 0092 0806 | | Action Push_String_Extended,0x806 ; ".Universe"
005d 01cc | | Execute Vector,Catenate
005e 0007 | | Action Break_Optional
005f 0092 0807 | | Action Push_String_Extended,0x807 ; "Updated_Units"
0061 0092 0808 | | Action Push_String_Extended,0x808 ; "Units_To_Be_Updated"
0063 0092 0809 | | Action Push_String_Extended,0x809 ; "Forced_Units"
0065 0092 080a | | Action Push_String_Extended,0x80a ; "Banned_Units"
0067 0092 080b | | Action Push_String_Extended,0x80b ; "Incremental_Update_Directives"
0069 0092 080c | | Action Push_String_Extended,0x80c ; "Changes_To_Parameter_Defaults"
006b 0092 080d | | Action Push_String_Extended,0x80d ; "Worlds_Of_The_Universe"
006d 0092 080e | | Action Push_String_Extended,0x80e ; "Release_Subs"
006f 0092 080f | | Action Push_String_Extended,0x80f ; "[!Commands.Abbreviations.@, !Machine.[Editor_Data.@_Commands]]'Body"
0071 e408 | | Load 0x2,0x8
0072 0092 0810 | | Action Push_String_Extended,0x810 ; "Current_Install_Step"
0074 01cc | | Execute Vector,Catenate
0075 0007 | | Action Break_Optional
0076 e003 | | Load 0x0,0x3
0077 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0078 02c7 | | Declare_Variable Any
0079 00d8 | | Load_Top At_Offset_0
007a 1c00 | | Execute_Immediate Run_Utility,0x0
007b e5ff | | Load 0x2,-0x1
007c 0092 0811 | | Action Push_String_Extended,0x811 ; ".Master_Log_File"
007e 01cc | | Execute Vector,Catenate
007f 0007 | | Action Break_Optional
0080 485f |H_ | Short_Literal 0x5f
0081 4800 |H | Short_Literal 0x0
0082 4803 |H | Short_Literal 0x3
0083 4804 |H | Short_Literal 0x4
0084 e004 | | Load 0x0,0x4
0085 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0086 e004 | | Load 0x0,0x4
0087 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0088 01ca | | Execute Vector,Prepend
0089 0007 | | Action Break_Optional
008a e408 | | Load 0x2,0x8
008b 0092 0812 | | Action Push_String_Extended,0x812 ; "Install_Product"
008d 01cc | | Execute Vector,Catenate
008e 00d9 | | Load_Top At_Offset_1
008f 01cc | | Execute Vector,Catenate
0090 0007 | | Action Break_Optional
0091 e005 | | Load 0x0,0x5
0092 e006 | | Load 0x0,0x6
0093 e419 | | Load 0x2,0x19
0094 00db | | Load_Top At_Offset_3
0095 e007 | | Load 0x0,0x7
0096 0387 | | Declare_Variable Package
0097 00d8 | | Load_Top At_Offset_0
0098 020f | | Execute Module,Activate
0099 e008 | | Load 0x0,0x8
009a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
009b 02c7 | | Declare_Variable Any
009c e008 | | Load 0x0,0x8
009d 180e | | Execute Package,Field_Execute,Field_Number 0xe
009e a41d | | Store_Unchecked 0x2,0x1d
009f e008 | | Load 0x0,0x8
00a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a1 02c7 | | Declare_Variable Any
00a2 0092 0813 | | Action Push_String_Extended,0x813 ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
00a4 e008 | | Load 0x0,0x8
00a5 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00a6 a41e | | Store_Unchecked 0x2,0x1e
00a7 e009 | | Load 0x0,0x9
00a8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00a9 00e1 | | Load_Encached Boolean_Cache
00aa 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00ab 00e1 | | Load_Encached Boolean_Cache
00ac 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00ad e00a | | Load 0x0,0xa
00ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00af 0322 | " | Declare_Variable Record
00b0 00d8 | | Load_Top At_Offset_0
00b1 1c00 | | Execute_Immediate Run_Utility,0x0
00b2 4800 |H | Short_Literal 0x0
00b3 480b |H | Short_Literal 0xb
00b4 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call
00b6 03fd | | Declare_Type Discrete,Defined
00b7 e00b | | Load 0x0,0xb
00b8 e00c | | Load 0x0,0xc
00b9 00da | | Load_Top At_Offset_2
00ba 4800 |H | Short_Literal 0x0
00bb 4801 |H | Short_Literal 0x1
00bc 480b |H | Short_Literal 0xb
00bd 0092 0814 | | Action Push_String_Extended,0x814 ; "Load_Environment..Internal_Only => Boolean"
00bf 00ea | | Load_Encached Null_String_Cache
00c0 0092 0815 | | Action Push_String_Extended,0x815 ; "Pre_Demote => Pre-Demote"
00c2 4801 |H | Short_Literal 0x1
00c3 480b |H | Short_Literal 0xb
00c4 e00d | | Load 0x0,0xd
00c5 0387 | | Declare_Variable Package
00c6 00d8 | | Load_Top At_Offset_0
00c7 020f | | Execute Module,Activate
00c8 e5fe | | Load 0x2,-0x2
00c9 0092 0816 | | Action Push_String_Extended,0x816 ; ", backup"
00cb 01cc | | Execute Vector,Catenate
00cc 00d9 | | Load_Top At_Offset_1
00cd 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00ce 4801 |H | Short_Literal 0x1
00cf 4805 |H | Short_Literal 0x5
00d0 00da | | Load_Top At_Offset_2
00d1 e424 | $ | Load 0x2,0x24
00d2 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00d3 00e1 | | Load_Encached Boolean_Cache
00d4 03f1 | | Declare_Variable Discrete,With_Value
00d5 4801 |H | Short_Literal 0x1
00d6 4801 |H | Short_Literal 0x1
00d7 00db | | Load_Top At_Offset_3
00d8 e424 | $ | Load 0x2,0x24
00d9 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00da 00e1 | | Load_Encached Boolean_Cache
00db 03f1 | | Declare_Variable Discrete,With_Value
00dc 4801 |H | Short_Literal 0x1
00dd 4802 |H | Short_Literal 0x2
00de e425 | % | Load 0x2,0x25
00df e424 | $ | Load 0x2,0x24
00e0 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00e1 00e1 | | Load_Encached Boolean_Cache
00e2 03f1 | | Declare_Variable Discrete,With_Value
00e3 4801 |H | Short_Literal 0x1
00e4 4803 |H | Short_Literal 0x3
00e5 e425 | % | Load 0x2,0x25
00e6 e424 | $ | Load 0x2,0x24
00e7 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00e8 00e1 | | Load_Encached Boolean_Cache
00e9 03f1 | | Declare_Variable Discrete,With_Value
00ea 4801 |H | Short_Literal 0x1
00eb 4804 |H | Short_Literal 0x4
00ec e425 | % | Load 0x2,0x25
00ed e424 | $ | Load 0x2,0x24
00ee 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00ef 00e1 | | Load_Encached Boolean_Cache
00f0 03f1 | | Declare_Variable Discrete,With_Value
00f1 4801 |H | Short_Literal 0x1
00f2 4809 |H | Short_Literal 0x9
00f3 e425 | % | Load 0x2,0x25
00f4 e424 | $ | Load 0x2,0x24
00f5 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00f6 00e1 | | Load_Encached Boolean_Cache
00f7 03f1 | | Declare_Variable Discrete,With_Value
00f8 4800 |H | Short_Literal 0x0
00f9 4806 |H | Short_Literal 0x6
00fa e425 | % | Load 0x2,0x25
00fb e424 | $ | Load 0x2,0x24
00fc 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00fd 00e1 | | Load_Encached Boolean_Cache
00fe 03f1 | | Declare_Variable Discrete,With_Value
00ff 4801 |H | Short_Literal 0x1
0100 4807 |H | Short_Literal 0x7
0101 e425 | % | Load 0x2,0x25
0102 e424 | $ | Load 0x2,0x24
0103 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0104 00e1 | | Load_Encached Boolean_Cache
0105 03f1 | | Declare_Variable Discrete,With_Value
0106 4800 |H | Short_Literal 0x0
0107 480b |H | Short_Literal 0xb
0108 e425 | % | Load 0x2,0x25
0109 e424 | $ | Load 0x2,0x24
010a 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
010b 00e1 | | Load_Encached Boolean_Cache
010c 03f1 | | Declare_Variable Discrete,With_Value
010d 4800 |H | Short_Literal 0x0
010e 4808 |H | Short_Literal 0x8
010f e425 | % | Load 0x2,0x25
0110 e424 | $ | Load 0x2,0x24
0111 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0112 00e1 | | Load_Encached Boolean_Cache
0113 03f1 | | Declare_Variable Discrete,With_Value
0114 4800 |H | Short_Literal 0x0
0115 480a |H | Short_Literal 0xa
0116 e425 | % | Load 0x2,0x25
0117 e424 | $ | Load 0x2,0x24
0118 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0119 00e1 | | Load_Encached Boolean_Cache
011a 03f1 | | Declare_Variable Discrete,With_Value
011b 029f 0213 | | Declare_Subprogram INIT_0210,For_Call
011d 029f 022b | +| Declare_Subprogram INIT_0228,For_Call
011f 029f 026b | k| Declare_Subprogram INIT_0268,For_Call
0121 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call
0123 029f 0303 | | Declare_Subprogram INIT_0300,For_Call
0125 029f 0393 | | Declare_Subprogram INIT_0390,For_Call
0127 029f 061b | | Declare_Subprogram INIT_0618,For_Call
0129 BODY_0018:
0129 e008 | | Load 0x0,0x8
012a 180e | | Execute Package,Field_Execute,Field_Number 0xe
012b 4800 |H | Short_Literal 0x0
012c 0092 0817 | | Action Push_String_Extended,0x817 ; "[Install_Product (Release_World => \x22"
012e e5ff | | Load 0x2,-0x1
012f 01cc | | Execute Vector,Catenate
0130 0092 0818 | | Action Push_String_Extended,0x818 ; "\x22, Options => \x22"
0132 01cc | | Execute Vector,Catenate
0133 e5fe | | Load 0x2,-0x2
0134 01cc | | Execute Vector,Catenate
0135 0092 0819 | | Action Push_String_Extended,0x819 ; "\x22);]"
0137 01cc | | Execute Vector,Catenate
0138 e00e | | Load 0x0,0xe
0139 1813 | | Execute Package,Field_Execute,Field_Number 0x13
013a 4801 |H | Short_Literal 0x1
013b e009 | | Load 0x0,0x9
013c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
013d e009 | | Load 0x0,0x9
013e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
013f 7009 |p | Jump_Nonzero 0x149
0140 e008 | | Load 0x0,0x8
0141 180e | | Execute Package,Field_Execute,Field_Number 0xe
0142 4805 |H | Short_Literal 0x5
0143 0092 081a | | Action Push_String_Extended,0x81a ; "Aborting environment installation: Could not set PRIVILEGED MODE."
0145 e00e | | Load 0x0,0xe
0146 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0147 e00f | | Load 0x0,0xf
0148 0257 | W | Execute Discrete,Raise
0149 0092 081b | | Action Push_String_Extended,0x81b ; "$$.Lists.Combined_Mload"
014b 8002 | | Call 0x0,0x2
014c 701a |p | Jump_Nonzero 0x167
014d e008 | | Load 0x0,0x8
014e 180e | | Execute Package,Field_Execute,Field_Number 0xe
014f 4805 |H | Short_Literal 0x5
0150 0092 081c | | Action Push_String_Extended,0x81c ; "Aborting environment installation: "
0152 608d |` | Indirect_Literal Discrete,0x1e0,{0x00000000, 0x00004000}
0153 e010 | | Load 0x0,0x10
0154 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0155 e011 | | Load 0x0,0x11
0156 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0157 e012 | | Load 0x0,0x12
0158 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0159 1816 | | Execute Package,Field_Execute,Field_Number 0x16
015a 0092 081d | | Action Push_String_Extended,0x81d ; "$$"
015c e012 | | Load 0x0,0x12
015d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
015e 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
015f 01cc | | Execute Vector,Catenate
0160 0092 081e | | Action Push_String_Extended,0x81e ; " is not a release world."
0162 01cc | | Execute Vector,Catenate
0163 e00e | | Load 0x0,0xe
0164 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0165 e00f | | Load 0x0,0xf
0166 0257 | W | Execute Discrete,Raise
0167 e42e | . | Load 0x2,0x2e
0168 6804 |h | Jump_Zero 0x16d
0169 4800 |H | Short_Literal 0x0
016a a427 | ' | Store_Unchecked 0x2,0x27
016b 4800 |H | Short_Literal 0x0
016c a429 | ) | Store_Unchecked 0x2,0x29
016d e408 | | Load 0x2,0x8
016e 8002 | | Call 0x0,0x2
016f 7013 |p | Jump_Nonzero 0x183
0170 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
0172 00ea | | Load_Encached Null_String_Cache
0173 4800 |H | Short_Literal 0x0
0174 4801 |H | Short_Literal 0x1
0175 e408 | | Load 0x2,0x8
0176 01dd | | Execute Vector,First
0177 e408 | | Load 0x2,0x8
0178 01dc | | Execute Vector,Last
0179 0aff | | Execute_Immediate Plus,-0x1
017a 00d8 | | Load_Top At_Offset_0
017b 00e2 | | Load_Encached Integer_Cache
017c 0260 | ` | Execute Discrete,In_Type
017d 7001 |p | Jump_Nonzero 0x17f
017e 0801 | | Execute_Immediate Raise,0x1
017f e408 | | Load 0x2,0x8
0180 01cf | | Execute Vector,Slice_Read
0181 e013 | | Load 0x0,0x13
0182 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0183 e41e | | Load 0x2,0x1e
0184 e008 | | Load 0x0,0x8
0185 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0186 0092 0820 | | Action Push_String_Extended,0x820 ; "Installing Environment Release "
0188 e402 | | Load 0x2,0x2
0189 01cc | | Execute Vector,Catenate
018a e41c | | Load 0x2,0x1c
018b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
018c 4801 |H | Short_Literal 0x1
018d a420 | | Store_Unchecked 0x2,0x20
018e e014 | | Load 0x0,0x14
018f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0190 e014 | | Load 0x0,0x14
0191 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0192 00d9 | | Load_Top At_Offset_1
0193 00d0 | | Action Swap_Control
0194 0260 | ` | Execute Discrete,In_Type
0195 7001 |p | Jump_Nonzero 0x197
0196 0801 | | Execute_Immediate Raise,0x1
0197 6044 |`D | Indirect_Literal Discrete,0x1dc,{0x00000000, 0x00003e80}
0198 e014 | | Load 0x0,0x14
0199 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
019a e426 | & | Load 0x2,0x26
019b 6801 |h | Jump_Zero 0x19d
019c 8434 | 4 | Call 0x2,0x34
019d e427 | ' | Load 0x2,0x27
019e 6801 |h | Jump_Zero 0x1a0
019f 8435 | 5 | Call 0x2,0x35
01a0 e428 | ( | Load 0x2,0x28
01a1 6801 |h | Jump_Zero 0x1a3
01a2 8436 | 6 | Call 0x2,0x36
01a3 8437 | 7 | Call 0x2,0x37
01a4 e421 | ! | Load 0x2,0x21
01a5 6805 |h | Jump_Zero 0x1ab
01a6 0092 0821 | !| Action Push_String_Extended,0x821 ; "Install_Product has failed"
01a8 e41c | | Load 0x2,0x1c
01a9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01aa 7804 |x | Jump 0x1af
01ab 0092 0822 | "| Action Push_String_Extended,0x822 ; "Install_Product has completed"
01ad e41c | | Load 0x2,0x1c
01ae 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01af 4800 |H | Short_Literal 0x0
01b0 a420 | | Store_Unchecked 0x2,0x20
01b1 e41d | | Load 0x2,0x1d
01b2 e008 | | Load 0x0,0x8
01b3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b4 e41f | | Load 0x2,0x1f
01b5 e009 | | Load 0x0,0x9
01b6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01b7 e008 | | Load 0x0,0x8
01b8 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b9 4800 |H | Short_Literal 0x0
01ba 0092 0823 | #| Action Push_String_Extended,0x823 ; "[Install_Product has completed]"
01bc e00e | | Load 0x0,0xe
01bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01be 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01bf TRAP_0018:
01bf e00f | | Load 0x0,0xf
01c0 010f | | Execute Exception,Equal
01c1 680b |h | Jump_Zero 0x1cd
01c2 e41f | | Load 0x2,0x1f
01c3 e009 | | Load 0x0,0x9
01c4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01c5 e008 | | Load 0x0,0x8
01c6 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c7 4800 |H | Short_Literal 0x0
01c8 0092 0824 | $| Action Push_String_Extended,0x824 ; "[Install_Product has failed]"
01ca e00e | | Load 0x0,0xe
01cb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01cc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01cd e420 | | Load 0x2,0x20
01ce 6804 |h | Jump_Zero 0x1d3
01cf 0092 0821 | !| Action Push_String_Extended,0x821 ; "Install_Product has failed"
01d1 e41c | | Load 0x2,0x1c
01d2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01d3 e41d | | Load 0x2,0x1d
01d4 e008 | | Load 0x0,0x8
01d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01d6 e41f | | Load 0x2,0x1f
01d7 e009 | | Load 0x0,0x9
01d8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01d9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01da 0000 0000 | | .XXX[0x2]
01dc 0000 0000 | | .LITERAL {0x00000000, 0x00003e80}
01e0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
01e4 0000 0000 | | .BLANK 0000[0x4]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb 4607 |F | Jump_Case 0x8
01ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
01ed 7806 |x | Jump 0x1f4 ; case 0x1
01ee 7809 |x | Jump 0x1f8 ; case 0x2
01ef 780d |x | Jump 0x1fd ; case 0x3
01f0 7810 |x | Jump 0x201 ; case 0x4
01f1 7811 |x | Jump 0x203 ; case 0x5
01f2 7812 |x | Jump 0x205 ; case 0x6
01f3 7815 |x | Jump 0x209 ; case 0x7
01f4 00da | | Load_Top At_Offset_2
01f5 0091 07f4 | | Action Push_String_Extended_Indexed,0x7f4 ; "NIL"
01f7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01f8 00db | | Load_Top At_Offset_3
01f9 00db | | Load_Top At_Offset_3
01fa 00e0 | | Load_Encached Standard_Cache
01fb 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01fc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01fd 00da | | Load_Top At_Offset_2
01fe 00e0 | | Load_Encached Standard_Cache
01ff 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0200 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0201 00db | | Load_Top At_Offset_3
0202 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0203 00db | | Load_Top At_Offset_3
0204 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0205 e423 | # | Load 0x2,0x23
0206 00dc | | Load_Top At_Offset_4
0207 0267 | g | Execute Discrete,Predecessor
0208 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0209 e423 | # | Load 0x2,0x23
020a 00dc | | Load_Top At_Offset_4
020b 0268 | h | Execute Discrete,Successor
020c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
020d 0000 0000 | | .XXX[0x3]
020f 0000 | |
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 e008 | | Load 0x0,0x8
0214 180e | | Execute Package,Field_Execute,Field_Number 0xe
0215 4808 |H | Short_Literal 0x8
0216 4801 |H | Short_Literal 0x1
0217 4801 |H | Short_Literal 0x1
0218 e015 | | Load 0x0,0x15
0219 1815 | | Execute Package,Field_Execute,Field_Number 0x15
021a 0092 0825 | %| Action Push_String_Extended,0x825 ; " raised"
021c 01cc | | Execute Vector,Catenate
021d e00e | | Load 0x0,0xe
021e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
021f e008 | | Load 0x0,0x8
0220 180e | | Execute Package,Field_Execute,Field_Number 0xe
0221 4805 |H | Short_Literal 0x5
0222 0092 0826 | &| Action Push_String_Extended,0x826 ; "Step has Failed"
0224 e00e | | Load 0x0,0xe
0225 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0226 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0227 0000 | | .XXX[0x1]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 0238 | 8 | .CONST 0x0238 ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0003 | | .CONST 0x0003 ; Number of locals
022b INIT_0228:
022b 4801 |H | Short_Literal 0x1
022c 00db | | Load_Top At_Offset_3
022d 01db | | Execute Vector,Length
022e 00d8 | | Load_Top At_Offset_0
022f 00e2 | | Load_Encached Integer_Cache
0230 0260 | ` | Execute Discrete,In_Type
0231 7001 |p | Jump_Nonzero 0x233
0232 0801 | | Execute_Immediate Raise,0x1
0233 00e9 | | Load_Encached String_Cache
0234 035b | [ | Declare_Type Array,Constrained
0235 0337 | 7 | Declare_Variable Array
0236 00e2 | | Load_Encached Integer_Cache
0237 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0238 BODY_0228:
0238 00cf | | Action Mark_Auxiliary
0239 e7ff | | Load 0x3,-0x1
023a 01d9 | | Execute Vector,Reverse_Bounds
023b 0263 | c | Execute Discrete,Above_Bound
023c 701d |p | Jump_Nonzero 0x25a
023d 00d8 | | Load_Top At_Offset_0
023e e7ff | | Load 0x3,-0x1
023f 01d7 | | Execute Vector,Field_Read
0240 0b27 | ' | Execute_Immediate Case_Compare,0x27
0241 700e |p | Jump_Nonzero 0x250
0242 4828 |H( | Short_Literal 0x28
0243 4829 |H) | Short_Literal 0x29
0244 0262 | b | Execute Discrete,In_Range
0245 7012 |p | Jump_Nonzero 0x258
0246 00db | | Load_Top At_Offset_3
0247 0a01 | | Execute_Immediate Plus,0x1
0248 c603 | | Store 0x3,0x3
0249 00d8 | | Load_Top At_Offset_0
024a e7ff | | Load 0x3,-0x1
024b 01d7 | | Execute Vector,Field_Read
024c e603 | | Load 0x3,0x3
024d e602 | | Load 0x3,0x2
024e 01d6 | | Execute Vector,Field_Write
024f 7808 |x | Jump 0x258
0250 00d1 | | Pop_Control Pop_Count_1
0251 00db | | Load_Top At_Offset_3
0252 0a01 | | Execute_Immediate Plus,0x1
0253 c603 | | Store 0x3,0x3
0254 485f |H_ | Short_Literal 0x5f
0255 e603 | | Load 0x3,0x3
0256 e602 | | Load 0x3,0x2
0257 01d6 | | Execute Vector,Field_Write
0258 00c8 | | Action Pop_Auxiliary_Range
0259 3fe3 |? | Loop_Increasing 0x23d
025a 00ce | | Action Pop_Auxiliary
025b 4801 |H | Short_Literal 0x1
025c 00d9 | | Load_Top At_Offset_1
025d 00db | | Load_Top At_Offset_3
025e 01cf | | Execute Vector,Slice_Read
025f 00e9 | | Load_Encached String_Cache
0260 01c6 | | Execute Vector,Convert_To_Formal
0261 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0262 0000 0000 | | .BLANK 0000[0x6]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0280 | | .CONST 0x0280 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0006 | | .CONST 0x0006 ; Number of locals
026b INIT_0268:
026b e012 | | Load 0x0,0x12
026c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
026d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
026e 02c7 | | Declare_Variable Any
026f 00d8 | | Load_Top At_Offset_0
0270 1c00 | | Execute_Immediate Run_Utility,0x0
0271 e012 | | Load 0x0,0x12
0272 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0273 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0274 e003 | | Load 0x0,0x3
0275 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0276 02c7 | | Declare_Variable Any
0277 00d8 | | Load_Top At_Offset_0
0278 1c00 | | Execute_Immediate Run_Utility,0x0
0279 e003 | | Load 0x0,0x3
027a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
027b 02c7 | | Declare_Variable Any
027c 00d8 | | Load_Top At_Offset_0
027d 1c00 | | Execute_Immediate Run_Utility,0x0
027e 029f 0743 | C| Declare_Subprogram INIT_0740,For_Call
0280 BODY_0268:
0280 e012 | | Load 0x0,0x12
0281 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0282 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0283 e602 | | Load 0x3,0x2
0284 602b |`+ | Indirect_Literal Discrete,0x2b0,{0x00000000, 0x00004000}
0285 e010 | | Load 0x0,0x10
0286 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0287 e011 | | Load 0x0,0x11
0288 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0289 e016 | | Load 0x0,0x16
028a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
028b 4801 |H | Short_Literal 0x1
028c 4800 |H | Short_Literal 0x0
028d e011 | | Load 0x0,0x11
028e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
028f e012 | | Load 0x0,0x12
0290 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0291 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0292 e7ff | | Load 0x3,-0x1
0293 e012 | | Load 0x0,0x12
0294 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0295 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0296 c602 | | Store 0x3,0x2
0297 c603 | | Store 0x3,0x3
0298 00cf | | Action Mark_Auxiliary
0299 7807 |x | Jump 0x2a1
029a 8606 | | Call 0x3,0x6
029b e602 | | Load 0x3,0x2
029c e012 | | Load 0x0,0x12
029d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
029e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
029f c602 | | Store 0x3,0x2
02a0 00c9 | | Action Pop_Auxiliary_Loop
02a1 e602 | | Load 0x3,0x2
02a2 e012 | | Load 0x0,0x12
02a3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02a4 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02a5 6ff4 |o | Jump_Zero 0x29a
02a6 00ce | | Action Pop_Auxiliary
02a7 e602 | | Load 0x3,0x2
02a8 e012 | | Load 0x0,0x12
02a9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02aa 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
02ab c602 | | Store 0x3,0x2
02ac 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02ad 0000 0000 | | .XXX[0x3]
02af 0000 | |
02b0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
02b4 0000 0000 | | .BLANK 0000[0x4]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 02d7 | | .CONST 0x02d7 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 0092 0827 | '| Action Push_String_Extended,0x827 ; "Preserving Machine State"
02bd e41c | | Load 0x2,0x1c
02be 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02bf e42e | . | Load 0x2,0x2e
02c0 7015 |p | Jump_Nonzero 0x2d6
02c1 e418 | | Load 0x2,0x18
02c2 0120 | | Execute Any,Is_Value
02c3 6803 |h | Jump_Zero 0x2c7
02c4 e003 | | Load 0x0,0x3
02c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c6 7801 |x | Jump 0x2c8
02c7 e418 | | Load 0x2,0x18
02c8 e417 | | Load 0x2,0x17
02c9 0092 0828 | (| Action Push_String_Extended,0x828 ; "Processing Switch Files"
02cb e41c | | Load 0x2,0x1c
02cc 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02cd c418 | | Store 0x2,0x18
02ce 0092 0829 | )| Action Push_String_Extended,0x829 ; "!.??'c(Switch)"
02d0 8017 | | Call 0x0,0x17
02d1 e418 | | Load 0x2,0x18
02d2 e417 | | Load 0x2,0x17
02d3 e41c | | Load 0x2,0x1c
02d4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02d5 c418 | | Store 0x2,0x18
02d6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02d7 TRAP_02b8:
02d7 0007 | | Action Break_Optional
02d8 e008 | | Load 0x0,0x8
02d9 180e | | Execute Package,Field_Execute,Field_Number 0xe
02da 4808 |H | Short_Literal 0x8
02db 4801 |H | Short_Literal 0x1
02dc 4801 |H | Short_Literal 0x1
02dd e015 | | Load 0x0,0x15
02de 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02df 0092 082a | *| Action Push_String_Extended,0x82a ; " raised while Preserving Machine State"
02e1 01cc | | Execute Vector,Catenate
02e2 e00e | | Load 0x0,0xe
02e3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02e4 e003 | | Load 0x0,0x3
02e5 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02e6 e418 | | Load 0x2,0x18
02e7 012f | / | Execute Any,Equal
02e8 680c |h | Jump_Zero 0x2f5
02e9 e008 | | Load 0x0,0x8
02ea 180e | | Execute Package,Field_Execute,Field_Number 0xe
02eb 4805 |H | Short_Literal 0x5
02ec 0092 0826 | &| Action Push_String_Extended,0x826 ; "Step has Failed"
02ee e00e | | Load 0x0,0xe
02ef 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f0 e418 | | Load 0x2,0x18
02f1 e417 | | Load 0x2,0x17
02f2 e41c | | Load 0x2,0x1c
02f3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02f4 c418 | | Store 0x2,0x18
02f5 0092 082b | +| Action Push_String_Extended,0x82b ; "Preservation of Machine State has failed"
02f7 e41c | | Load 0x2,0x1c
02f8 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02f9 4801 |H | Short_Literal 0x1
02fa a421 | ! | Store_Unchecked 0x2,0x21
02fb 00d8 | | Load_Top At_Offset_0
02fc 0101 | | Execute Exception,Reraise
02fd 0000 0000 | | .XXX[0x3]
02ff 0000 | |
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0305 | | .CONST 0x0305 ; Address of begin
0301 0366 | f | .CONST 0x0366 ; Address of exception handler
0302 0002 | | .CONST 0x0002 ; Number of locals
0303 INIT_0300:
0303 029f 07ab | | Declare_Subprogram INIT_07a8,For_Call
0305 BODY_0300:
0305 0092 082c | ,| Action Push_String_Extended,0x82c ; "Updating the Segments in the Elaborator Database"
0307 e41c | | Load 0x2,0x1c
0308 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0309 e403 | | Load 0x2,0x3
030a 8002 | | Call 0x0,0x2
030b 6825 |h% | Jump_Zero 0x331
030c e418 | | Load 0x2,0x18
030d 0120 | | Execute Any,Is_Value
030e 6803 |h | Jump_Zero 0x312
030f e003 | | Load 0x0,0x3
0310 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0311 7801 |x | Jump 0x313
0312 e418 | | Load 0x2,0x18
0313 e417 | | Load 0x2,0x17
0314 0092 082d | -| Action Push_String_Extended,0x82d ; "Loading New Code Segments"
0316 e41c | | Load 0x2,0x1c
0317 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0318 c418 | | Store 0x2,0x18
0319 e42c | , | Load 0x2,0x2c
031a 6809 |h | Jump_Zero 0x324
031b 4800 |H | Short_Literal 0x0
031c 00ea | | Load_Encached Null_String_Cache
031d 00ea | | Load_Encached Null_String_Cache
031e e403 | | Load 0x2,0x3
031f 0092 082e | .| Action Push_String_Extended,0x82e ; ":No_Mail"
0321 01cc | | Execute Vector,Catenate
0322 8018 | | Call 0x0,0x18
0323 7808 |x | Jump 0x32c
0324 4800 |H | Short_Literal 0x0
0325 00ea | | Load_Encached Null_String_Cache
0326 00ea | | Load_Encached Null_String_Cache
0327 e403 | | Load 0x2,0x3
0328 0092 082f | /| Action Push_String_Extended,0x82f ; ":Ae"
032a 01cc | | Execute Vector,Catenate
032b 8018 | | Call 0x0,0x18
032c e418 | | Load 0x2,0x18
032d e417 | | Load 0x2,0x17
032e e41c | | Load 0x2,0x1c
032f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0330 c418 | | Store 0x2,0x18
0331 e42d | - | Load 0x2,0x2d
0332 6818 |h | Jump_Zero 0x34b
0333 0092 0830 | 0| Action Push_String_Extended,0x830 ; "MAIL"
0335 e019 | | Load 0x0,0x19
0336 180e | | Execute Package,Field_Execute,Field_Number 0xe
0337 7013 |p | Jump_Nonzero 0x34b
0338 e418 | | Load 0x2,0x18
0339 0120 | | Execute Any,Is_Value
033a 6803 |h | Jump_Zero 0x33e
033b e003 | | Load 0x0,0x3
033c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
033d 7801 |x | Jump 0x33f
033e e418 | | Load 0x2,0x18
033f e417 | | Load 0x2,0x17
0340 0092 0831 | 1| Action Push_String_Extended,0x831 ; "Updating the Mail Subsystem"
0342 e41c | | Load 0x2,0x1c
0343 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0344 c418 | | Store 0x2,0x18
0345 8602 | | Call 0x3,0x2
0346 e418 | | Load 0x2,0x18
0347 e417 | | Load 0x2,0x17
0348 e41c | | Load 0x2,0x1c
0349 181a | | Execute Package,Field_Execute,Field_Number 0x1a
034a c418 | | Store 0x2,0x18
034b e418 | | Load 0x2,0x18
034c 0120 | | Execute Any,Is_Value
034d 6803 |h | Jump_Zero 0x351
034e e003 | | Load 0x0,0x3
034f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0350 7801 |x | Jump 0x352
0351 e418 | | Load 0x2,0x18
0352 e417 | | Load 0x2,0x17
0353 0092 0832 | 2| Action Push_String_Extended,0x832 ; "Checking the Configuration in the Elaborator Database"
0355 e41c | | Load 0x2,0x1c
0356 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0357 c418 | | Store 0x2,0x18
0358 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
035a 0092 0833 | 3| Action Push_String_Extended,0x833 ; "<RELEASE>"
035c e407 | | Load 0x2,0x7
035d e415 | | Load 0x2,0x15
035e 01cc | | Execute Vector,Catenate
035f 801a | | Call 0x0,0x1a
0360 e418 | | Load 0x2,0x18
0361 e417 | | Load 0x2,0x17
0362 e41c | | Load 0x2,0x1c
0363 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0364 c418 | | Store 0x2,0x18
0365 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0366 TRAP_0300:
0366 0007 | | Action Break_Optional
0367 e008 | | Load 0x0,0x8
0368 180e | | Execute Package,Field_Execute,Field_Number 0xe
0369 4808 |H | Short_Literal 0x8
036a 4801 |H | Short_Literal 0x1
036b 4801 |H | Short_Literal 0x1
036c e015 | | Load 0x0,0x15
036d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
036e 0092 0834 | 4| Action Push_String_Extended,0x834 ; " raised while Updating Elaborator Database"
0370 01cc | | Execute Vector,Catenate
0371 e00e | | Load 0x0,0xe
0372 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0373 e003 | | Load 0x0,0x3
0374 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0375 e418 | | Load 0x2,0x18
0376 012f | / | Execute Any,Equal
0377 680c |h | Jump_Zero 0x384
0378 e008 | | Load 0x0,0x8
0379 180e | | Execute Package,Field_Execute,Field_Number 0xe
037a 4805 |H | Short_Literal 0x5
037b 0092 0826 | &| Action Push_String_Extended,0x826 ; "Step has Failed"
037d e00e | | Load 0x0,0xe
037e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
037f e418 | | Load 0x2,0x18
0380 e417 | | Load 0x2,0x17
0381 e41c | | Load 0x2,0x1c
0382 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0383 c418 | | Store 0x2,0x18
0384 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Updating Elaborator Database has failed"
0386 e41c | | Load 0x2,0x1c
0387 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0388 4801 |H | Short_Literal 0x1
0389 a421 | ! | Store_Unchecked 0x2,0x21
038a 00d8 | | Load_Top At_Offset_0
038b 0101 | | Execute Exception,Reraise
038c 0000 0000 | | .BLANK 0000[0x4]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0397 | | .CONST 0x0397 ; Address of begin
0391 05f2 | | .CONST 0x05f2 ; Address of exception handler
0392 0003 | | .CONST 0x0003 ; Number of locals
0393 INIT_0390:
0393 029f 07cb | | Declare_Subprogram INIT_07c8,For_Call
0395 029f 07e3 | | Declare_Subprogram INIT_07e0,For_Call
0397 BODY_0390:
0397 0092 0836 | 6| Action Push_String_Extended,0x836 ; "Updating the Universe Specs"
0399 e41c | | Load 0x2,0x1c
039a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
039b e008 | | Load 0x0,0x8
039c 180e | | Execute Package,Field_Execute,Field_Number 0xe
039d e008 | | Load 0x0,0x8
039e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
039f e407 | | Load 0x2,0x7
03a0 0092 0837 | 7| Action Push_String_Extended,0x837 ; "Frozen_Worlds_Of_The_Universe"
03a2 01cc | | Execute Vector,Catenate
03a3 e00e | | Load 0x0,0xe
03a4 180e | | Execute Package,Field_Execute,Field_Number 0xe
03a5 0092 0838 | 8| Action Push_String_Extended,0x838 ; "<QUIET>"
03a7 4801 |H | Short_Literal 0x1
03a8 00ea | | Load_Encached Null_String_Cache
03a9 0092 0839 | 9| Action Push_String_Extended,0x839 ; "[_"
03ab e407 | | Load 0x2,0x7
03ac 01cc | | Execute Vector,Catenate
03ad e414 | | Load 0x2,0x14
03ae 01cc | | Execute Vector,Catenate
03af 0092 083a | :| Action Push_String_Extended,0x83a ; "]'if(FROZEN)"
03b1 01cc | | Execute Vector,Catenate
03b2 e013 | | Load 0x0,0x13
03b3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03b4 e008 | | Load 0x0,0x8
03b5 180e | | Execute Package,Field_Execute,Field_Number 0xe
03b6 e008 | | Load 0x0,0x8
03b7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
03b8 e00e | | Load 0x0,0xe
03b9 180f | | Execute Package,Field_Execute,Field_Number 0xf
03ba 0092 083b | ;| Action Push_String_Extended,0x83b ; "$$.Lists.Frozen_Worlds_Of_The_Universe"
03bc 801b | | Call 0x0,0x1b
03bd 680a |h | Jump_Zero 0x3c8
03be 0092 0838 | 8| Action Push_String_Extended,0x838 ; "<QUIET>"
03c0 0092 083c | <| Action Push_String_Extended,0x83c ; "<DIRECTORIES>"
03c2 4801 |H | Short_Literal 0x1
03c3 0092 083b | ;| Action Push_String_Extended,0x83b ; "$$.Lists.Frozen_Worlds_Of_The_Universe"
03c5 e013 | | Load 0x0,0x13
03c6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03c7 781b |x | Jump 0x3e3
03c8 e418 | | Load 0x2,0x18
03c9 0120 | | Execute Any,Is_Value
03ca 6803 |h | Jump_Zero 0x3ce
03cb e003 | | Load 0x0,0x3
03cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03cd 7801 |x | Jump 0x3cf
03ce e418 | | Load 0x2,0x18
03cf e417 | | Load 0x2,0x17
03d0 0092 083d | =| Action Push_String_Extended,0x83d ; "Unfreezing Frozen Worlds"
03d2 e41c | | Load 0x2,0x1c
03d3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03d4 c418 | | Store 0x2,0x18
03d5 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
03d7 4800 |H | Short_Literal 0x0
03d8 e407 | | Load 0x2,0x7
03d9 0092 0837 | 7| Action Push_String_Extended,0x837 ; "Frozen_Worlds_Of_The_Universe"
03db 01cc | | Execute Vector,Catenate
03dc e013 | | Load 0x0,0x13
03dd 181f | | Execute Package,Field_Execute,Field_Number 0x1f
03de e418 | | Load 0x2,0x18
03df e417 | | Load 0x2,0x17
03e0 e41c | | Load 0x2,0x1c
03e1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03e2 c418 | | Store 0x2,0x18
03e3 e42f | / | Load 0x2,0x2f
03e4 681b |h | Jump_Zero 0x400
03e5 e418 | | Load 0x2,0x18
03e6 0120 | | Execute Any,Is_Value
03e7 6803 |h | Jump_Zero 0x3eb
03e8 e003 | | Load 0x0,0x3
03e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ea 7801 |x | Jump 0x3ec
03eb e418 | | Load 0x2,0x18
03ec e417 | | Load 0x2,0x17
03ed 0092 083e | >| Action Push_String_Extended,0x83e ; "Demoting Keymap/Abbreviations Bodies for Universe Upgrade"
03ef e41c | | Load 0x2,0x1c
03f0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03f1 c418 | | Store 0x2,0x18
03f2 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
03f4 4800 |H | Short_Literal 0x0
03f5 0092 083f | ?| Action Push_String_Extended,0x83f ; "<WORLDS>"
03f7 4801 |H | Short_Literal 0x1
03f8 e416 | | Load 0x2,0x16
03f9 e01c | | Load 0x0,0x1c
03fa 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03fb e418 | | Load 0x2,0x18
03fc e417 | | Load 0x2,0x17
03fd e41c | | Load 0x2,0x1c
03fe 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03ff c418 | | Store 0x2,0x18
0400 e42e | . | Load 0x2,0x2e
0401 70d7 |p | Jump_Nonzero 0x4d9
0402 e418 | | Load 0x2,0x18
0403 0120 | | Execute Any,Is_Value
0404 6803 |h | Jump_Zero 0x408
0405 e003 | | Load 0x0,0x3
0406 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0407 7801 |x | Jump 0x409
0408 e418 | | Load 0x2,0x18
0409 e417 | | Load 0x2,0x17
040a 0092 0840 | @| Action Push_String_Extended,0x840 ; "Restoring New Universe Items"
040c e41c | | Load 0x2,0x1c
040d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
040e c418 | | Store 0x2,0x18
040f e407 | | Load 0x2,0x7
0410 0092 0841 | A| Action Push_String_Extended,0x841 ; "New_Units"
0412 01cc | | Execute Vector,Catenate
0413 e407 | | Load 0x2,0x7
0414 e414 | | Load 0x2,0x14
0415 01cc | | Execute Vector,Catenate
0416 e406 | | Load 0x2,0x6
0417 0092 0842 | B| Action Push_String_Extended,0x842 ; "Universe"
0419 01cc | | Execute Vector,Catenate
041a 0092 0843 | C| Action Push_String_Extended,0x843 ; "!"
041c 801d | | Call 0x0,0x1d
041d e418 | | Load 0x2,0x18
041e e417 | | Load 0x2,0x17
041f e41c | | Load 0x2,0x1c
0420 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0421 c418 | | Store 0x2,0x18
0422 e418 | | Load 0x2,0x18
0423 0120 | | Execute Any,Is_Value
0424 6803 |h | Jump_Zero 0x428
0425 e003 | | Load 0x0,0x3
0426 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0427 7801 |x | Jump 0x429
0428 e418 | | Load 0x2,0x18
0429 e417 | | Load 0x2,0x17
042a 0092 0844 | D| Action Push_String_Extended,0x844 ; "Restoring a Prototype Universe (takes about an hour)"
042c e41c | | Load 0x2,0x1c
042d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
042e c418 | | Store 0x2,0x18
042f 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
0431 e406 | | Load 0x2,0x6
0432 0092 0842 | B| Action Push_String_Extended,0x842 ; "Universe"
0434 01cc | | Execute Vector,Catenate
0435 0092 0845 | E| Action Push_String_Extended,0x845 ; "R1000, New, Goal => Source"
0437 0092 0846 | F| Action Push_String_Extended,0x846 ; "*"
0439 e409 | | Load 0x2,0x9
043a 0092 0847 | G| Action Push_String_Extended,0x847 ; "?"
043c e01e | | Load 0x0,0x1e
043d 180e | | Execute Package,Field_Execute,Field_Number 0xe
043e e418 | | Load 0x2,0x18
043f e417 | | Load 0x2,0x17
0440 e41c | | Load 0x2,0x1c
0441 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0442 c418 | | Store 0x2,0x18
0443 e407 | | Load 0x2,0x7
0444 e412 | | Load 0x2,0x12
0445 01cc | | Execute Vector,Catenate
0446 801b | | Call 0x0,0x1b
0447 7016 |p | Jump_Nonzero 0x45e
0448 e418 | | Load 0x2,0x18
0449 0120 | | Execute Any,Is_Value
044a 6803 |h | Jump_Zero 0x44e
044b e003 | | Load 0x0,0x3
044c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
044d 7801 |x | Jump 0x44f
044e e418 | | Load 0x2,0x18
044f e417 | | Load 0x2,0x17
0450 0092 0848 | H| Action Push_String_Extended,0x848 ; "Inserting New Declarations Incrementally"
0452 e41c | | Load 0x2,0x1c
0453 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0454 c418 | | Store 0x2,0x18
0455 e407 | | Load 0x2,0x7
0456 e412 | | Load 0x2,0x12
0457 01cc | | Execute Vector,Catenate
0458 801f | | Call 0x0,0x1f
0459 e418 | | Load 0x2,0x18
045a e417 | | Load 0x2,0x17
045b e41c | | Load 0x2,0x1c
045c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
045d c418 | | Store 0x2,0x18
045e e407 | | Load 0x2,0x7
045f e413 | | Load 0x2,0x13
0460 01cc | | Execute Vector,Catenate
0461 801b | | Call 0x0,0x1b
0462 7016 |p | Jump_Nonzero 0x479
0463 e418 | | Load 0x2,0x18
0464 0120 | | Execute Any,Is_Value
0465 6803 |h | Jump_Zero 0x469
0466 e003 | | Load 0x0,0x3
0467 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0468 7801 |x | Jump 0x46a
0469 e418 | | Load 0x2,0x18
046a e417 | | Load 0x2,0x17
046b 0092 0849 | I| Action Push_String_Extended,0x849 ; "Changing Default Values of Selected Command Parameters"
046d e41c | | Load 0x2,0x1c
046e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
046f c418 | | Store 0x2,0x18
0470 e407 | | Load 0x2,0x7
0471 e413 | | Load 0x2,0x13
0472 01cc | | Execute Vector,Catenate
0473 8020 | | Call 0x0,0x20
0474 e418 | | Load 0x2,0x18
0475 e417 | | Load 0x2,0x17
0476 e41c | | Load 0x2,0x1c
0477 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0478 c418 | | Store 0x2,0x18
0479 e418 | | Load 0x2,0x18
047a 0120 | | Execute Any,Is_Value
047b 6803 |h | Jump_Zero 0x47f
047c e003 | | Load 0x0,0x3
047d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
047e 7801 |x | Jump 0x480
047f e418 | | Load 0x2,0x18
0480 e417 | | Load 0x2,0x17
0481 0092 084a | J| Action Push_String_Extended,0x84a ; "Scanning for Changes in the Universe Specs"
0483 e41c | | Load 0x2,0x1c
0484 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0485 c418 | | Store 0x2,0x18
0486 e407 | | Load 0x2,0x7
0487 e411 | | Load 0x2,0x11
0488 01cc | | Execute Vector,Catenate
0489 e407 | | Load 0x2,0x7
048a e410 | | Load 0x2,0x10
048b 01cc | | Execute Vector,Catenate
048c e407 | | Load 0x2,0x7
048d e40f | | Load 0x2,0xf
048e 01cc | | Execute Vector,Catenate
048f e407 | | Load 0x2,0x7
0490 e40e | | Load 0x2,0xe
0491 01cc | | Execute Vector,Catenate
0492 0092 0843 | C| Action Push_String_Extended,0x843 ; "!"
0494 e409 | | Load 0x2,0x9
0495 8021 | ! | Call 0x0,0x21
0496 e418 | | Load 0x2,0x18
0497 e417 | | Load 0x2,0x17
0498 e41c | | Load 0x2,0x1c
0499 181a | | Execute Package,Field_Execute,Field_Number 0x1a
049a c418 | | Store 0x2,0x18
049b e42b | + | Load 0x2,0x2b
049c 683c |h< | Jump_Zero 0x4d9
049d 0092 084b | K| Action Push_String_Extended,0x84b ; "![_[]"
049f e407 | | Load 0x2,0x7
04a0 01cc | | Execute Vector,Catenate
04a1 e40f | | Load 0x2,0xf
04a2 01cc | | Execute Vector,Catenate
04a3 0092 084c | L| Action Push_String_Extended,0x84c ; "]'BODY"
04a5 01cc | | Execute Vector,Catenate
04a6 8002 | | Call 0x0,0x2
04a7 700b |p | Jump_Nonzero 0x4b3
04a8 0092 084b | K| Action Push_String_Extended,0x84b ; "![_[]"
04aa e407 | | Load 0x2,0x7
04ab 01cc | | Execute Vector,Catenate
04ac e40f | | Load 0x2,0xf
04ad 01cc | | Execute Vector,Catenate
04ae 0092 084c | L| Action Push_String_Extended,0x84c ; "]'BODY"
04b0 01cc | | Execute Vector,Catenate
04b1 8002 | | Call 0x0,0x2
04b2 6826 |h& | Jump_Zero 0x4d9
04b3 e418 | | Load 0x2,0x18
04b4 0120 | | Execute Any,Is_Value
04b5 6803 |h | Jump_Zero 0x4b9
04b6 e003 | | Load 0x0,0x3
04b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04b8 7801 |x | Jump 0x4ba
04b9 e418 | | Load 0x2,0x18
04ba e417 | | Load 0x2,0x17
04bb 0092 084d | M| Action Push_String_Extended,0x84d ; "Creating Text Backup of Existing Bodies to be Modified"
04bd e41c | | Load 0x2,0x1c
04be 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04bf c418 | | Store 0x2,0x18
04c0 0092 084b | K| Action Push_String_Extended,0x84b ; "![_[]"
04c2 e407 | | Load 0x2,0x7
04c3 01cc | | Execute Vector,Catenate
04c4 e40f | | Load 0x2,0xf
04c5 01cc | | Execute Vector,Catenate
04c6 0092 084c | L| Action Push_String_Extended,0x84c ; "]'BODY"
04c8 01cc | | Execute Vector,Catenate
04c9 8433 | 3 | Call 0x2,0x33
04ca 0092 084b | K| Action Push_String_Extended,0x84b ; "![_[]"
04cc e407 | | Load 0x2,0x7
04cd 01cc | | Execute Vector,Catenate
04ce e40e | | Load 0x2,0xe
04cf 01cc | | Execute Vector,Catenate
04d0 0092 084c | L| Action Push_String_Extended,0x84c ; "]'BODY"
04d2 01cc | | Execute Vector,Catenate
04d3 8433 | 3 | Call 0x2,0x33
04d4 e418 | | Load 0x2,0x18
04d5 e417 | | Load 0x2,0x17
04d6 e41c | | Load 0x2,0x1c
04d7 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04d8 c418 | | Store 0x2,0x18
04d9 e405 | | Load 0x2,0x5
04da 68d7 |h | Jump_Zero 0x5b2
04db e418 | | Load 0x2,0x18
04dc 0120 | | Execute Any,Is_Value
04dd 6803 |h | Jump_Zero 0x4e1
04de e003 | | Load 0x0,0x3
04df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04e0 7801 |x | Jump 0x4e2
04e1 e418 | | Load 0x2,0x18
04e2 e417 | | Load 0x2,0x17
04e3 0092 084e | N| Action Push_String_Extended,0x84e ; "Restoring New Internal Universe Items"
04e5 e41c | | Load 0x2,0x1c
04e6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04e7 c418 | | Store 0x2,0x18
04e8 e40b | | Load 0x2,0xb
04e9 0092 0841 | A| Action Push_String_Extended,0x841 ; "New_Units"
04eb 01cc | | Execute Vector,Catenate
04ec e407 | | Load 0x2,0x7
04ed e414 | | Load 0x2,0x14
04ee 01cc | | Execute Vector,Catenate
04ef e40a | | Load 0x2,0xa
04f0 0092 0842 | B| Action Push_String_Extended,0x842 ; "Universe"
04f2 01cc | | Execute Vector,Catenate
04f3 0092 0843 | C| Action Push_String_Extended,0x843 ; "!"
04f5 801d | | Call 0x0,0x1d
04f6 e418 | | Load 0x2,0x18
04f7 e417 | | Load 0x2,0x17
04f8 e41c | | Load 0x2,0x1c
04f9 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04fa c418 | | Store 0x2,0x18
04fb e418 | | Load 0x2,0x18
04fc 0120 | | Execute Any,Is_Value
04fd 6803 |h | Jump_Zero 0x501
04fe e003 | | Load 0x0,0x3
04ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0500 7801 |x | Jump 0x502
0501 e418 | | Load 0x2,0x18
0502 e417 | | Load 0x2,0x17
0503 0092 084f | O| Action Push_String_Extended,0x84f ; "Restoring a Prototype Internal Universe"
0505 e41c | | Load 0x2,0x1c
0506 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0507 c418 | | Store 0x2,0x18
0508 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
050a e40a | | Load 0x2,0xa
050b 0092 0842 | B| Action Push_String_Extended,0x842 ; "Universe"
050d 01cc | | Execute Vector,Catenate
050e 0092 0845 | E| Action Push_String_Extended,0x845 ; "R1000, New, Goal => Source"
0510 0092 0846 | F| Action Push_String_Extended,0x846 ; "*"
0512 e40d | | Load 0x2,0xd
0513 0092 0847 | G| Action Push_String_Extended,0x847 ; "?"
0515 e01e | | Load 0x0,0x1e
0516 180e | | Execute Package,Field_Execute,Field_Number 0xe
0517 e418 | | Load 0x2,0x18
0518 e417 | | Load 0x2,0x17
0519 e41c | | Load 0x2,0x1c
051a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
051b c418 | | Store 0x2,0x18
051c e40b | | Load 0x2,0xb
051d e412 | | Load 0x2,0x12
051e 01cc | | Execute Vector,Catenate
051f 801b | | Call 0x0,0x1b
0520 7016 |p | Jump_Nonzero 0x537
0521 e418 | | Load 0x2,0x18
0522 0120 | | Execute Any,Is_Value
0523 6803 |h | Jump_Zero 0x527
0524 e003 | | Load 0x0,0x3
0525 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0526 7801 |x | Jump 0x528
0527 e418 | | Load 0x2,0x18
0528 e417 | | Load 0x2,0x17
0529 0092 0848 | H| Action Push_String_Extended,0x848 ; "Inserting New Declarations Incrementally"
052b e41c | | Load 0x2,0x1c
052c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
052d c418 | | Store 0x2,0x18
052e e40b | | Load 0x2,0xb
052f e412 | | Load 0x2,0x12
0530 01cc | | Execute Vector,Catenate
0531 801f | | Call 0x0,0x1f
0532 e418 | | Load 0x2,0x18
0533 e417 | | Load 0x2,0x17
0534 e41c | | Load 0x2,0x1c
0535 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0536 c418 | | Store 0x2,0x18
0537 e40b | | Load 0x2,0xb
0538 e413 | | Load 0x2,0x13
0539 01cc | | Execute Vector,Catenate
053a 801b | | Call 0x0,0x1b
053b 7016 |p | Jump_Nonzero 0x552
053c e418 | | Load 0x2,0x18
053d 0120 | | Execute Any,Is_Value
053e 6803 |h | Jump_Zero 0x542
053f e003 | | Load 0x0,0x3
0540 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0541 7801 |x | Jump 0x543
0542 e418 | | Load 0x2,0x18
0543 e417 | | Load 0x2,0x17
0544 0092 0849 | I| Action Push_String_Extended,0x849 ; "Changing Default Values of Selected Command Parameters"
0546 e41c | | Load 0x2,0x1c
0547 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0548 c418 | | Store 0x2,0x18
0549 e40b | | Load 0x2,0xb
054a e413 | | Load 0x2,0x13
054b 01cc | | Execute Vector,Catenate
054c 8020 | | Call 0x0,0x20
054d e418 | | Load 0x2,0x18
054e e417 | | Load 0x2,0x17
054f e41c | | Load 0x2,0x1c
0550 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0551 c418 | | Store 0x2,0x18
0552 e418 | | Load 0x2,0x18
0553 0120 | | Execute Any,Is_Value
0554 6803 |h | Jump_Zero 0x558
0555 e003 | | Load 0x0,0x3
0556 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0557 7801 |x | Jump 0x559
0558 e418 | | Load 0x2,0x18
0559 e417 | | Load 0x2,0x17
055a 0092 0850 | P| Action Push_String_Extended,0x850 ; "Scanning for Changes in Internal Universe Specs"
055c e41c | | Load 0x2,0x1c
055d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
055e c418 | | Store 0x2,0x18
055f e40b | | Load 0x2,0xb
0560 e411 | | Load 0x2,0x11
0561 01cc | | Execute Vector,Catenate
0562 e40b | | Load 0x2,0xb
0563 e410 | | Load 0x2,0x10
0564 01cc | | Execute Vector,Catenate
0565 e40b | | Load 0x2,0xb
0566 e40f | | Load 0x2,0xf
0567 01cc | | Execute Vector,Catenate
0568 e40b | | Load 0x2,0xb
0569 e40e | | Load 0x2,0xe
056a 01cc | | Execute Vector,Catenate
056b 0092 0843 | C| Action Push_String_Extended,0x843 ; "!"
056d e40d | | Load 0x2,0xd
056e 8021 | ! | Call 0x0,0x21
056f e418 | | Load 0x2,0x18
0570 e417 | | Load 0x2,0x17
0571 e41c | | Load 0x2,0x1c
0572 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0573 c418 | | Store 0x2,0x18
0574 e42b | + | Load 0x2,0x2b
0575 683c |h< | Jump_Zero 0x5b2
0576 0092 084b | K| Action Push_String_Extended,0x84b ; "![_[]"
0578 e40b | | Load 0x2,0xb
0579 01cc | | Execute Vector,Catenate
057a e40f | | Load 0x2,0xf
057b 01cc | | Execute Vector,Catenate
057c 0092 084c | L| Action Push_String_Extended,0x84c ; "]'BODY"
057e 01cc | | Execute Vector,Catenate
057f 8002 | | Call 0x0,0x2
0580 700b |p | Jump_Nonzero 0x58c
0581 0092 084b | K| Action Push_String_Extended,0x84b ; "![_[]"
0583 e40b | | Load 0x2,0xb
0584 01cc | | Execute Vector,Catenate
0585 e40e | | Load 0x2,0xe
0586 01cc | | Execute Vector,Catenate
0587 0092 084c | L| Action Push_String_Extended,0x84c ; "]'BODY"
0589 01cc | | Execute Vector,Catenate
058a 8002 | | Call 0x0,0x2
058b 6826 |h& | Jump_Zero 0x5b2
058c e418 | | Load 0x2,0x18
058d 0120 | | Execute Any,Is_Value
058e 6803 |h | Jump_Zero 0x592
058f e003 | | Load 0x0,0x3
0590 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0591 7801 |x | Jump 0x593
0592 e418 | | Load 0x2,0x18
0593 e417 | | Load 0x2,0x17
0594 0092 084d | M| Action Push_String_Extended,0x84d ; "Creating Text Backup of Existing Bodies to be Modified"
0596 e41c | | Load 0x2,0x1c
0597 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0598 c418 | | Store 0x2,0x18
0599 0092 084b | K| Action Push_String_Extended,0x84b ; "![_[]"
059b e40b | | Load 0x2,0xb
059c 01cc | | Execute Vector,Catenate
059d e40f | | Load 0x2,0xf
059e 01cc | | Execute Vector,Catenate
059f 0092 084c | L| Action Push_String_Extended,0x84c ; "]'BODY"
05a1 01cc | | Execute Vector,Catenate
05a2 8433 | 3 | Call 0x2,0x33
05a3 0092 084b | K| Action Push_String_Extended,0x84b ; "![_[]"
05a5 e40b | | Load 0x2,0xb
05a6 01cc | | Execute Vector,Catenate
05a7 e40e | | Load 0x2,0xe
05a8 01cc | | Execute Vector,Catenate
05a9 0092 084c | L| Action Push_String_Extended,0x84c ; "]'BODY"
05ab 01cc | | Execute Vector,Catenate
05ac 8433 | 3 | Call 0x2,0x33
05ad e418 | | Load 0x2,0x18
05ae e417 | | Load 0x2,0x17
05af e41c | | Load 0x2,0x1c
05b0 181a | | Execute Package,Field_Execute,Field_Number 0x1a
05b1 c418 | | Store 0x2,0x18
05b2 e430 | 0 | Load 0x2,0x30
05b3 6807 |h | Jump_Zero 0x5bb
05b4 4801 |H | Short_Literal 0x1
05b5 e409 | | Load 0x2,0x9
05b6 0092 0851 | Q| Action Push_String_Extended,0x851 ; ".Lrm.System"
05b8 01cc | | Execute Vector,Catenate
05b9 e022 | " | Load 0x0,0x22
05ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05bb e42e | . | Load 0x2,0x2e
05bc 700a |p | Jump_Nonzero 0x5c7
05bd e407 | | Load 0x2,0x7
05be e40e | | Load 0x2,0xe
05bf 01cc | | Execute Vector,Catenate
05c0 801b | | Call 0x0,0x1b
05c1 7005 |p | Jump_Nonzero 0x5c7
05c2 0092 0852 | R| Action Push_String_Extended,0x852 ; "Installing Changed Universe Units"
05c4 e41c | | Load 0x2,0x1c
05c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05c6 8602 | | Call 0x3,0x2
05c7 e405 | | Load 0x2,0x5
05c8 680a |h | Jump_Zero 0x5d3
05c9 e40b | | Load 0x2,0xb
05ca e40e | | Load 0x2,0xe
05cb 01cc | | Execute Vector,Catenate
05cc 801b | | Call 0x0,0x1b
05cd 7005 |p | Jump_Nonzero 0x5d3
05ce 0092 0853 | S| Action Push_String_Extended,0x853 ; "Installing Changed Internal Universe Units"
05d0 e41c | | Load 0x2,0x1c
05d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05d2 8603 | | Call 0x3,0x3
05d3 e42f | / | Load 0x2,0x2f
05d4 681c |h | Jump_Zero 0x5f1
05d5 e418 | | Load 0x2,0x18
05d6 0120 | | Execute Any,Is_Value
05d7 6803 |h | Jump_Zero 0x5db
05d8 e003 | | Load 0x0,0x3
05d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05da 7801 |x | Jump 0x5dc
05db e418 | | Load 0x2,0x18
05dc e417 | | Load 0x2,0x17
05dd 0092 0854 | T| Action Push_String_Extended,0x854 ; "Re-Installing Keymap/Initialize/Abbreviations Bodies."
05df e41c | | Load 0x2,0x1c
05e0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05e1 c418 | | Store 0x2,0x18
05e2 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
05e4 4800 |H | Short_Literal 0x0
05e5 0092 0855 | U| Action Push_String_Extended,0x855 ; "<ALL_WORLDS>"
05e7 4803 |H | Short_Literal 0x3
05e8 4803 |H | Short_Literal 0x3
05e9 e416 | | Load 0x2,0x16
05ea e01c | | Load 0x0,0x1c
05eb 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05ec e418 | | Load 0x2,0x18
05ed e417 | | Load 0x2,0x17
05ee e41c | | Load 0x2,0x1c
05ef 181a | | Execute Package,Field_Execute,Field_Number 0x1a
05f0 c418 | | Store 0x2,0x18
05f1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05f2 TRAP_0390:
05f2 0007 | | Action Break_Optional
05f3 e008 | | Load 0x0,0x8
05f4 180e | | Execute Package,Field_Execute,Field_Number 0xe
05f5 4808 |H | Short_Literal 0x8
05f6 4801 |H | Short_Literal 0x1
05f7 4801 |H | Short_Literal 0x1
05f8 e015 | | Load 0x0,0x15
05f9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05fa 0092 0856 | V| Action Push_String_Extended,0x856 ; " raised while Updating Environment Specs"
05fc 01cc | | Execute Vector,Catenate
05fd e00e | | Load 0x0,0xe
05fe 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05ff e003 | | Load 0x0,0x3
0600 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0601 e418 | | Load 0x2,0x18
0602 012f | / | Execute Any,Equal
0603 680c |h | Jump_Zero 0x610
0604 e008 | | Load 0x0,0x8
0605 180e | | Execute Package,Field_Execute,Field_Number 0xe
0606 4805 |H | Short_Literal 0x5
0607 0092 0826 | &| Action Push_String_Extended,0x826 ; "Step has Failed"
0609 e00e | | Load 0x0,0xe
060a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
060b e418 | | Load 0x2,0x18
060c e417 | | Load 0x2,0x17
060d e41c | | Load 0x2,0x1c
060e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
060f c418 | | Store 0x2,0x18
0610 0092 0857 | W| Action Push_String_Extended,0x857 ; "Updating Environment Specs has failed"
0612 e41c | | Load 0x2,0x1c
0613 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0614 4801 |H | Short_Literal 0x1
0615 a421 | ! | Store_Unchecked 0x2,0x21
0616 00d8 | | Load_Top At_Offset_0
0617 0101 | | Execute Exception,Reraise
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b | | .CONST 0x061b ; Address of begin
0619 0718 | | .CONST 0x0718 ; Address of exception handler
061a 0001 | | .CONST 0x0001 ; Number of locals
061b BODY_0618:
061b INIT_0618:
061b 0092 0858 | X| Action Push_String_Extended,0x858 ; "Updating Miscellaneous Universe Items"
061d e41c | | Load 0x2,0x1c
061e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
061f e42a | * | Load 0x2,0x2a
0620 684f |hO | Jump_Zero 0x670
0621 e418 | | Load 0x2,0x18
0622 0120 | | Execute Any,Is_Value
0623 6803 |h | Jump_Zero 0x627
0624 e003 | | Load 0x0,0x3
0625 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0626 7801 |x | Jump 0x628
0627 e418 | | Load 0x2,0x18
0628 e417 | | Load 0x2,0x17
0629 0092 0859 | Y| Action Push_String_Extended,0x859 ; "Restoring Miscellaneous System Components"
062b e41c | | Load 0x2,0x1c
062c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
062d c418 | | Store 0x2,0x18
062e e422 | " | Load 0x2,0x22
062f 0092 085a | Z| Action Push_String_Extended,0x85a ; "!Copyright_Rational"
0631 e00a | | Load 0x0,0xa
0632 180e | | Execute Package,Field_Execute,Field_Number 0xe
0633 00d1 | | Pop_Control Pop_Count_1
0634 00ea | | Load_Encached Null_String_Cache
0635 4801 |H | Short_Literal 0x1
0636 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
0638 4801 |H | Short_Literal 0x1
0639 0092 085a | Z| Action Push_String_Extended,0x85a ; "!Copyright_Rational"
063b 0092 085b | [| Action Push_String_Extended,0x85b ; "$$.Lists.Copyright_Notice"
063d e013 | | Load 0x0,0x13
063e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
063f e422 | " | Load 0x2,0x22
0640 e00a | | Load 0x0,0xa
0641 180f | | Execute Package,Field_Execute,Field_Number 0xf
0642 00d1 | | Pop_Control Pop_Count_1
0643 e42e | . | Load 0x2,0x2e
0644 7010 |p | Jump_Nonzero 0x655
0645 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
0647 e406 | | Load 0x2,0x6
0648 0092 085c | \| Action Push_String_Extended,0x85c ; "Miscellany"
064a 01cc | | Execute Vector,Catenate
064b 0092 085d | ]| Action Push_String_Extended,0x85d ; "R1000, Changed, Replace, Remake"
064d 0092 0846 | F| Action Push_String_Extended,0x846 ; "*"
064f 0092 0846 | F| Action Push_String_Extended,0x846 ; "*"
0651 0092 0847 | G| Action Push_String_Extended,0x847 ; "?"
0653 e01e | | Load 0x0,0x1e
0654 180e | | Execute Package,Field_Execute,Field_Number 0xe
0655 e40a | | Load 0x2,0xa
0656 0092 085c | \| Action Push_String_Extended,0x85c ; "Miscellany"
0658 01cc | | Execute Vector,Catenate
0659 8002 | | Call 0x0,0x2
065a 6810 |h | Jump_Zero 0x66b
065b 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
065d e40a | | Load 0x2,0xa
065e 0092 085c | \| Action Push_String_Extended,0x85c ; "Miscellany"
0660 01cc | | Execute Vector,Catenate
0661 0092 085e | ^| Action Push_String_Extended,0x85e ; "R1000, New, Replace, Remake"
0663 0092 0846 | F| Action Push_String_Extended,0x846 ; "*"
0665 0092 0846 | F| Action Push_String_Extended,0x846 ; "*"
0667 0092 0847 | G| Action Push_String_Extended,0x847 ; "?"
0669 e01e | | Load 0x0,0x1e
066a 180e | | Execute Package,Field_Execute,Field_Number 0xe
066b e418 | | Load 0x2,0x18
066c e417 | | Load 0x2,0x17
066d e41c | | Load 0x2,0x1c
066e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
066f c418 | | Store 0x2,0x18
0670 e42e | . | Load 0x2,0x2e
0671 701e |p | Jump_Nonzero 0x690
0672 e418 | | Load 0x2,0x18
0673 0120 | | Execute Any,Is_Value
0674 6803 |h | Jump_Zero 0x678
0675 e003 | | Load 0x0,0x3
0676 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0677 7801 |x | Jump 0x679
0678 e418 | | Load 0x2,0x18
0679 e417 | | Load 0x2,0x17
067a 0092 085f | _| Action Push_String_Extended,0x85f ; "Authorizing Lrm_Interface"
067c e41c | | Load 0x2,0x1c
067d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
067e c418 | | Store 0x2,0x18
067f 00ea | | Load_Encached Null_String_Cache
0680 00ea | | Load_Encached Null_String_Cache
0681 e023 | # | Load 0x0,0x23
0682 180e | | Execute Package,Field_Execute,Field_Number 0xe
0683 0092 0860 | `| Action Push_String_Extended,0x860 ; "Lrm_Interface"
0685 e019 | | Load 0x0,0x19
0686 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0687 0092 0860 | `| Action Push_String_Extended,0x860 ; "Lrm_Interface"
0689 e019 | | Load 0x0,0x19
068a 180d | | Execute Package,Field_Execute,Field_Number 0xd
068b e418 | | Load 0x2,0x18
068c e417 | | Load 0x2,0x17
068d e41c | | Load 0x2,0x1c
068e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
068f c418 | | Store 0x2,0x18
0690 e42e | . | Load 0x2,0x2e
0691 701e |p | Jump_Nonzero 0x6b0
0692 e418 | | Load 0x2,0x18
0693 0120 | | Execute Any,Is_Value
0694 6803 |h | Jump_Zero 0x698
0695 e003 | | Load 0x0,0x3
0696 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0697 7801 |x | Jump 0x699
0698 e418 | | Load 0x2,0x18
0699 e417 | | Load 0x2,0x17
069a 0092 0861 | a| Action Push_String_Extended,0x861 ; "Authorizing X Interface"
069c e41c | | Load 0x2,0x1c
069d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
069e c418 | | Store 0x2,0x18
069f 00ea | | Load_Encached Null_String_Cache
06a0 00ea | | Load_Encached Null_String_Cache
06a1 e023 | # | Load 0x0,0x23
06a2 180e | | Execute Package,Field_Execute,Field_Number 0xe
06a3 0092 0862 | b| Action Push_String_Extended,0x862 ; "X Interface"
06a5 e019 | | Load 0x0,0x19
06a6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06a7 0092 0862 | b| Action Push_String_Extended,0x862 ; "X Interface"
06a9 e019 | | Load 0x0,0x19
06aa 180d | | Execute Package,Field_Execute,Field_Number 0xd
06ab e418 | | Load 0x2,0x18
06ac e417 | | Load 0x2,0x17
06ad e41c | | Load 0x2,0x1c
06ae 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06af c418 | | Store 0x2,0x18
06b0 e429 | ) | Load 0x2,0x29
06b1 6830 |h0 | Jump_Zero 0x6e2
06b2 e418 | | Load 0x2,0x18
06b3 0120 | | Execute Any,Is_Value
06b4 6803 |h | Jump_Zero 0x6b8
06b5 e003 | | Load 0x0,0x3
06b6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06b7 7801 |x | Jump 0x6b9
06b8 e418 | | Load 0x2,0x18
06b9 e417 | | Load 0x2,0x17
06ba 0092 0863 | c| Action Push_String_Extended,0x863 ; "Enabling \x22Install_Subsystems\x22 to run on next reboot."
06bc e41c | | Load 0x2,0x1c
06bd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06be c418 | | Store 0x2,0x18
06bf 0092 0864 | d| Action Push_String_Extended,0x864 ; "!Machine"
06c1 4800 |H | Short_Literal 0x0
06c2 0092 0847 | G| Action Push_String_Extended,0x847 ; "?"
06c4 0092 0865 | e| Action Push_String_Extended,0x865 ; "Install_Subsystems"
06c6 e024 | $ | Load 0x0,0x24
06c7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06c8 680a |h | Jump_Zero 0x6d3
06c9 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
06cb 4800 |H | Short_Literal 0x0
06cc 0092 0855 | U| Action Push_String_Extended,0x855 ; "<ALL_WORLDS>"
06ce 4801 |H | Short_Literal 0x1
06cf 0092 0866 | f| Action Push_String_Extended,0x866 ; "!Machine`Install_Subsystems"
06d1 e01c | | Load 0x0,0x1c
06d2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06d3 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
06d5 0092 0864 | d| Action Push_String_Extended,0x864 ; "!Machine"
06d7 0092 0867 | g| Action Push_String_Extended,0x867 ; "#"
06d9 0092 0868 | h| Action Push_String_Extended,0x868 ; "$$`Install_Subsystems"
06db e025 | % | Load 0x0,0x25
06dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06dd e418 | | Load 0x2,0x18
06de e417 | | Load 0x2,0x17
06df e41c | | Load 0x2,0x1c
06e0 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06e1 c418 | | Store 0x2,0x18
06e2 0092 083b | ;| Action Push_String_Extended,0x83b ; "$$.Lists.Frozen_Worlds_Of_The_Universe"
06e4 8002 | | Call 0x0,0x2
06e5 6819 |h | Jump_Zero 0x6ff
06e6 e418 | | Load 0x2,0x18
06e7 0120 | | Execute Any,Is_Value
06e8 6803 |h | Jump_Zero 0x6ec
06e9 e003 | | Load 0x0,0x3
06ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06eb 7801 |x | Jump 0x6ed
06ec e418 | | Load 0x2,0x18
06ed e417 | | Load 0x2,0x17
06ee 0092 0869 | i| Action Push_String_Extended,0x869 ; "Refreezing Worlds of the Universe"
06f0 e41c | | Load 0x2,0x1c
06f1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06f2 c418 | | Store 0x2,0x18
06f3 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
06f5 4800 |H | Short_Literal 0x0
06f6 0092 086a | j| Action Push_String_Extended,0x86a ; "_$$.Lists.Frozen_Worlds_Of_The_Universe"
06f8 e013 | | Load 0x0,0x13
06f9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06fa e418 | | Load 0x2,0x18
06fb e417 | | Load 0x2,0x17
06fc e41c | | Load 0x2,0x1c
06fd 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06fe c418 | | Store 0x2,0x18
06ff e418 | | Load 0x2,0x18
0700 0120 | | Execute Any,Is_Value
0701 6803 |h | Jump_Zero 0x705
0702 e003 | | Load 0x0,0x3
0703 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0704 7801 |x | Jump 0x706
0705 e418 | | Load 0x2,0x18
0706 e417 | | Load 0x2,0x17
0707 0092 086b | k| Action Push_String_Extended,0x86b ; "Running Snapshot Daemon"
0709 e41c | | Load 0x2,0x1c
070a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
070b c418 | | Store 0x2,0x18
070c 0092 081f | | Action Push_String_Extended,0x81f ; "<PROFILE>"
070e 0092 086c | l| Action Push_String_Extended,0x86c ; "snap"
0710 e026 | & | Load 0x0,0x26
0711 180e | | Execute Package,Field_Execute,Field_Number 0xe
0712 e418 | | Load 0x2,0x18
0713 e417 | | Load 0x2,0x17
0714 e41c | | Load 0x2,0x1c
0715 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0716 c418 | | Store 0x2,0x18
0717 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0718 TRAP_0618:
0718 0007 | | Action Break_Optional
0719 e008 | | Load 0x0,0x8
071a 180e | | Execute Package,Field_Execute,Field_Number 0xe
071b 4808 |H | Short_Literal 0x8
071c 4801 |H | Short_Literal 0x1
071d 4801 |H | Short_Literal 0x1
071e e015 | | Load 0x0,0x15
071f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0720 0092 086d | m| Action Push_String_Extended,0x86d ; " raised while Updating Miscellaneous Items"
0722 01cc | | Execute Vector,Catenate
0723 e00e | | Load 0x0,0xe
0724 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0725 e003 | | Load 0x0,0x3
0726 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0727 e418 | | Load 0x2,0x18
0728 012f | / | Execute Any,Equal
0729 680c |h | Jump_Zero 0x736
072a e008 | | Load 0x0,0x8
072b 180e | | Execute Package,Field_Execute,Field_Number 0xe
072c 4805 |H | Short_Literal 0x5
072d 0092 0826 | &| Action Push_String_Extended,0x826 ; "Step has Failed"
072f e00e | | Load 0x0,0xe
0730 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0731 e418 | | Load 0x2,0x18
0732 e417 | | Load 0x2,0x17
0733 e41c | | Load 0x2,0x1c
0734 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0735 c418 | | Store 0x2,0x18
0736 0092 086e | n| Action Push_String_Extended,0x86e ; "Updating Miscellaneous Items has failed"
0738 e41c | | Load 0x2,0x1c
0739 1814 | | Execute Package,Field_Execute,Field_Number 0x14
073a 4801 |H | Short_Literal 0x1
073b a421 | ! | Store_Unchecked 0x2,0x21
073c 00d8 | | Load_Top At_Offset_0
073d 0101 | | Execute Exception,Reraise
073e 0000 0000 | | .XXX[0x2]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0747 | G | .CONST 0x0747 ; Address of begin
0741 0776 | v | .CONST 0x0776 ; Address of exception handler
0742 0002 | | .CONST 0x0002 ; Number of locals
0743 INIT_0740:
0743 e602 | | Load 0x3,0x2
0744 e012 | | Load 0x0,0x12
0745 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0746 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0747 BODY_0740:
0747 e008 | | Load 0x0,0x8
0748 180e | | Execute Package,Field_Execute,Field_Number 0xe
0749 4802 |H | Short_Literal 0x2
074a 0092 086f | o| Action Push_String_Extended,0x86f ; "Creating text backup of "
074c 00db | | Load_Top At_Offset_3
074d 01cc | | Execute Vector,Catenate
074e e00e | | Load 0x0,0xe
074f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0750 e604 | | Load 0x3,0x4
0751 00ea | | Load_Encached Null_String_Cache
0752 00da | | Load_Top At_Offset_2
0753 4800 |H | Short_Literal 0x0
0754 e003 | | Load 0x0,0x3
0755 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0756 c604 | | Store 0x3,0x4
0757 e605 | | Load 0x3,0x5
0758 00ea | | Load_Encached Null_String_Cache
0759 00da | | Load_Top At_Offset_2
075a 8432 | 2 | Call 0x2,0x32
075b 4801 |H | Short_Literal 0x1
075c e003 | | Load 0x0,0x3
075d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
075e c605 | | Store 0x3,0x5
075f 00cf | | Action Mark_Auxiliary
0760 7807 |x | Jump 0x768
0761 e604 | | Load 0x3,0x4
0762 e003 | | Load 0x0,0x3
0763 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0764 e605 | | Load 0x3,0x5
0765 e003 | | Load 0x0,0x3
0766 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0767 00c9 | | Action Pop_Auxiliary_Loop
0768 e604 | | Load 0x3,0x4
0769 e003 | | Load 0x0,0x3
076a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
076b 6ff5 |o | Jump_Zero 0x761
076c 00ce | | Action Pop_Auxiliary
076d e604 | | Load 0x3,0x4
076e e003 | | Load 0x0,0x3
076f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0770 c604 | | Store 0x3,0x4
0771 e605 | | Load 0x3,0x5
0772 e003 | | Load 0x0,0x3
0773 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0774 c605 | | Store 0x3,0x5
0775 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0776 TRAP_0740:
0776 00d8 | | Load_Top At_Offset_0
0777 0107 | | Execute Exception,Get_Name
0778 4950 |IP | Short_Literal 0x150
0779 495f |I_ | Short_Literal 0x15f
077a 0262 | b | Execute Discrete,In_Range
077b 6809 |h | Jump_Zero 0x785
077c e604 | | Load 0x3,0x4
077d e003 | | Load 0x0,0x3
077e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
077f c604 | | Store 0x3,0x4
0780 e605 | | Load 0x3,0x5
0781 e003 | | Load 0x0,0x3
0782 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0783 c605 | | Store 0x3,0x5
0784 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0785 e604 | | Load 0x3,0x4
0786 e003 | | Load 0x0,0x3
0787 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0788 c604 | | Store 0x3,0x4
0789 e605 | | Load 0x3,0x5
078a e003 | | Load 0x0,0x3
078b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
078c c605 | | Store 0x3,0x5
078d e008 | | Load 0x0,0x8
078e 180e | | Execute Package,Field_Execute,Field_Number 0xe
078f 4808 |H | Short_Literal 0x8
0790 0092 0870 | p| Action Push_String_Extended,0x870 ; "Can't create text backup for "
0792 e802 | | Load 0x4,0x2
0793 01cc | | Execute Vector,Catenate
0794 0092 0871 | q| Action Push_String_Extended,0x871 ; " (attempt raises "
0796 01cc | | Execute Vector,Catenate
0797 4800 |H | Short_Literal 0x0
0798 4801 |H | Short_Literal 0x1
0799 e015 | | Load 0x0,0x15
079a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
079b 01cc | | Execute Vector,Catenate
079c 0092 0872 | r| Action Push_String_Extended,0x872 ; ")"
079e 01cc | | Execute Vector,Catenate
079f e00e | | Load 0x0,0xe
07a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07a1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07a2 0000 0000 | | .BLANK 0000[0x6]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07b0 | | .CONST 0x07b0 ; Address of begin
07a9 0004 | | .CONST 0x0004 ; Address of exception handler
07aa 0002 | | .CONST 0x0002 ; Number of locals
07ab INIT_07a8:
07ab e003 | | Load 0x0,0x3
07ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ad 02c7 | | Declare_Variable Any
07ae 00d8 | | Load_Top At_Offset_0
07af 1c00 | | Execute_Immediate Run_Utility,0x0
07b0 BODY_07a8:
07b0 00d8 | | Load_Top At_Offset_0
07b1 00ea | | Load_Encached Null_String_Cache
07b2 0092 0873 | s| Action Push_String_Extended,0x873 ; "$$.Lists.Mail_Xfer"
07b4 4801 |H | Short_Literal 0x1
07b5 e003 | | Load 0x0,0x3
07b6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
07b7 c802 | | Store 0x4,0x2
07b8 0092 0874 | t| Action Push_String_Extended,0x874 ; ":Mail.Mload"
07ba 00d9 | | Load_Top At_Offset_1
07bb e003 | | Load 0x0,0x3
07bc 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
07bd 00d8 | | Load_Top At_Offset_0
07be e003 | | Load 0x0,0x3
07bf 181b | | Execute Package,Field_Execute,Field_Number 0x1b
07c0 c802 | | Store 0x4,0x2
07c1 4801 |H | Short_Literal 0x1
07c2 0092 0873 | s| Action Push_String_Extended,0x873 ; "$$.Lists.Mail_Xfer"
07c4 8027 | ' | Call 0x0,0x27
07c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07c6 0000 0000 | | .XXX[0x2]
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07cb | | .CONST 0x07cb ; Address of begin
07c9 07d4 | | .CONST 0x07d4 ; Address of exception handler
07ca 0001 | | .CONST 0x0001 ; Number of locals
07cb BODY_07c8:
07cb INIT_07c8:
07cb e406 | | Load 0x2,0x6
07cc 0092 0842 | B| Action Push_String_Extended,0x842 ; "Universe"
07ce 01cc | | Execute Vector,Catenate
07cf e407 | | Load 0x2,0x7
07d0 e40e | | Load 0x2,0xe
07d1 01cc | | Execute Vector,Catenate
07d2 8028 | ( | Call 0x0,0x28
07d3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07d4 TRAP_07c8:
07d4 0007 | | Action Break_Optional
07d5 0092 0875 | u| Action Push_String_Extended,0x875 ; "Installing Changed Universe Units has failed"
07d7 e41c | | Load 0x2,0x1c
07d8 1814 | | Execute Package,Field_Execute,Field_Number 0x14
07d9 4801 |H | Short_Literal 0x1
07da a421 | ! | Store_Unchecked 0x2,0x21
07db 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07dc 0000 0000 | | .BLANK 0000[0x4]
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 07e3 | | .CONST 0x07e3 ; Address of begin
07e1 07ec | | .CONST 0x07ec ; Address of exception handler
07e2 0001 | | .CONST 0x0001 ; Number of locals
07e3 BODY_07e0:
07e3 INIT_07e0:
07e3 e40a | | Load 0x2,0xa
07e4 0092 0842 | B| Action Push_String_Extended,0x842 ; "Universe"
07e6 01cc | | Execute Vector,Catenate
07e7 e40b | | Load 0x2,0xb
07e8 e40e | | Load 0x2,0xe
07e9 01cc | | Execute Vector,Catenate
07ea 8028 | ( | Call 0x0,0x28
07eb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07ec TRAP_07e0:
07ec 0007 | | Action Break_Optional
07ed 0092 0876 | v| Action Push_String_Extended,0x876 ; "Installing Changed Internal Universe Units has failed"
07ef e41c | | Load 0x2,0x1c
07f0 1814 | | Execute Package,Field_Execute,Field_Number 0x14
07f1 4801 |H | Short_Literal 0x1
07f2 a421 | ! | Store_Unchecked 0x2,0x21
07f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07f4 ; --------------------------------------------------------------------------------------
07f4 ; STRING TABLE
07f4 ; --------------------------------------------------------------------------------------
07f4 0108 | | .STRTAB 0x0108->0x0878 ; "NIL"
07f5 0109 | | .STRTAB 0x0109->0x0879 ; "EEDB_UPDATE"
07f6 0112 | | .STRTAB 0x0112->0x087f ; "UNIVERSE_UPDATE"
07f7 011f | | .STRTAB 0x011f->0x0886 ; "SUBSYSTEMS_UPDATE"
07f8 012e | . | .STRTAB 0x012e->0x088f ; "MISCELLANY_UPDATE"
07f9 013d | = | .STRTAB 0x013d->0x0897 ; "SWITCHES_UPDATE"
07fa 014a | J | .STRTAB 0x014a->0x089f ; "MAIL_INIT"
07fb 0151 | Q | .STRTAB 0x0151->0x08a3 ; "MAIL_UPDATE"
07fc 015a | Z | .STRTAB 0x015a->0x08a9 ; "PRE_DEMOTE"
07fd 0162 | b | .STRTAB 0x0162->0x08ae ; "BACKUP_BODIES"
07fe 016d | m | .STRTAB 0x016d->0x08b4 ; "REMOVE_READ_ONLY_PRAGMA"
07ff 0182 | | .STRTAB 0x0182->0x08c0 ; "INTERNAL_ONLY"
0800 018d | | .STRTAB 0x018d->0x08c6 ; "!Machine.Release.Archive.Environment."
0801 01b0 | | .STRTAB 0x01b0->0x08d9 ; ".Segments"
0802 01b7 | | .STRTAB 0x01b7->0x08dd ; ".Internal"
0803 01be | | .STRTAB 0x01be->0x08e2 ; ".Archives."
0804 01c6 | | .STRTAB 0x01c6->0x08e7 ; ".Lists."
0805 01cb | | .STRTAB 0x01cb->0x08ea ; ".Logs."
0806 01cf | | .STRTAB 0x01cf->0x08ed ; ".Universe"
0807 01d6 | | .STRTAB 0x01d6->0x08f2 ; "Updated_Units"
0808 01e1 | | .STRTAB 0x01e1->0x08f8 ; "Units_To_Be_Updated"
0809 01f2 | | .STRTAB 0x01f2->0x0902 ; "Forced_Units"
080a 01fc | | .STRTAB 0x01fc->0x0908 ; "Banned_Units"
080b 0206 | | .STRTAB 0x0206->0x090e ; "Incremental_Update_Directives"
080c 0221 | ! | .STRTAB 0x0221->0x091c ; "Changes_To_Parameter_Defaults"
080d 023c | < | .STRTAB 0x023c->0x092b ; "Worlds_Of_The_Universe"
080e 0250 | P | .STRTAB 0x0250->0x0936 ; "Release_Subs"
080f 025a | Z | .STRTAB 0x025a->0x093c ; "[!Commands.Abbreviations.@, !Machine.[Editor_Data.@_Commands]]'Body"
0810 029b | | .STRTAB 0x029b->0x095d ; "Current_Install_Step"
0811 02ad | | .STRTAB 0x02ad->0x0967 ; ".Master_Log_File"
0812 02bb | | .STRTAB 0x02bb->0x096f ; "Install_Product"
0813 02c8 | | .STRTAB 0x02c8->0x0977 ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
0814 0339 | 9 | .STRTAB 0x0339->0x09b0 ; "Load_Environment..Internal_Only => Boolean"
0815 0361 | a | .STRTAB 0x0361->0x09c5 ; "Pre_Demote => Pre-Demote"
0816 0377 | w | .STRTAB 0x0377->0x09d1 ; ", backup"
0817 037d | } | .STRTAB 0x037d->0x09d5 ; "[Install_Product (Release_World => \x22"
0818 039f | | .STRTAB 0x039f->0x09e7 ; "\x22, Options => \x22"
0819 03ac | | .STRTAB 0x03ac->0x09ef ; "\x22);]"
081a 03ae | | .STRTAB 0x03ae->0x09f1 ; "Aborting environment installation: Could not set PRIVILEGED MODE."
081b 03ed | | .STRTAB 0x03ed->0x0a11 ; "$$.Lists.Combined_Mload"
081c 0402 | | .STRTAB 0x0402->0x0a1d ; "Aborting environment installation: "
081d 0423 | # | .STRTAB 0x0423->0x0a2e ; "$$"
081e 0423 | # | .STRTAB 0x0423->0x0a2f ; " is not a release world."
081f 0439 | 9 | .STRTAB 0x0439->0x0a3b ; "<PROFILE>"
0820 0440 | @ | .STRTAB 0x0440->0x0a40 ; "Installing Environment Release "
0821 045d | ] | .STRTAB 0x045d->0x0a4f ; "Install_Product has failed"
0822 0475 | u | .STRTAB 0x0475->0x0a5c ; "Install_Product has completed"
0823 0490 | | .STRTAB 0x0490->0x0a6b ; "[Install_Product has completed]"
0824 04ad | | .STRTAB 0x04ad->0x0a7a ; "[Install_Product has failed]"
0825 04c7 | | .STRTAB 0x04c7->0x0a88 ; " raised"
0826 04cc | | .STRTAB 0x04cc->0x0a8c ; "Step has Failed"
0827 04d9 | | .STRTAB 0x04d9->0x0a93 ; "Preserving Machine State"
0828 04ef | | .STRTAB 0x04ef->0x0a9f ; "Processing Switch Files"
0829 0504 | | .STRTAB 0x0504->0x0aab ; "!.??'c(Switch)"
082a 0510 | | .STRTAB 0x0510->0x0ab2 ; " raised while Preserving Machine State"
082b 0534 | 4 | .STRTAB 0x0534->0x0ac5 ; "Preservation of Machine State has failed"
082c 055a | Z | .STRTAB 0x055a->0x0ad9 ; "Updating the Segments in the Elaborator Database"
082d 0588 | | .STRTAB 0x0588->0x0af1 ; "Loading New Code Segments"
082e 059f | | .STRTAB 0x059f->0x0afd ; ":No_Mail"
082f 05a5 | | .STRTAB 0x05a5->0x0b01 ; ":Ae"
0830 05a6 | | .STRTAB 0x05a6->0x0b03 ; "MAIL"
0831 05a8 | | .STRTAB 0x05a8->0x0b05 ; "Updating the Mail Subsystem"
0832 05c1 | | .STRTAB 0x05c1->0x0b12 ; "Checking the Configuration in the Elaborator Database"
0833 05f4 | | .STRTAB 0x05f4->0x0b2d ; "<RELEASE>"
0834 05fb | | .STRTAB 0x05fb->0x0b31 ; " raised while Updating Elaborator Database"
0835 0623 | # | .STRTAB 0x0623->0x0b46 ; "Updating Elaborator Database has failed"
0836 0648 | H | .STRTAB 0x0648->0x0b5a ; "Updating the Universe Specs"
0837 0661 | a | .STRTAB 0x0661->0x0b67 ; "Frozen_Worlds_Of_The_Universe"
0838 067c | | | .STRTAB 0x067c->0x0b76 ; "<QUIET>"
0839 0681 | | .STRTAB 0x0681->0x0b79 ; "[_"
083a 0681 | | .STRTAB 0x0681->0x0b7a ; "]'if(FROZEN)"
083b 068b | | .STRTAB 0x068b->0x0b80 ; "$$.Lists.Frozen_Worlds_Of_The_Universe"
083c 06af | | .STRTAB 0x06af->0x0b93 ; "<DIRECTORIES>"
083d 06ba | | .STRTAB 0x06ba->0x0b9a ; "Unfreezing Frozen Worlds"
083e 06d0 | | .STRTAB 0x06d0->0x0ba6 ; "Demoting Keymap/Abbreviations Bodies for Universe Upgrade"
083f 0707 | | .STRTAB 0x0707->0x0bc2 ; "<WORLDS>"
0840 070d | | .STRTAB 0x070d->0x0bc6 ; "Restoring New Universe Items"
0841 0727 | ' | .STRTAB 0x0727->0x0bd4 ; "New_Units"
0842 072e | . | .STRTAB 0x072e->0x0bd9 ; "Universe"
0843 0734 | 4 | .STRTAB 0x0734->0x0bdd ; "!"
0844 0733 | 3 | .STRTAB 0x0733->0x0bdd ; "Restoring a Prototype Universe (takes about an hour)"
0845 0765 | e | .STRTAB 0x0765->0x0bf7 ; "R1000, New, Goal => Source"
0846 077d | } | .STRTAB 0x077d->0x0c04 ; "*"
0847 077c | | | .STRTAB 0x077c->0x0c05 ; "?"
0848 077b | { | .STRTAB 0x077b->0x0c05 ; "Inserting New Declarations Incrementally"
0849 07a1 | | .STRTAB 0x07a1->0x0c19 ; "Changing Default Values of Selected Command Parameters"
084a 07d5 | | .STRTAB 0x07d5->0x0c34 ; "Scanning for Changes in the Universe Specs"
084b 07fd | | .STRTAB 0x07fd->0x0c49 ; "![_[]"
084c 0800 | | .STRTAB 0x0800->0x0c4c ; "]'BODY"
084d 0804 | | .STRTAB 0x0804->0x0c4f ; "Creating Text Backup of Existing Bodies to be Modified"
084e 0838 | 8 | .STRTAB 0x0838->0x0c6a ; "Restoring New Internal Universe Items"
084f 085b | [ | .STRTAB 0x085b->0x0c7c ; "Restoring a Prototype Internal Universe"
0850 0880 | | .STRTAB 0x0880->0x0c90 ; "Scanning for Changes in Internal Universe Specs"
0851 08ad | | .STRTAB 0x08ad->0x0ca7 ; ".Lrm.System"
0852 08b6 | | .STRTAB 0x08b6->0x0cad ; "Installing Changed Universe Units"
0853 08d5 | | .STRTAB 0x08d5->0x0cbd ; "Installing Changed Internal Universe Units"
0854 08fd | | .STRTAB 0x08fd->0x0cd2 ; "Re-Installing Keymap/Initialize/Abbreviations Bodies."
0855 0930 | 0 | .STRTAB 0x0930->0x0ced ; "<ALL_WORLDS>"
0856 093a | : | .STRTAB 0x093a->0x0cf3 ; " raised while Updating Environment Specs"
0857 0960 | ` | .STRTAB 0x0960->0x0d07 ; "Updating Environment Specs has failed"
0858 0983 | | .STRTAB 0x0983->0x0d19 ; "Updating Miscellaneous Universe Items"
0859 09a6 | | .STRTAB 0x09a6->0x0d2c ; "Restoring Miscellaneous System Components"
085a 09cd | | .STRTAB 0x09cd->0x0d40 ; "!Copyright_Rational"
085b 09de | | .STRTAB 0x09de->0x0d4a ; "$$.Lists.Copyright_Notice"
085c 09f5 | | .STRTAB 0x09f5->0x0d56 ; "Miscellany"
085d 09fd | | .STRTAB 0x09fd->0x0d5b ; "R1000, Changed, Replace, Remake"
085e 0a1a | | .STRTAB 0x0a1a->0x0d6b ; "R1000, New, Replace, Remake"
085f 0a33 | 3 | .STRTAB 0x0a33->0x0d78 ; "Authorizing Lrm_Interface"
0860 0a4a | J | .STRTAB 0x0a4a->0x0d85 ; "Lrm_Interface"
0861 0a55 | U | .STRTAB 0x0a55->0x0d8b ; "Authorizing X Interface"
0862 0a6a | j | .STRTAB 0x0a6a->0x0d97 ; "X Interface"
0863 0a73 | s | .STRTAB 0x0a73->0x0d9c ; "Enabling \x22Install_Subsystems\x22 to run on next reboot."
0864 0aa5 | | .STRTAB 0x0aa5->0x0db6 ; "!Machine"
0865 0aab | | .STRTAB 0x0aab->0x0dba ; "Install_Subsystems"
0866 0abb | | .STRTAB 0x0abb->0x0dc3 ; "!Machine`Install_Subsystems"
0867 0ad4 | | .STRTAB 0x0ad4->0x0dd1 ; "#"
0868 0ad3 | | .STRTAB 0x0ad3->0x0dd1 ; "$$`Install_Subsystems"
0869 0ae6 | | .STRTAB 0x0ae6->0x0ddc ; "Refreezing Worlds of the Universe"
086a 0b05 | | .STRTAB 0x0b05->0x0dec ; "_$$.Lists.Frozen_Worlds_Of_The_Universe"
086b 0b2a | * | .STRTAB 0x0b2a->0x0e00 ; "Running Snapshot Daemon"
086c 0b3f | ? | .STRTAB 0x0b3f->0x0e0b ; "snap"
086d 0b41 | A | .STRTAB 0x0b41->0x0e0d ; " raised while Updating Miscellaneous Items"
086e 0b69 | i | .STRTAB 0x0b69->0x0e22 ; "Updating Miscellaneous Items has failed"
086f 0b8e | | .STRTAB 0x0b8e->0x0e36 ; "Creating text backup of "
0870 0ba4 | | .STRTAB 0x0ba4->0x0e42 ; "Can't create text backup for "
0871 0bbf | | .STRTAB 0x0bbf->0x0e50 ; " (attempt raises "
0872 0bce | | .STRTAB 0x0bce->0x0e59 ; ")"
0873 0bcd | | .STRTAB 0x0bcd->0x0e59 ; "$$.Lists.Mail_Xfer"
0874 0bdd | | .STRTAB 0x0bdd->0x0e62 ; ":Mail.Mload"
0875 0be6 | | .STRTAB 0x0be6->0x0e68 ; "Installing Changed Universe Units has failed"
0876 0c10 | | .STRTAB 0x0c10->0x0e7e ; "Installing Changed Internal Universe Units has failed"
0877 0c43 | C | .STREND 0x0c43->0x0e98
0878 4e49 4c45 |NILE| .STRTAB_STRINGS
0e99 0000 0000 | | .BLANK 0000[0x7]
0ea0 ; --------------------------------------------------------------------------------------
0ea0 ; Debug Table
0ea0 ; --------------------------------------------------------------------------------------
0ea0 0004 0001 | | .DEBUG4 0x0004,0x0001,0x37bf,0x0000,0x0001,0x0000
0ea6 0000 0000 | | .BLANK 0000[0x15a]