|
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 - metrics - download
Length: 4096 (0x1000)
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 07e0 | | .CONST 0x07e0 ; 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 8004 | | .CONST 0x8004 ; 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 For_Outer_Call,Visible,Unelaborated,INIT_0018
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 0063 | c | .CONST 0x0063 ; Address of begin
0019 0174 | t | .CONST 0x0174 ; Address of exception handler
001a 0016 | | .CONST 0x0016 ; Number of locals
001b INIT_0018:
001b 0092 03a7 | | Action Push_String_Extended,0x3a7 ; "$$.Internal."
001d 0092 03a8 | | Action Push_String_Extended,0x3a8 ; "$$.Logs."
001f 0092 03a9 | | Action Push_String_Extended,0x3a9 ; "$$.Lists."
0021 0092 03aa | | Action Push_String_Extended,0x3aa ; "$$.Archives."
0023 0092 03ab | | Action Push_String_Extended,0x3ab ; "$$.Lists.Combined_Mload"
0025 0092 03ac | | Action Push_String_Extended,0x3ac ; "$$.Activity_File"
0027 e001 | | Load 0x0,0x1
0028 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0029 e002 | | Load 0x0,0x2
002a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002b 02c7 | | Declare_Variable Any
002c e002 | | Load 0x0,0x2
002d 180e | | Execute Package,Field_Execute,Field_Number 0xe
002e a409 | | Store_Unchecked 0x2,0x9
002f e002 | | Load 0x0,0x2
0030 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0031 02c7 | | Declare_Variable Any
0032 0092 03ad | | Action Push_String_Extended,0x3ad ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
0034 e002 | | Load 0x0,0x2
0035 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0036 a40a | | Store_Unchecked 0x2,0xa
0037 e003 | | Load 0x0,0x3
0038 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0039 0092 03ae | | Action Push_String_Extended,0x3ae ; "$$.Master_Log_File"
003b 485f |H_ | Short_Literal 0x5f
003c 4800 |H | Short_Literal 0x0
003d 4803 |H | Short_Literal 0x3
003e 4804 |H | Short_Literal 0x4
003f e004 | | Load 0x0,0x4
0040 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0041 e004 | | Load 0x0,0x4
0042 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0043 01ca | | Execute Vector,Prepend
0044 0007 | | Action Break_Optional
0045 0092 03af | | Action Push_String_Extended,0x3af ; "$$.Logs.Install_Subsystems"
0047 00d9 | | Load_Top At_Offset_1
0048 01cc | | Execute Vector,Catenate
0049 0007 | | Action Break_Optional
004a e005 | | Load 0x0,0x5
004b e006 | | Load 0x0,0x6
004c e40c | | Load 0x2,0xc
004d 00db | | Load_Top At_Offset_3
004e e007 | | Load 0x0,0x7
004f 0387 | | Declare_Variable Package
0050 00d8 | | Load_Top At_Offset_0
0051 020f | | Execute Module,Activate
0052 0092 03b0 | | Action Push_String_Extended,0x3b0 ; "$$.Logs.Current_Subsystem_Step"
0054 e008 | | Load 0x0,0x8
0055 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0056 02c7 | | Declare_Variable Any
0057 00d8 | | Load_Top At_Offset_0
0058 1c00 | | Execute_Immediate Run_Utility,0x0
0059 00e1 | | Load_Encached Boolean_Cache
005a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
005b 029f 01bb | | Declare_Subprogram For_Call,INIT_01b8
005d 029f 01d3 | | Declare_Subprogram For_Call,INIT_01d0
005f 029f 0223 | #| Declare_Subprogram For_Call,INIT_0220
0061 029f 0233 | 3| Declare_Subprogram For_Call,INIT_0230
0063 BODY_0018:
0063 e002 | | Load 0x0,0x2
0064 180e | | Execute Package,Field_Execute,Field_Number 0xe
0065 4800 |H | Short_Literal 0x0
0066 0092 03b1 | | Action Push_String_Extended,0x3b1 ; "[Install_Subsystems (Check_Configuration => "
0068 e5ff | | Load 0x2,-0x1
0069 00e1 | | Load_Encached Boolean_Cache
006a 011c | | Execute Any,Convert_Unchecked
006b 1c01 | | Execute_Immediate Run_Utility,0x1
006c 01cc | | Execute Vector,Catenate
006d 0092 03b2 | | Action Push_String_Extended,0x3b2 ; ");]"
006f 01cc | | Execute Vector,Catenate
0070 e009 | | Load 0x0,0x9
0071 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0072 4801 |H | Short_Literal 0x1
0073 e003 | | Load 0x0,0x3
0074 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0075 0092 03b3 | | Action Push_String_Extended,0x3b3 ; "!Machine"
0077 4802 |H | Short_Literal 0x2
0078 0092 03b4 | | Action Push_String_Extended,0x3b4 ; "?"
007a 0092 03b5 | | Action Push_String_Extended,0x3b5 ; "Install_Subsystems"
007c e00a | | Load 0x0,0xa
007d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
007e 6807 |h | Jump_Zero 0x86
007f 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
0081 0092 03b7 | | Action Push_String_Extended,0x3b7 ; "!Machine`Install_Subsystems$$[D_@]"
0083 e00b | | Load 0x0,0xb
0084 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0085 7806 |x | Jump 0x8c
0086 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
0088 0092 03b8 | | Action Push_String_Extended,0x3b8 ; "$$[D_@]"
008a e00b | | Load 0x0,0xb
008b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
008c e003 | | Load 0x0,0x3
008d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
008e 7008 |p | Jump_Nonzero 0x97
008f e002 | | Load 0x0,0x2
0090 180e | | Execute Package,Field_Execute,Field_Number 0xe
0091 4805 |H | Short_Literal 0x5
0092 0092 03b9 | | Action Push_String_Extended,0x3b9 ; "Aborting subsystems installation: could not set PRIVILEGED MODE"
0094 e009 | | Load 0x0,0x9
0095 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0096 78cf |x | Jump 0x166
0097 e406 | | Load 0x2,0x6
0098 800c | | Call 0x0,0xc
0099 7008 |p | Jump_Nonzero 0xa2
009a e002 | | Load 0x0,0x2
009b 180e | | Execute Package,Field_Execute,Field_Number 0xe
009c 4805 |H | Short_Literal 0x5
009d 0092 03ba | | Action Push_String_Extended,0x3ba ; "Aborting subsystems installation: Current context is not a release world."
009f e009 | | Load 0x0,0x9
00a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00a1 78c4 |x | Jump 0x166
00a2 e5ff | | Load 0x2,-0x1
00a3 6812 |h | Jump_Zero 0xb6
00a4 e408 | | Load 0x2,0x8
00a5 8413 | | Call 0x2,0x13
00a6 8414 | | Call 0x2,0x14
00a7 8415 | | Call 0x2,0x15
00a8 700d |p | Jump_Nonzero 0xb6
00a9 e002 | | Load 0x0,0x2
00aa 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ab 4805 |H | Short_Literal 0x5
00ac 0092 03bb | | Action Push_String_Extended,0x3bb ; "Aborting subsystems installation: "
00ae 8413 | | Call 0x2,0x13
00af 01cc | | Execute Vector,Catenate
00b0 0092 03bc | | Action Push_String_Extended,0x3bc ; " is not the currently running EEDB configuration."
00b2 01cc | | Execute Vector,Catenate
00b3 e009 | | Load 0x0,0x9
00b4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b5 78b0 |x | Jump 0x166
00b6 e403 | | Load 0x2,0x3
00b7 800c | | Call 0x0,0xc
00b8 700b |p | Jump_Nonzero 0xc4
00b9 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
00bb 00ea | | Load_Encached Null_String_Cache
00bc 4800 |H | Short_Literal 0x0
00bd 4801 |H | Short_Literal 0x1
00be 4801 |H | Short_Literal 0x1
00bf 4807 |H | Short_Literal 0x7
00c0 e403 | | Load 0x2,0x3
00c1 01cf | | Execute Vector,Slice_Read
00c2 e00b | | Load 0x0,0xb
00c3 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00c4 e40a | | Load 0x2,0xa
00c5 e002 | | Load 0x0,0x2
00c6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00c7 0092 03bd | | Action Push_String_Extended,0x3bd ; "Installing Subsystems for Release "
00c9 8413 | | Call 0x2,0x13
00ca 01cc | | Execute Vector,Catenate
00cb e40f | | Load 0x2,0xf
00cc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00cd 4801 |H | Short_Literal 0x1
00ce a412 | | Store_Unchecked 0x2,0x12
00cf 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
00d1 0092 03b3 | | Action Push_String_Extended,0x3b3 ; "!Machine"
00d3 4802 |H | Short_Literal 0x2
00d4 0092 03b4 | | Action Push_String_Extended,0x3b4 ; "?"
00d6 0092 03b5 | | Action Push_String_Extended,0x3b5 ; "Install_Subsystems"
00d8 e00d | | Load 0x0,0xd
00d9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00da e001 | | Load 0x0,0x1
00db 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00dc e001 | | Load 0x0,0x1
00dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00de 00d9 | | Load_Top At_Offset_1
00df 00d0 | | Action Swap_Control
00e0 0260 | ` | Execute Discrete,In_Type
00e1 7001 |p | Jump_Nonzero 0xe3
00e2 0801 | | Execute_Immediate Raise,0x1
00e3 60d0 |` | Indirect_Literal Discrete,0x1b4,{0x00000000, 0x00003e80}
00e4 e001 | | Load 0x0,0x1
00e5 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
00e6 8416 | | Call 0x2,0x16
00e7 0092 03be | | Action Push_String_Extended,0x3be ; "Updating Miscellaneous Universe Items"
00e9 e40f | | Load 0x2,0xf
00ea 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00eb 0092 03bf | | Action Push_String_Extended,0x3bf ; "$$.Lists.Init_Procs_To_Delete"
00ed 800c | | Call 0x0,0xc
00ee 682e |h. | Jump_Zero 0x11d
00ef 0092 03bf | | Action Push_String_Extended,0x3bf ; "$$.Lists.Init_Procs_To_Delete"
00f1 800e | | Call 0x0,0xe
00f2 702a |p* | Jump_Nonzero 0x11d
00f3 e411 | | Load 0x2,0x11
00f4 0120 | | Execute Any,Is_Value
00f5 6803 |h | Jump_Zero 0xf9
00f6 e008 | | Load 0x0,0x8
00f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f8 7801 |x | Jump 0xfa
00f9 e411 | | Load 0x2,0x11
00fa e410 | | Load 0x2,0x10
00fb 0092 03c0 | | Action Push_String_Extended,0x3c0 ; "Running COMP.DESTROY on Initialize Delete file"
00fd e40f | | Load 0x2,0xf
00fe 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00ff c411 | | Store 0x2,0x11
0100 0092 03c1 | | Action Push_String_Extended,0x3c1 ; "<ERRORS>"
0102 4801 |H | Short_Literal 0x1
0103 0092 03c2 | | Action Push_String_Extended,0x3c2 ; "_$$.Lists.Init_Procs_To_Delete"
0105 e00b | | Load 0x0,0xb
0106 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0107 0092 03c1 | | Action Push_String_Extended,0x3c1 ; "<ERRORS>"
0109 0092 03c3 | | Action Push_String_Extended,0x3c3 ; "<WORLDS>"
010b 4802 |H | Short_Literal 0x2
010c 0092 03c2 | | Action Push_String_Extended,0x3c2 ; "_$$.Lists.Init_Procs_To_Delete"
010e e00f | | Load 0x0,0xf
010f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0110 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
0112 0092 03c4 | | Action Push_String_Extended,0x3c4 ; "$$.Lists.Init_Procs_Deleted"
0114 0092 03bf | | Action Push_String_Extended,0x3bf ; "$$.Lists.Init_Procs_To_Delete"
0116 e00b | | Load 0x0,0xb
0117 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0118 e411 | | Load 0x2,0x11
0119 e410 | | Load 0x2,0x10
011a e40f | | Load 0x2,0xf
011b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
011c c411 | | Store 0x2,0x11
011d 0092 03c5 | | Action Push_String_Extended,0x3c5 ; "$$.Lists.Init_Procs_To_Change"
011f 800c | | Call 0x0,0xc
0120 6827 |h' | Jump_Zero 0x148
0121 0092 03c5 | | Action Push_String_Extended,0x3c5 ; "$$.Lists.Init_Procs_To_Change"
0123 800e | | Call 0x0,0xe
0124 7023 |p# | Jump_Nonzero 0x148
0125 e411 | | Load 0x2,0x11
0126 0120 | | Execute Any,Is_Value
0127 6803 |h | Jump_Zero 0x12b
0128 e008 | | Load 0x0,0x8
0129 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012a 7801 |x | Jump 0x12c
012b e411 | | Load 0x2,0x11
012c e410 | | Load 0x2,0x10
012d 0092 03c6 | | Action Push_String_Extended,0x3c6 ; "Demoting Changed Initialize Procedures"
012f e40f | | Load 0x2,0xf
0130 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0131 c411 | | Store 0x2,0x11
0132 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
0134 4801 |H | Short_Literal 0x1
0135 0092 03c7 | | Action Push_String_Extended,0x3c7 ; "_$$.Lists.Init_Procs_To_Change"
0137 e00b | | Load 0x0,0xb
0138 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0139 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
013b 4800 |H | Short_Literal 0x0
013c 0092 03c3 | | Action Push_String_Extended,0x3c3 ; "<WORLDS>"
013e 4800 |H | Short_Literal 0x0
013f 0092 03c7 | | Action Push_String_Extended,0x3c7 ; "_$$.Lists.Init_Procs_To_Change"
0141 e00f | | Load 0x0,0xf
0142 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0143 e411 | | Load 0x2,0x11
0144 e410 | | Load 0x2,0x10
0145 e40f | | Load 0x2,0xf
0146 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0147 c411 | | Store 0x2,0x11
0148 e411 | | Load 0x2,0x11
0149 0120 | | Execute Any,Is_Value
014a 6803 |h | Jump_Zero 0x14e
014b e008 | | Load 0x0,0x8
014c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014d 7801 |x | Jump 0x14f
014e e411 | | Load 0x2,0x11
014f e410 | | Load 0x2,0x10
0150 0092 03c8 | | Action Push_String_Extended,0x3c8 ; "Running Snapshot Daemon"
0152 e40f | | Load 0x2,0xf
0153 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0154 c411 | | Store 0x2,0x11
0155 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
0157 0092 03c9 | | Action Push_String_Extended,0x3c9 ; "snap"
0159 e010 | | Load 0x0,0x10
015a 180e | | Execute Package,Field_Execute,Field_Number 0xe
015b e411 | | Load 0x2,0x11
015c e410 | | Load 0x2,0x10
015d e40f | | Load 0x2,0xf
015e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
015f c411 | | Store 0x2,0x11
0160 0092 03ca | | Action Push_String_Extended,0x3ca ; "Install_Subsystems has completed"
0162 e40f | | Load 0x2,0xf
0163 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0164 4800 |H | Short_Literal 0x0
0165 a412 | | Store_Unchecked 0x2,0x12
0166 e409 | | Load 0x2,0x9
0167 e002 | | Load 0x0,0x2
0168 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0169 e40b | | Load 0x2,0xb
016a e003 | | Load 0x0,0x3
016b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
016c e002 | | Load 0x0,0x2
016d 180e | | Execute Package,Field_Execute,Field_Number 0xe
016e 4800 |H | Short_Literal 0x0
016f 0092 03cb | | Action Push_String_Extended,0x3cb ; "[Install_Subsystems has completed]"
0171 e009 | | Load 0x0,0x9
0172 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0173 4502 |E | Exit_Subprogram 0x2
0174 TRAP_0018:
0174 0007 | | Action Break_Optional
0175 e002 | | Load 0x0,0x2
0176 180e | | Execute Package,Field_Execute,Field_Number 0xe
0177 4808 |H | Short_Literal 0x8
0178 4801 |H | Short_Literal 0x1
0179 4801 |H | Short_Literal 0x1
017a e011 | | Load 0x0,0x11
017b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
017c 0092 03cc | | Action Push_String_Extended,0x3cc ; " raised installing release"
017e 01cc | | Execute Vector,Catenate
017f e009 | | Load 0x0,0x9
0180 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0181 e008 | | Load 0x0,0x8
0182 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0183 e411 | | Load 0x2,0x11
0184 012f | / | Execute Any,Equal
0185 680c |h | Jump_Zero 0x192
0186 e002 | | Load 0x0,0x2
0187 180e | | Execute Package,Field_Execute,Field_Number 0xe
0188 4805 |H | Short_Literal 0x5
0189 0092 03cd | | Action Push_String_Extended,0x3cd ; "Step has Failed"
018b e009 | | Load 0x0,0x9
018c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
018d e411 | | Load 0x2,0x11
018e e410 | | Load 0x2,0x10
018f e40f | | Load 0x2,0xf
0190 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0191 c411 | | Store 0x2,0x11
0192 e412 | | Load 0x2,0x12
0193 6804 |h | Jump_Zero 0x198
0194 0092 03ce | | Action Push_String_Extended,0x3ce ; "Install_Universe has failed"
0196 e40f | | Load 0x2,0xf
0197 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0198 4801 |H | Short_Literal 0x1
0199 4801 |H | Short_Literal 0x1
019a e011 | | Load 0x0,0x11
019b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
019c 0092 03cf | | Action Push_String_Extended,0x3cf ; " installing "
019e 01cc | | Execute Vector,Catenate
019f 8413 | | Call 0x2,0x13
01a0 01cc | | Execute Vector,Catenate
01a1 4802 |H | Short_Literal 0x2
01a2 0092 03d0 | | Action Push_String_Extended,0x3d0 ; "Unhandled_Exception"
01a4 e012 | | Load 0x0,0x12
01a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a6 0092 03b5 | | Action Push_String_Extended,0x3b5 ; "Install_Subsystems"
01a8 e012 | | Load 0x0,0x12
01a9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01aa e409 | | Load 0x2,0x9
01ab e002 | | Load 0x0,0x2
01ac 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ad 0092 03d1 | | Action Push_String_Extended,0x3d1 ; "Install_Subsystems has failed"
01af e40f | | Load 0x2,0xf
01b0 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01b1 4502 |E | Exit_Subprogram 0x2
01b2 0000 0000 | | .XXX[0x2]
01b4 0000 0000 | | .LITERAL {0x00000000, 0x00003e80}
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 6010 |` | Indirect_Literal Discrete,0x1cc,{0x00000000, 0x00004000}
01bc e013 | | Load 0x0,0x13
01bd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01be e014 | | Load 0x0,0x14
01bf 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01c0 e015 | | Load 0x0,0x15
01c1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01c3 0092 03d2 | | Action Push_String_Extended,0x3d2 ; "$$"
01c5 e015 | | Load 0x0,0x15
01c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c7 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
01c8 e015 | | Load 0x0,0x15
01c9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01ca 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
01cb 00ca | | Action Exit_Nullary_Function
01cc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01db | | .CONST 0x01db ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0003 | | .CONST 0x0003 ; Number of locals
01d3 INIT_01d0:
01d3 00da | | Load_Top At_Offset_2
01d4 01dd | | Execute Vector,First
01d5 00e2 | | Load_Encached Integer_Cache
01d6 03f1 | | Declare_Variable Discrete,With_Value
01d7 00db | | Load_Top At_Offset_3
01d8 01dc | | Execute Vector,Last
01d9 00e2 | | Load_Encached Integer_Cache
01da 03f1 | | Declare_Variable Discrete,With_Value
01db BODY_01d0:
01db 4800 |H | Short_Literal 0x0
01dc 00da | | Load_Top At_Offset_2
01dd e7ff | | Load 0x3,-0x1
01de 01dc | | Execute Vector,Last
01df e7ff | | Load 0x3,-0x1
01e0 01cf | | Execute Vector,Slice_Read
01e1 0092 03d3 | | Action Push_String_Extended,0x3d3 ; "_"
01e3 e016 | | Load 0x0,0x16
01e4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01e5 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
01e6 4800 |H | Short_Literal 0x0
01e7 00d9 | | Load_Top At_Offset_1
01e8 0a01 | | Execute_Immediate Plus,0x1
01e9 00d8 | | Load_Top At_Offset_0
01ea 00e2 | | Load_Encached Integer_Cache
01eb 0260 | ` | Execute Discrete,In_Type
01ec 7001 |p | Jump_Nonzero 0x1ee
01ed 0801 | | Execute_Immediate Raise,0x1
01ee e7ff | | Load 0x3,-0x1
01ef 01dc | | Execute Vector,Last
01f0 e7ff | | Load 0x3,-0x1
01f1 01cf | | Execute Vector,Slice_Read
01f2 0092 03d3 | | Action Push_String_Extended,0x3d3 ; "_"
01f4 e016 | | Load 0x0,0x16
01f5 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01f6 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
01f7 4800 |H | Short_Literal 0x0
01f8 00d9 | | Load_Top At_Offset_1
01f9 0a01 | | Execute_Immediate Plus,0x1
01fa 00d8 | | Load_Top At_Offset_0
01fb 00e2 | | Load_Encached Integer_Cache
01fc 0260 | ` | Execute Discrete,In_Type
01fd 7001 |p | Jump_Nonzero 0x1ff
01fe 0801 | | Execute_Immediate Raise,0x1
01ff e7ff | | Load 0x3,-0x1
0200 01dc | | Execute Vector,Last
0201 e7ff | | Load 0x3,-0x1
0202 01cf | | Execute Vector,Slice_Read
0203 0092 03d3 | | Action Push_String_Extended,0x3d3 ; "_"
0205 e016 | | Load 0x0,0x16
0206 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0207 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0208 00d8 | | Load_Top At_Offset_0
0209 e7ff | | Load 0x3,-0x1
020a 01da | | Execute Vector,Bounds
020b 0261 | a | Execute Discrete,Not_In_Range
020c 6802 |h | Jump_Zero 0x20f
020d e7ff | | Load 0x3,-0x1
020e 4401 |D | Exit_Subprogram With_Result,0x1
020f 00d9 | | Load_Top At_Offset_1
0210 00d9 | | Load_Top At_Offset_1
0211 0aff | | Execute_Immediate Plus,-0x1
0212 00d8 | | Load_Top At_Offset_0
0213 00e2 | | Load_Encached Integer_Cache
0214 0260 | ` | Execute Discrete,In_Type
0215 7001 |p | Jump_Nonzero 0x217
0216 0801 | | Execute_Immediate Raise,0x1
0217 e7ff | | Load 0x3,-0x1
0218 01cf | | Execute Vector,Slice_Read
0219 4401 |D | Exit_Subprogram With_Result,0x1
021a 0000 0000 | | .BLANK 0000[0x6]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022a | * | .CONST 0x022a ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0002 | | .CONST 0x0002 ; Number of locals
0223 INIT_0220:
0223 4801 |H | Short_Literal 0x1
0224 e7fe | | Load 0x3,-0x2
0225 e7ff | | Load 0x3,-0x1
0226 e016 | | Load 0x0,0x16
0227 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0228 00e2 | | Load_Encached Integer_Cache
0229 03f1 | | Declare_Variable Discrete,With_Value
022a BODY_0220:
022a 00d8 | | Load_Top At_Offset_0
022b e7fe | | Load 0x3,-0x2
022c 01dd | | Execute Vector,First
022d 027f | | Execute Discrete,Equal
022e 4402 |D | Exit_Subprogram With_Result,0x2
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0365 | e | .CONST 0x0365 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 0092 03d4 | | Action Push_String_Extended,0x3d4 ; "Updating the Subsystems"
0235 e40f | | Load 0x2,0xf
0236 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0237 8413 | | Call 0x2,0x13
0238 0092 03d5 | | Action Push_String_Extended,0x3d5 ; " subsystems"
023a 01cc | | Execute Vector,Catenate
023b 4800 |H | Short_Literal 0x0
023c 0092 03d6 | | Action Push_String_Extended,0x3d6 ; "Beginning_Upgrade"
023e e012 | | Load 0x0,0x12
023f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0240 0092 03b5 | | Action Push_String_Extended,0x3b5 ; "Install_Subsystems"
0242 e012 | | Load 0x0,0x12
0243 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0244 e411 | | Load 0x2,0x11
0245 0120 | | Execute Any,Is_Value
0246 6803 |h | Jump_Zero 0x24a
0247 e008 | | Load 0x0,0x8
0248 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0249 7801 |x | Jump 0x24b
024a e411 | | Load 0x2,0x11
024b e410 | | Load 0x2,0x10
024c 0092 03d7 | | Action Push_String_Extended,0x3d7 ; "Fixing Standard Models"
024e e40f | | Load 0x2,0xf
024f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0250 c411 | | Store 0x2,0x11
0251 0092 03d8 | | Action Push_String_Extended,0x3d8 ; "!"
0253 8017 | | Call 0x0,0x17
0254 e411 | | Load 0x2,0x11
0255 e410 | | Load 0x2,0x10
0256 e40f | | Load 0x2,0xf
0257 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0258 c411 | | Store 0x2,0x11
0259 e411 | | Load 0x2,0x11
025a 0120 | | Execute Any,Is_Value
025b 6803 |h | Jump_Zero 0x25f
025c e008 | | Load 0x0,0x8
025d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
025e 7801 |x | Jump 0x260
025f e411 | | Load 0x2,0x11
0260 e410 | | Load 0x2,0x10
0261 0092 03d9 | | Action Push_String_Extended,0x3d9 ; "Checking Subsystem Target Keys"
0263 e40f | | Load 0x2,0xf
0264 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0265 c411 | | Store 0x2,0x11
0266 4800 |H | Short_Literal 0x0
0267 4800 |H | Short_Literal 0x0
0268 4801 |H | Short_Literal 0x1
0269 0092 03da | | Action Push_String_Extended,0x3da ; "$$.Lists..Subsystem_List"
026b 8018 | | Call 0x0,0x18
026c 8019 | | Call 0x0,0x19
026d 0092 03db | | Action Push_String_Extended,0x3db ; "$$.Internal.$$.Archives.Subsystems"
026f 800c | | Call 0x0,0xc
0270 6805 |h | Jump_Zero 0x276
0271 4800 |H | Short_Literal 0x0
0272 4800 |H | Short_Literal 0x0
0273 0092 03dc | | Action Push_String_Extended,0x3dc ; "$$.Internal.$$.Lists..Subsystem_List"
0275 8019 | | Call 0x0,0x19
0276 e411 | | Load 0x2,0x11
0277 e410 | | Load 0x2,0x10
0278 e40f | | Load 0x2,0xf
0279 181a | | Execute Package,Field_Execute,Field_Number 0x1a
027a c411 | | Store 0x2,0x11
027b 4801 |H | Short_Literal 0x1
027c e003 | | Load 0x0,0x3
027d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
027e e411 | | Load 0x2,0x11
027f 0120 | | Execute Any,Is_Value
0280 6803 |h | Jump_Zero 0x284
0281 e008 | | Load 0x0,0x8
0282 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0283 7801 |x | Jump 0x285
0284 e411 | | Load 0x2,0x11
0285 e410 | | Load 0x2,0x10
0286 0092 03dd | | Action Push_String_Extended,0x3dd ; "Restoring New Subsystems"
0288 e40f | | Load 0x2,0xf
0289 1819 | | Execute Package,Field_Execute,Field_Number 0x19
028a c411 | | Store 0x2,0x11
028b 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
028d 0092 03de | | Action Push_String_Extended,0x3de ; "$$.Archives.Subsystems"
028f 0092 03df | | Action Push_String_Extended,0x3df ; "new, replace, remake, coded"
0291 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "*"
0293 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "*"
0295 0092 03b4 | | Action Push_String_Extended,0x3b4 ; "?"
0297 e01a | | Load 0x0,0x1a
0298 180e | | Execute Package,Field_Execute,Field_Number 0xe
0299 e411 | | Load 0x2,0x11
029a e410 | | Load 0x2,0x10
029b e40f | | Load 0x2,0xf
029c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
029d c411 | | Store 0x2,0x11
029e 0092 03db | | Action Push_String_Extended,0x3db ; "$$.Internal.$$.Archives.Subsystems"
02a0 800c | | Call 0x0,0xc
02a1 6831 |h1 | Jump_Zero 0x2d3
02a2 e411 | | Load 0x2,0x11
02a3 0120 | | Execute Any,Is_Value
02a4 6803 |h | Jump_Zero 0x2a8
02a5 e008 | | Load 0x0,0x8
02a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a7 7801 |x | Jump 0x2a9
02a8 e411 | | Load 0x2,0x11
02a9 e410 | | Load 0x2,0x10
02aa 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "Restoring Internal Tools"
02ac e40f | | Load 0x2,0xf
02ad 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02ae c411 | | Store 0x2,0x11
02af 4801 |H | Short_Literal 0x1
02b0 e003 | | Load 0x0,0x3
02b1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02b2 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
02b4 0092 03db | | Action Push_String_Extended,0x3db ; "$$.Internal.$$.Archives.Subsystems"
02b6 0092 03df | | Action Push_String_Extended,0x3df ; "new, replace, remake, coded"
02b8 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "*"
02ba 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "*"
02bc 0092 03b4 | | Action Push_String_Extended,0x3b4 ; "?"
02be e01a | | Load 0x0,0x1a
02bf 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c0 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
02c2 e407 | | Load 0x2,0x7
02c3 4801 |H | Short_Literal 0x1
02c4 0092 03b4 | | Action Push_String_Extended,0x3b4 ; "?"
02c6 0092 03b4 | | Action Push_String_Extended,0x3b4 ; "?"
02c8 0092 03b4 | | Action Push_String_Extended,0x3b4 ; "?"
02ca 0092 03e2 | | Action Push_String_Extended,0x3e2 ; "$$.Internal.$$.Activity_File"
02cc e01b | | Load 0x0,0x1b
02cd 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
02ce e411 | | Load 0x2,0x11
02cf e410 | | Load 0x2,0x10
02d0 e40f | | Load 0x2,0xf
02d1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02d2 c411 | | Store 0x2,0x11
02d3 e411 | | Load 0x2,0x11
02d4 0120 | | Execute Any,Is_Value
02d5 6803 |h | Jump_Zero 0x2d9
02d6 e008 | | Load 0x0,0x8
02d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d8 7801 |x | Jump 0x2da
02d9 e411 | | Load 0x2,0x11
02da e410 | | Load 0x2,0x10
02db 0092 03e3 | | Action Push_String_Extended,0x3e3 ; "Installing New Subsystems and Recoding Main Procedures"
02dd e40f | | Load 0x2,0xf
02de 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02df c411 | | Store 0x2,0x11
02e0 4801 |H | Short_Literal 0x1
02e1 e003 | | Load 0x0,0x3
02e2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02e3 0092 03e4 | | Action Push_String_Extended,0x3e4 ; "!Machine.Release.Current.Commands"
02e5 0092 03e5 | | Action Push_String_Extended,0x3e5 ; "!Machine.Release.Current.Activity"
02e7 e407 | | Load 0x2,0x7
02e8 801c | | Call 0x0,0x1c
02e9 e411 | | Load 0x2,0x11
02ea e410 | | Load 0x2,0x10
02eb e40f | | Load 0x2,0xf
02ec 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02ed c411 | | Store 0x2,0x11
02ee e411 | | Load 0x2,0x11
02ef 0120 | | Execute Any,Is_Value
02f0 6803 |h | Jump_Zero 0x2f4
02f1 e008 | | Load 0x0,0x8
02f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f3 7801 |x | Jump 0x2f5
02f4 e411 | | Load 0x2,0x11
02f5 e410 | | Load 0x2,0x10
02f6 0092 03e6 | | Action Push_String_Extended,0x3e6 ; "Installing System_Maintenance.Current_Combined_Mload"
02f8 e40f | | Load 0x2,0xf
02f9 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02fa c411 | | Store 0x2,0x11
02fb 4801 |H | Short_Literal 0x1
02fc e003 | | Load 0x0,0x3
02fd 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02fe 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
0300 4800 |H | Short_Literal 0x0
0301 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "!Commands.System_Maintenance.[, Current_Combined_Mload]"
0303 e00b | | Load 0x0,0xb
0304 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0305 00ea | | Load_Encached Null_String_Cache
0306 4801 |H | Short_Literal 0x1
0307 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
0309 4801 |H | Short_Literal 0x1
030a 0092 03e8 | | Action Push_String_Extended,0x3e8 ; "!Commands.System_Maintenance.Current_Combined_Mload"
030c e406 | | Load 0x2,0x6
030d e00b | | Load 0x0,0xb
030e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
030f 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
0311 4800 |H | Short_Literal 0x0
0312 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "!Commands.System_Maintenance.[, Current_Combined_Mload]"
0314 e00b | | Load 0x0,0xb
0315 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0316 e411 | | Load 0x2,0x11
0317 e410 | | Load 0x2,0x10
0318 e40f | | Load 0x2,0xf
0319 181a | | Execute Package,Field_Execute,Field_Number 0x1a
031a c411 | | Store 0x2,0x11
031b 0092 03e9 | | Action Push_String_Extended,0x3e9 ; "$$.Archives.Subsystem_Miscellany"
031d 800c | | Call 0x0,0xc
031e 6820 |h | Jump_Zero 0x33f
031f e411 | | Load 0x2,0x11
0320 0120 | | Execute Any,Is_Value
0321 6803 |h | Jump_Zero 0x325
0322 e008 | | Load 0x0,0x8
0323 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0324 7801 |x | Jump 0x326
0325 e411 | | Load 0x2,0x11
0326 e410 | | Load 0x2,0x10
0327 0092 03ea | | Action Push_String_Extended,0x3ea ; "Restoring Miscellaneous Subsystem Components"
0329 e40f | | Load 0x2,0xf
032a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
032b c411 | | Store 0x2,0x11
032c 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
032e 0092 03e9 | | Action Push_String_Extended,0x3e9 ; "$$.Archives.Subsystem_Miscellany"
0330 0092 03eb | | Action Push_String_Extended,0x3eb ; "R1000, Changed, Replace, Remake"
0332 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "*"
0334 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "*"
0336 0092 03b4 | | Action Push_String_Extended,0x3b4 ; "?"
0338 e01a | | Load 0x0,0x1a
0339 180e | | Execute Package,Field_Execute,Field_Number 0xe
033a e411 | | Load 0x2,0x11
033b e410 | | Load 0x2,0x10
033c e40f | | Load 0x2,0xf
033d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
033e c411 | | Store 0x2,0x11
033f e411 | | Load 0x2,0x11
0340 0120 | | Execute Any,Is_Value
0341 6803 |h | Jump_Zero 0x345
0342 e008 | | Load 0x0,0x8
0343 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0344 7801 |x | Jump 0x346
0345 e411 | | Load 0x2,0x11
0346 e410 | | Load 0x2,0x10
0347 0092 03c8 | | Action Push_String_Extended,0x3c8 ; "Running Snapshot Daemon"
0349 e40f | | Load 0x2,0xf
034a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
034b c411 | | Store 0x2,0x11
034c 0092 03b6 | | Action Push_String_Extended,0x3b6 ; "<PROFILE>"
034e 0092 03c9 | | Action Push_String_Extended,0x3c9 ; "snap"
0350 e010 | | Load 0x0,0x10
0351 180e | | Execute Package,Field_Execute,Field_Number 0xe
0352 e411 | | Load 0x2,0x11
0353 e410 | | Load 0x2,0x10
0354 e40f | | Load 0x2,0xf
0355 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0356 c411 | | Store 0x2,0x11
0357 8413 | | Call 0x2,0x13
0358 0092 03ec | | Action Push_String_Extended,0x3ec ; " subsystem upgrade is completed."
035a 01cc | | Execute Vector,Catenate
035b 4800 |H | Short_Literal 0x0
035c 0092 03ed | | Action Push_String_Extended,0x3ed ; "Normal_Completion"
035e e012 | | Load 0x0,0x12
035f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0360 0092 03b5 | | Action Push_String_Extended,0x3b5 ; "Install_Subsystems"
0362 e012 | | Load 0x0,0x12
0363 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0364 4501 |E | Exit_Subprogram 0x1
0365 TRAP_0230:
0365 0007 | | Action Break_Optional
0366 e008 | | Load 0x0,0x8
0367 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0368 e411 | | Load 0x2,0x11
0369 012f | / | Execute Any,Equal
036a 6819 |h | Jump_Zero 0x384
036b e002 | | Load 0x0,0x2
036c 180e | | Execute Package,Field_Execute,Field_Number 0xe
036d 4808 |H | Short_Literal 0x8
036e 4801 |H | Short_Literal 0x1
036f 4801 |H | Short_Literal 0x1
0370 e011 | | Load 0x0,0x11
0371 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0372 0092 03ee | | Action Push_String_Extended,0x3ee ; " raised"
0374 01cc | | Execute Vector,Catenate
0375 e009 | | Load 0x0,0x9
0376 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0377 e002 | | Load 0x0,0x2
0378 180e | | Execute Package,Field_Execute,Field_Number 0xe
0379 4805 |H | Short_Literal 0x5
037a 0092 03cd | | Action Push_String_Extended,0x3cd ; "Step has Failed"
037c e009 | | Load 0x0,0x9
037d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
037e e411 | | Load 0x2,0x11
037f e410 | | Load 0x2,0x10
0380 e40f | | Load 0x2,0xf
0381 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0382 c411 | | Store 0x2,0x11
0383 780c |x | Jump 0x390
0384 e002 | | Load 0x0,0x2
0385 180e | | Execute Package,Field_Execute,Field_Number 0xe
0386 4808 |H | Short_Literal 0x8
0387 4801 |H | Short_Literal 0x1
0388 4801 |H | Short_Literal 0x1
0389 e011 | | Load 0x0,0x11
038a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
038b 0092 03ef | | Action Push_String_Extended,0x3ef ; " raised while Updating Subsystems"
038d 01cc | | Execute Vector,Catenate
038e e009 | | Load 0x0,0x9
038f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0390 0092 03f0 | | Action Push_String_Extended,0x3f0 ; "Updating Subsystems has failed"
0392 e40f | | Load 0x2,0xf
0393 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0394 4801 |H | Short_Literal 0x1
0395 4801 |H | Short_Literal 0x1
0396 e011 | | Load 0x0,0x11
0397 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0398 0092 03f1 | | Action Push_String_Extended,0x3f1 ; " installing subsystems for "
039a 01cc | | Execute Vector,Catenate
039b 8413 | | Call 0x2,0x13
039c 01cc | | Execute Vector,Catenate
039d 4802 |H | Short_Literal 0x2
039e 0092 03d0 | | Action Push_String_Extended,0x3d0 ; "Unhandled_Exception"
03a0 e012 | | Load 0x0,0x12
03a1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03a2 0092 03b5 | | Action Push_String_Extended,0x3b5 ; "Install_Subsystems"
03a4 e012 | | Load 0x0,0x12
03a5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03a6 4501 |E | Exit_Subprogram 0x1
03a7 ; --------------------------------------------------------------------------------------
03a7 ; STRING TABLE
03a7 ; --------------------------------------------------------------------------------------
03a7 0098 | | .STRTAB 0x0098->0x03f3 ; "$$.Internal."
03a8 00a2 | | .STRTAB 0x00a2->0x03f9 ; "$$.Logs."
03a9 00a8 | | .STRTAB 0x00a8->0x03fd ; "$$.Lists."
03aa 00af | | .STRTAB 0x00af->0x0401 ; "$$.Archives."
03ab 00b9 | | .STRTAB 0x00b9->0x0407 ; "$$.Lists.Combined_Mload"
03ac 00ce | | .STRTAB 0x00ce->0x0413 ; "$$.Activity_File"
03ad 00dc | | .STRTAB 0x00dc->0x041b ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
03ae 014d | M | .STRTAB 0x014d->0x0454 ; "$$.Master_Log_File"
03af 015d | ] | .STRTAB 0x015d->0x045d ; "$$.Logs.Install_Subsystems"
03b0 0175 | u | .STRTAB 0x0175->0x046a ; "$$.Logs.Current_Subsystem_Step"
03b1 0191 | | .STRTAB 0x0191->0x0479 ; "[Install_Subsystems (Check_Configuration => "
03b2 01bb | | .STRTAB 0x01bb->0x048f ; ");]"
03b3 01bc | | .STRTAB 0x01bc->0x0491 ; "!Machine"
; "!Machine"
03b4 01c2 | | .STRTAB 0x01c2->0x0495 ; "?"
; "?"
; "?"
; "?"
; "?"
; "?"
; "?"
; "?"
03b5 01c1 | | .STRTAB 0x01c1->0x0495 ; "Install_Subsystems"
; "Install_Subsystems"
; "Install_Subsystems"
; "Install_Subsystems"
; "Install_Subsystems"
; "Install_Subsystems"
03b6 01d1 | | .STRTAB 0x01d1->0x049e ; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
03b7 01d8 | | .STRTAB 0x01d8->0x04a3 ; "!Machine`Install_Subsystems$$[D_@]"
03b8 01f8 | | .STRTAB 0x01f8->0x04b4 ; "$$[D_@]"
03b9 01fd | | .STRTAB 0x01fd->0x04b7 ; "Aborting subsystems installation: could not set PRIVILEGED MODE"
03ba 023a | : | .STRTAB 0x023a->0x04d7 ; "Aborting subsystems installation: Current context is not a release world."
03bb 0281 | | .STRTAB 0x0281->0x04fb ; "Aborting subsystems installation: "
03bc 02a1 | | .STRTAB 0x02a1->0x050c ; " is not the currently running EEDB configuration."
03bd 02d0 | | .STRTAB 0x02d0->0x0525 ; "Installing Subsystems for Release "
03be 02f0 | | .STRTAB 0x02f0->0x0536 ; "Updating Miscellaneous Universe Items"
03bf 0313 | | .STRTAB 0x0313->0x0548 ; "$$.Lists.Init_Procs_To_Delete"
; "$$.Lists.Init_Procs_To_Delete"
; "$$.Lists.Init_Procs_To_Delete"
03c0 032e | . | .STRTAB 0x032e->0x0557 ; "Running COMP.DESTROY on Initialize Delete file"
03c1 035a | Z | .STRTAB 0x035a->0x056e ; "<ERRORS>"
; "<ERRORS>"
03c2 0360 | ` | .STRTAB 0x0360->0x0572 ; "_$$.Lists.Init_Procs_To_Delete"
; "_$$.Lists.Init_Procs_To_Delete"
03c3 037c | | | .STRTAB 0x037c->0x0581 ; "<WORLDS>"
; "<WORLDS>"
03c4 0382 | | .STRTAB 0x0382->0x0585 ; "$$.Lists.Init_Procs_Deleted"
03c5 039b | | .STRTAB 0x039b->0x0592 ; "$$.Lists.Init_Procs_To_Change"
; "$$.Lists.Init_Procs_To_Change"
03c6 03b6 | | .STRTAB 0x03b6->0x05a1 ; "Demoting Changed Initialize Procedures"
03c7 03da | | .STRTAB 0x03da->0x05b4 ; "_$$.Lists.Init_Procs_To_Change"
; "_$$.Lists.Init_Procs_To_Change"
03c8 03f6 | | .STRTAB 0x03f6->0x05c3 ; "Running Snapshot Daemon"
; "Running Snapshot Daemon"
03c9 040b | | .STRTAB 0x040b->0x05ce ; "snap"
; "snap"
03ca 040d | | .STRTAB 0x040d->0x05d0 ; "Install_Subsystems has completed"
03cb 042b | + | .STRTAB 0x042b->0x05e0 ; "[Install_Subsystems has completed]"
03cc 044b | K | .STRTAB 0x044b->0x05f1 ; " raised installing release"
03cd 0463 | c | .STRTAB 0x0463->0x05fe ; "Step has Failed"
; "Step has Failed"
03ce 0470 | p | .STRTAB 0x0470->0x0606 ; "Install_Universe has failed"
03cf 0489 | | .STRTAB 0x0489->0x0613 ; " installing "
03d0 0493 | | .STRTAB 0x0493->0x0619 ; "Unhandled_Exception"
; "Unhandled_Exception"
03d1 04a4 | | .STRTAB 0x04a4->0x0623 ; "Install_Subsystems has failed"
03d2 04bf | | .STRTAB 0x04bf->0x0631 ; "$$"
03d3 04bf | | .STRTAB 0x04bf->0x0632 ; "_"
; "_"
; "_"
03d4 04be | | .STRTAB 0x04be->0x0633 ; "Updating the Subsystems"
03d5 04d3 | | .STRTAB 0x04d3->0x063e ; " subsystems"
03d6 04dc | | .STRTAB 0x04dc->0x0644 ; "Beginning_Upgrade"
03d7 04eb | | .STRTAB 0x04eb->0x064c ; "Fixing Standard Models"
03d8 04ff | | .STRTAB 0x04ff->0x0657 ; "!"
03d9 04fe | | .STRTAB 0x04fe->0x0658 ; "Checking Subsystem Target Keys"
03da 051a | | .STRTAB 0x051a->0x0667 ; "$$.Lists..Subsystem_List"
03db 0530 | 0 | .STRTAB 0x0530->0x0673 ; "$$.Internal.$$.Archives.Subsystems"
; "$$.Internal.$$.Archives.Subsystems"
; "$$.Internal.$$.Archives.Subsystems"
03dc 0550 | P | .STRTAB 0x0550->0x0684 ; "$$.Internal.$$.Lists..Subsystem_List"
03dd 0572 | r | .STRTAB 0x0572->0x0696 ; "Restoring New Subsystems"
03de 0588 | | .STRTAB 0x0588->0x06a2 ; "$$.Archives.Subsystems"
03df 059c | | .STRTAB 0x059c->0x06ad ; "new, replace, remake, coded"
; "new, replace, remake, coded"
03e0 05b5 | | .STRTAB 0x05b5->0x06ba ; "*"
; "*"
; "*"
; "*"
; "*"
; "*"
03e1 05b4 | | .STRTAB 0x05b4->0x06bb ; "Restoring Internal Tools"
03e2 05ca | | .STRTAB 0x05ca->0x06c7 ; "$$.Internal.$$.Activity_File"
03e3 05e4 | | .STRTAB 0x05e4->0x06d5 ; "Installing New Subsystems and Recoding Main Procedures"
03e4 0618 | | .STRTAB 0x0618->0x06f0 ; "!Machine.Release.Current.Commands"
03e5 0637 | 7 | .STRTAB 0x0637->0x0700 ; "!Machine.Release.Current.Activity"
03e6 0656 | V | .STRTAB 0x0656->0x0711 ; "Installing System_Maintenance.Current_Combined_Mload"
03e7 0688 | | .STRTAB 0x0688->0x072b ; "!Commands.System_Maintenance.[, Current_Combined_Mload]"
; "!Commands.System_Maintenance.[, Current_Combined_Mload]"
03e8 06bd | | .STRTAB 0x06bd->0x0746 ; "!Commands.System_Maintenance.Current_Combined_Mload"
03e9 06ee | | .STRTAB 0x06ee->0x0760 ; "$$.Archives.Subsystem_Miscellany"
; "$$.Archives.Subsystem_Miscellany"
03ea 070c | | .STRTAB 0x070c->0x0770 ; "Restoring Miscellaneous Subsystem Components"
03eb 0736 | 6 | .STRTAB 0x0736->0x0786 ; "R1000, Changed, Replace, Remake"
03ec 0753 | S | .STRTAB 0x0753->0x0795 ; " subsystem upgrade is completed."
03ed 0771 | q | .STRTAB 0x0771->0x07a5 ; "Normal_Completion"
03ee 0780 | | .STRTAB 0x0780->0x07ae ; " raised"
03ef 0785 | | .STRTAB 0x0785->0x07b1 ; " raised while Updating Subsystems"
03f0 07a4 | | .STRTAB 0x07a4->0x07c2 ; "Updating Subsystems has failed"
03f1 07c0 | | .STRTAB 0x07c0->0x07d1 ; " installing subsystems for "
03f2 07d9 | | .STREND 0x07d9->0x07de
03f3 2424 2e49 |$$.I| .STRTAB_STRINGS
07df 0000 | | .XXX[0x1]
07e0 ; --------------------------------------------------------------------------------------
07e0 ; Debug Table
07e0 ; --------------------------------------------------------------------------------------
07e0 0004 0001 | | .DEBUG4 0x0004,0x0001,0x3bbf,0x0000,0x0001,0x0000
07e6 0001 8448 | H| .XXX[0x1a]
07e8 09cc 04a4 | |
07ea 024c 0001 | L |
07ec 8424 09cc | $ |
07ee 04a4 024c | L|
07f0 0001 8400 | |
07f2 09cc 04a4 | |
07f4 024c 0001 | L |
07f6 83dc 09cc | |
07f8 04a4 0a68 | h|
07fa 15cc 0a68 | h|
07fc 15ec 0a68 | h|
07fe 168c 0a68 | h|