|
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: 5120 (0x1400)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0bf8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0810 | | .CONST 0x0810 ; 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 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 0069 | i | .CONST 0x0069 ; Address of begin
0019 0183 | | .CONST 0x0183 ; Address of exception handler
001a 0016 | | .CONST 0x0016 ; Number of locals
001b INIT_0018:
001b 0092 03d2 | | Action Push_String_Extended,0x3d2 ; "$$.Internal."
001d 0092 03d3 | | Action Push_String_Extended,0x3d3 ; "$$.Logs."
001f 0092 03d4 | | Action Push_String_Extended,0x3d4 ; "$$.Lists."
0021 0092 03d5 | | Action Push_String_Extended,0x3d5 ; "$$.Archives."
0023 0092 03d6 | | Action Push_String_Extended,0x3d6 ; "$$.Lists.Combined_Mload"
0025 0092 03d7 | | Action Push_String_Extended,0x3d7 ; "$$.Activity_File"
0027 e002 | | Load 0x0,0x2
0028 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0029 e003 | | Load 0x0,0x3
002a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002b 02c7 | | Declare_Variable Any
002c e003 | | Load 0x0,0x3
002d 180e | | Execute Package,Field_Execute,Field_Number 0xe
002e a409 | | Store_Unchecked 0x2,0x9
002f e003 | | Load 0x0,0x3
0030 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0031 02c7 | | Declare_Variable Any
0032 0092 03d8 | | Action Push_String_Extended,0x3d8 ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
0034 e003 | | Load 0x0,0x3
0035 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0036 a40a | | Store_Unchecked 0x2,0xa
0037 e004 | | Load 0x0,0x4
0038 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0039 0092 03d9 | | Action Push_String_Extended,0x3d9 ; "$$.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 e005 | | Load 0x0,0x5
0040 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0041 e005 | | Load 0x0,0x5
0042 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0043 01ca | | Execute Vector,Prepend
0044 0007 | | Action Break_Optional
0045 0092 03da | | Action Push_String_Extended,0x3da ; "$$.Logs.Install_Subsystems"
0047 00d9 | | Load_Top At_Offset_1
0048 01cc | | Execute Vector,Catenate
0049 0007 | | Action Break_Optional
004a 0093 0000 | | push_full_address 0x0
004c 617b |a{ | Indirect_Literal Discrete,0x1c8,{0x80000000, 0x00010000}
004d 0273 | s | Execute Discrete,Plus
004e e006 | | Load 0x0,0x6
004f 0273 | s | Execute Discrete,Plus
0050 e007 | | Load 0x0,0x7
0051 0273 | s | Execute Discrete,Plus
0052 00db | | Load_Top At_Offset_3
0053 00da | | Load_Top At_Offset_2
0054 e008 | | Load 0x0,0x8
0055 0387 | | Declare_Variable Package
0056 00d8 | | Load_Top At_Offset_0
0057 020f | | Execute Module,Activate
0058 0092 03db | | Action Push_String_Extended,0x3db ; "$$.Logs.Current_Subsystem_Step"
005a e009 | | Load 0x0,0x9
005b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005c 02c7 | | Declare_Variable Any
005d 00d8 | | Load_Top At_Offset_0
005e 1c00 | | Execute_Immediate Run_Utility,0x0
005f 00e1 | | Load_Encached Boolean_Cache
0060 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0061 029f 01d3 | | Declare_Subprogram INIT_01d0,For_Call
0063 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call
0065 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call
0067 029f 024b | K| Declare_Subprogram INIT_0248,For_Call
0069 BODY_0018:
0069 e003 | | Load 0x0,0x3
006a 180e | | Execute Package,Field_Execute,Field_Number 0xe
006b 4800 |H | Short_Literal 0x0
006c 0092 03dc | | Action Push_String_Extended,0x3dc ; "[Install_Subsystems (Check_Configuration => "
006e e5ff | | Load 0x2,-0x1
006f 00e1 | | Load_Encached Boolean_Cache
0070 011c | | Execute Any,Convert_Unchecked
0071 1c01 | | Execute_Immediate Run_Utility,0x1
0072 01cc | | Execute Vector,Catenate
0073 0092 03dd | | Action Push_String_Extended,0x3dd ; ");]"
0075 01cc | | Execute Vector,Catenate
0076 e00a | | Load 0x0,0xa
0077 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0078 4801 |H | Short_Literal 0x1
0079 e004 | | Load 0x0,0x4
007a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
007b 0092 03de | | Action Push_String_Extended,0x3de ; "!Machine"
007d 4802 |H | Short_Literal 0x2
007e 0092 03df | | Action Push_String_Extended,0x3df ; "?"
0080 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "Install_Subsystems"
0082 e00b | | Load 0x0,0xb
0083 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0084 6807 |h | Jump_Zero 0x8c
0085 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
0087 0092 03e2 | | Action Push_String_Extended,0x3e2 ; "!Machine`Install_Subsystems$$[D_@]"
0089 e00c | | Load 0x0,0xc
008a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
008b 7806 |x | Jump 0x92
008c 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
008e 0092 03e3 | | Action Push_String_Extended,0x3e3 ; "$$[D_@]"
0090 e00c | | Load 0x0,0xc
0091 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0092 e004 | | Load 0x0,0x4
0093 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0094 7008 |p | Jump_Nonzero 0x9d
0095 e003 | | Load 0x0,0x3
0096 180e | | Execute Package,Field_Execute,Field_Number 0xe
0097 4805 |H | Short_Literal 0x5
0098 0092 03e4 | | Action Push_String_Extended,0x3e4 ; "Aborting subsystems installation: could not set PRIVILEGED MODE"
009a e00a | | Load 0x0,0xa
009b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
009c 78d8 |x | Jump 0x175
009d e406 | | Load 0x2,0x6
009e 800d | | Call 0x0,0xd
009f 7008 |p | Jump_Nonzero 0xa8
00a0 e003 | | Load 0x0,0x3
00a1 180e | | Execute Package,Field_Execute,Field_Number 0xe
00a2 4805 |H | Short_Literal 0x5
00a3 0092 03e5 | | Action Push_String_Extended,0x3e5 ; "Aborting subsystems installation: Current context is not a release world."
00a5 e00a | | Load 0x0,0xa
00a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00a7 78cd |x | Jump 0x175
00a8 e5ff | | Load 0x2,-0x1
00a9 6812 |h | Jump_Zero 0xbc
00aa e408 | | Load 0x2,0x8
00ab 8413 | | Call 0x2,0x13
00ac 8414 | | Call 0x2,0x14
00ad 8415 | | Call 0x2,0x15
00ae 700d |p | Jump_Nonzero 0xbc
00af e003 | | Load 0x0,0x3
00b0 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b1 4805 |H | Short_Literal 0x5
00b2 0092 03e6 | | Action Push_String_Extended,0x3e6 ; "Aborting subsystems installation: "
00b4 8413 | | Call 0x2,0x13
00b5 01cc | | Execute Vector,Catenate
00b6 0092 03e7 | | Action Push_String_Extended,0x3e7 ; " is not the currently running EEDB configuration."
00b8 01cc | | Execute Vector,Catenate
00b9 e00a | | Load 0x0,0xa
00ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00bb 78b9 |x | Jump 0x175
00bc e403 | | Load 0x2,0x3
00bd 800d | | Call 0x0,0xd
00be 700b |p | Jump_Nonzero 0xca
00bf 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
00c1 00ea | | Load_Encached Null_String_Cache
00c2 4800 |H | Short_Literal 0x0
00c3 4801 |H | Short_Literal 0x1
00c4 4801 |H | Short_Literal 0x1
00c5 4807 |H | Short_Literal 0x7
00c6 e403 | | Load 0x2,0x3
00c7 01cf | | Execute Vector,Slice_Read
00c8 e00c | | Load 0x0,0xc
00c9 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00ca e40a | | Load 0x2,0xa
00cb e003 | | Load 0x0,0x3
00cc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00cd 0092 03e8 | | Action Push_String_Extended,0x3e8 ; "Installing Subsystems for Release "
00cf 8413 | | Call 0x2,0x13
00d0 01cc | | Execute Vector,Catenate
00d1 e00e | | Load 0x0,0xe
00d2 e40f | | Load 0x2,0xf
00d3 0096 | | Execute Package,Entry
00d4 4801 |H | Short_Literal 0x1
00d5 a412 | | Store_Unchecked 0x2,0x12
00d6 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
00d8 0092 03de | | Action Push_String_Extended,0x3de ; "!Machine"
00da 4802 |H | Short_Literal 0x2
00db 0092 03df | | Action Push_String_Extended,0x3df ; "?"
00dd 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "Install_Subsystems"
00df e00f | | Load 0x0,0xf
00e0 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00e1 e002 | | Load 0x0,0x2
00e2 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00e3 e002 | | Load 0x0,0x2
00e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e5 00d9 | | Load_Top At_Offset_1
00e6 00d0 | | Action Swap_Control
00e7 0260 | ` | Execute Discrete,In_Type
00e8 7001 |p | Jump_Nonzero 0xea
00e9 0801 | | Execute_Immediate Raise,0x1
00ea 60d9 |` | Indirect_Literal Discrete,0x1c4,{0x00000000, 0x00003e80}
00eb e002 | | Load 0x0,0x2
00ec 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
00ed 8416 | | Call 0x2,0x16
00ee 0092 03e9 | | Action Push_String_Extended,0x3e9 ; "Updating Miscellaneous Universe Items"
00f0 e010 | | Load 0x0,0x10
00f1 e40f | | Load 0x2,0xf
00f2 0096 | | Execute Package,Entry
00f3 0092 03ea | | Action Push_String_Extended,0x3ea ; "$$.Lists.Init_Procs_To_Delete"
00f5 800d | | Call 0x0,0xd
00f6 6830 |h0 | Jump_Zero 0x127
00f7 0092 03ea | | Action Push_String_Extended,0x3ea ; "$$.Lists.Init_Procs_To_Delete"
00f9 8011 | | Call 0x0,0x11
00fa 702c |p, | Jump_Nonzero 0x127
00fb e411 | | Load 0x2,0x11
00fc 0120 | | Execute Any,Is_Value
00fd 6803 |h | Jump_Zero 0x101
00fe e009 | | Load 0x0,0x9
00ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0100 7801 |x | Jump 0x102
0101 e411 | | Load 0x2,0x11
0102 e410 | | Load 0x2,0x10
0103 0092 03eb | | Action Push_String_Extended,0x3eb ; "Running COMP.DESTROY on Initialize Delete file"
0105 e012 | | Load 0x0,0x12
0106 e40f | | Load 0x2,0xf
0107 0096 | | Execute Package,Entry
0108 c411 | | Store 0x2,0x11
0109 0092 03ec | | Action Push_String_Extended,0x3ec ; "<ERRORS>"
010b 4801 |H | Short_Literal 0x1
010c 0092 03ed | | Action Push_String_Extended,0x3ed ; "_$$.Lists.Init_Procs_To_Delete"
010e e00c | | Load 0x0,0xc
010f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0110 0092 03ec | | Action Push_String_Extended,0x3ec ; "<ERRORS>"
0112 0092 03ee | | Action Push_String_Extended,0x3ee ; "<WORLDS>"
0114 4802 |H | Short_Literal 0x2
0115 0092 03ed | | Action Push_String_Extended,0x3ed ; "_$$.Lists.Init_Procs_To_Delete"
0117 e013 | | Load 0x0,0x13
0118 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0119 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
011b 0092 03ef | | Action Push_String_Extended,0x3ef ; "$$.Lists.Init_Procs_Deleted"
011d 0092 03ea | | Action Push_String_Extended,0x3ea ; "$$.Lists.Init_Procs_To_Delete"
011f e00c | | Load 0x0,0xc
0120 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0121 e411 | | Load 0x2,0x11
0122 e410 | | Load 0x2,0x10
0123 e014 | | Load 0x0,0x14
0124 e40f | | Load 0x2,0xf
0125 0096 | | Execute Package,Entry
0126 c411 | | Store 0x2,0x11
0127 0092 03f0 | | Action Push_String_Extended,0x3f0 ; "$$.Lists.Init_Procs_To_Change"
0129 800d | | Call 0x0,0xd
012a 6829 |h) | Jump_Zero 0x154
012b 0092 03f0 | | Action Push_String_Extended,0x3f0 ; "$$.Lists.Init_Procs_To_Change"
012d 8011 | | Call 0x0,0x11
012e 7025 |p% | Jump_Nonzero 0x154
012f e411 | | Load 0x2,0x11
0130 0120 | | Execute Any,Is_Value
0131 6803 |h | Jump_Zero 0x135
0132 e009 | | Load 0x0,0x9
0133 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0134 7801 |x | Jump 0x136
0135 e411 | | Load 0x2,0x11
0136 e410 | | Load 0x2,0x10
0137 0092 03f1 | | Action Push_String_Extended,0x3f1 ; "Demoting Changed Initialize Procedures"
0139 e012 | | Load 0x0,0x12
013a e40f | | Load 0x2,0xf
013b 0096 | | Execute Package,Entry
013c c411 | | Store 0x2,0x11
013d 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
013f 4801 |H | Short_Literal 0x1
0140 0092 03f2 | | Action Push_String_Extended,0x3f2 ; "_$$.Lists.Init_Procs_To_Change"
0142 e00c | | Load 0x0,0xc
0143 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0144 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
0146 4800 |H | Short_Literal 0x0
0147 0092 03ee | | Action Push_String_Extended,0x3ee ; "<WORLDS>"
0149 4800 |H | Short_Literal 0x0
014a 0092 03f2 | | Action Push_String_Extended,0x3f2 ; "_$$.Lists.Init_Procs_To_Change"
014c e013 | | Load 0x0,0x13
014d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
014e e411 | | Load 0x2,0x11
014f e410 | | Load 0x2,0x10
0150 e014 | | Load 0x0,0x14
0151 e40f | | Load 0x2,0xf
0152 0096 | | Execute Package,Entry
0153 c411 | | Store 0x2,0x11
0154 e411 | | Load 0x2,0x11
0155 0120 | | Execute Any,Is_Value
0156 6803 |h | Jump_Zero 0x15a
0157 e009 | | Load 0x0,0x9
0158 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0159 7801 |x | Jump 0x15b
015a e411 | | Load 0x2,0x11
015b e410 | | Load 0x2,0x10
015c 0092 03f3 | | Action Push_String_Extended,0x3f3 ; "Running Snapshot Daemon"
015e e012 | | Load 0x0,0x12
015f e40f | | Load 0x2,0xf
0160 0096 | | Execute Package,Entry
0161 c411 | | Store 0x2,0x11
0162 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
0164 0092 03f4 | | Action Push_String_Extended,0x3f4 ; "snap"
0166 e015 | | Load 0x0,0x15
0167 180e | | Execute Package,Field_Execute,Field_Number 0xe
0168 e411 | | Load 0x2,0x11
0169 e410 | | Load 0x2,0x10
016a e014 | | Load 0x0,0x14
016b e40f | | Load 0x2,0xf
016c 0096 | | Execute Package,Entry
016d c411 | | Store 0x2,0x11
016e 0092 03f5 | | Action Push_String_Extended,0x3f5 ; "Install_Subsystems has completed"
0170 e016 | | Load 0x0,0x16
0171 e40f | | Load 0x2,0xf
0172 0096 | | Execute Package,Entry
0173 4800 |H | Short_Literal 0x0
0174 a412 | | Store_Unchecked 0x2,0x12
0175 e409 | | Load 0x2,0x9
0176 e003 | | Load 0x0,0x3
0177 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0178 e40b | | Load 0x2,0xb
0179 e004 | | Load 0x0,0x4
017a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
017b e003 | | Load 0x0,0x3
017c 180e | | Execute Package,Field_Execute,Field_Number 0xe
017d 4800 |H | Short_Literal 0x0
017e 0092 03f6 | | Action Push_String_Extended,0x3f6 ; "[Install_Subsystems has completed]"
0180 e00a | | Load 0x0,0xa
0181 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0182 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0183 TRAP_0018:
0183 0007 | | Action Break_Optional
0184 e003 | | Load 0x0,0x3
0185 180e | | Execute Package,Field_Execute,Field_Number 0xe
0186 4808 |H | Short_Literal 0x8
0187 4801 |H | Short_Literal 0x1
0188 4801 |H | Short_Literal 0x1
0189 e017 | | Load 0x0,0x17
018a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
018b 0092 03f7 | | Action Push_String_Extended,0x3f7 ; " raised installing release"
018d 01cc | | Execute Vector,Catenate
018e e00a | | Load 0x0,0xa
018f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0190 e009 | | Load 0x0,0x9
0191 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0192 e411 | | Load 0x2,0x11
0193 012f | / | Execute Any,Equal
0194 680d |h | Jump_Zero 0x1a2
0195 e003 | | Load 0x0,0x3
0196 180e | | Execute Package,Field_Execute,Field_Number 0xe
0197 4805 |H | Short_Literal 0x5
0198 0092 03f8 | | Action Push_String_Extended,0x3f8 ; "Step has Failed"
019a e00a | | Load 0x0,0xa
019b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
019c e411 | | Load 0x2,0x11
019d e410 | | Load 0x2,0x10
019e e014 | | Load 0x0,0x14
019f e40f | | Load 0x2,0xf
01a0 0096 | | Execute Package,Entry
01a1 c411 | | Store 0x2,0x11
01a2 e412 | | Load 0x2,0x12
01a3 6805 |h | Jump_Zero 0x1a9
01a4 0092 03f9 | | Action Push_String_Extended,0x3f9 ; "Install_Universe has failed"
01a6 e018 | | Load 0x0,0x18
01a7 e40f | | Load 0x2,0xf
01a8 0096 | | Execute Package,Entry
01a9 4801 |H | Short_Literal 0x1
01aa 4801 |H | Short_Literal 0x1
01ab e017 | | Load 0x0,0x17
01ac 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01ad 0092 03fa | | Action Push_String_Extended,0x3fa ; " installing "
01af 01cc | | Execute Vector,Catenate
01b0 8413 | | Call 0x2,0x13
01b1 01cc | | Execute Vector,Catenate
01b2 4802 |H | Short_Literal 0x2
01b3 0092 03fb | | Action Push_String_Extended,0x3fb ; "Unhandled_Exception"
01b5 e019 | | Load 0x0,0x19
01b6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b7 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "Install_Subsystems"
01b9 e019 | | Load 0x0,0x19
01ba 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01bb e409 | | Load 0x2,0x9
01bc e003 | | Load 0x0,0x3
01bd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01be 0092 03fc | | Action Push_String_Extended,0x3fc ; "Install_Subsystems has failed"
01c0 e018 | | Load 0x0,0x18
01c1 e40f | | Load 0x2,0xf
01c2 0096 | | Execute Package,Entry
01c3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01c4 0000 0000 | | .LITERAL {0x00000000, 0x00003e80}
01c8 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
01cc 0000 0000 | | .BLANK 0000[0x4]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 6010 |` | Indirect_Literal Discrete,0x1e4,{0x00000000, 0x00004000}
01d4 e01a | | Load 0x0,0x1a
01d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d6 e01b | | Load 0x0,0x1b
01d7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01d8 e01c | | Load 0x0,0x1c
01d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01da 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01db 0092 03fd | | Action Push_String_Extended,0x3fd ; "$$"
01dd e01c | | Load 0x0,0x1c
01de 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01df 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
01e0 e01c | | Load 0x0,0x1c
01e1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01e2 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
01e3 00ca | | Action Exit_Nullary_Function
01e4 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f3 | | .CONST 0x01f3 ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0003 | | .CONST 0x0003 ; Number of locals
01eb INIT_01e8:
01eb 00da | | Load_Top At_Offset_2
01ec 01dd | | Execute Vector,First
01ed 00e2 | | Load_Encached Integer_Cache
01ee 03f1 | | Declare_Variable Discrete,With_Value
01ef 00db | | Load_Top At_Offset_3
01f0 01dc | | Execute Vector,Last
01f1 00e2 | | Load_Encached Integer_Cache
01f2 03f1 | | Declare_Variable Discrete,With_Value
01f3 BODY_01e8:
01f3 4800 |H | Short_Literal 0x0
01f4 00da | | Load_Top At_Offset_2
01f5 e7ff | | Load 0x3,-0x1
01f6 01dc | | Execute Vector,Last
01f7 e7ff | | Load 0x3,-0x1
01f8 01cf | | Execute Vector,Slice_Read
01f9 0092 03fe | | Action Push_String_Extended,0x3fe ; "_"
01fb e01d | | Load 0x0,0x1d
01fc 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01fd 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
01fe 4800 |H | Short_Literal 0x0
01ff 00d9 | | Load_Top At_Offset_1
0200 0a01 | | Execute_Immediate Plus,0x1
0201 00d8 | | Load_Top At_Offset_0
0202 00e2 | | Load_Encached Integer_Cache
0203 0260 | ` | Execute Discrete,In_Type
0204 7001 |p | Jump_Nonzero 0x206
0205 0801 | | Execute_Immediate Raise,0x1
0206 e7ff | | Load 0x3,-0x1
0207 01dc | | Execute Vector,Last
0208 e7ff | | Load 0x3,-0x1
0209 01cf | | Execute Vector,Slice_Read
020a 0092 03fe | | Action Push_String_Extended,0x3fe ; "_"
020c e01d | | Load 0x0,0x1d
020d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
020e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
020f 4800 |H | Short_Literal 0x0
0210 00d9 | | Load_Top At_Offset_1
0211 0a01 | | 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 01dc | | Execute Vector,Last
0219 e7ff | | Load 0x3,-0x1
021a 01cf | | Execute Vector,Slice_Read
021b 0092 03fe | | Action Push_String_Extended,0x3fe ; "_"
021d e01d | | Load 0x0,0x1d
021e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
021f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0220 00d8 | | Load_Top At_Offset_0
0221 e7ff | | Load 0x3,-0x1
0222 01da | | Execute Vector,Bounds
0223 0261 | a | Execute Discrete,Not_In_Range
0224 6802 |h | Jump_Zero 0x227
0225 e7ff | | Load 0x3,-0x1
0226 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0227 00d9 | | Load_Top At_Offset_1
0228 00d9 | | Load_Top At_Offset_1
0229 0aff | | Execute_Immediate Plus,-0x1
022a 00d8 | | Load_Top At_Offset_0
022b 00e2 | | Load_Encached Integer_Cache
022c 0260 | ` | Execute Discrete,In_Type
022d 7001 |p | Jump_Nonzero 0x22f
022e 0801 | | Execute_Immediate Raise,0x1
022f e7ff | | Load 0x3,-0x1
0230 01cf | | Execute Vector,Slice_Read
0231 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0232 0000 0000 | | .BLANK 0000[0x6]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0242 | B | .CONST 0x0242 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0002 | | .CONST 0x0002 ; Number of locals
023b INIT_0238:
023b 4801 |H | Short_Literal 0x1
023c e7fe | | Load 0x3,-0x2
023d e7ff | | Load 0x3,-0x1
023e e01d | | Load 0x0,0x1d
023f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0240 00e2 | | Load_Encached Integer_Cache
0241 03f1 | | Declare_Variable Discrete,With_Value
0242 BODY_0238:
0242 00d8 | | Load_Top At_Offset_0
0243 e7fe | | Load 0x3,-0x2
0244 01dd | | Execute Vector,First
0245 027f | | Execute Discrete,Equal
0246 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0247 0000 | | .XXX[0x1]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 038e | | .CONST 0x038e ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b 0092 03ff | | Action Push_String_Extended,0x3ff ; "Updating the Subsystems"
024d e010 | | Load 0x0,0x10
024e e40f | | Load 0x2,0xf
024f 0096 | | Execute Package,Entry
0250 8413 | | Call 0x2,0x13
0251 0092 0400 | | Action Push_String_Extended,0x400 ; " subsystems"
0253 01cc | | Execute Vector,Catenate
0254 4800 |H | Short_Literal 0x0
0255 0092 0401 | | Action Push_String_Extended,0x401 ; "Beginning_Upgrade"
0257 e019 | | Load 0x0,0x19
0258 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0259 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "Install_Subsystems"
025b e019 | | Load 0x0,0x19
025c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
025d e411 | | Load 0x2,0x11
025e 0120 | | Execute Any,Is_Value
025f 6803 |h | Jump_Zero 0x263
0260 e009 | | Load 0x0,0x9
0261 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0262 7801 |x | Jump 0x264
0263 e411 | | Load 0x2,0x11
0264 e410 | | Load 0x2,0x10
0265 0092 0402 | | Action Push_String_Extended,0x402 ; "Fixing Standard Models"
0267 e012 | | Load 0x0,0x12
0268 e40f | | Load 0x2,0xf
0269 0096 | | Execute Package,Entry
026a c411 | | Store 0x2,0x11
026b 0092 0403 | | Action Push_String_Extended,0x403 ; "!"
026d 801e | | Call 0x0,0x1e
026e e411 | | Load 0x2,0x11
026f e410 | | Load 0x2,0x10
0270 e014 | | Load 0x0,0x14
0271 e40f | | Load 0x2,0xf
0272 0096 | | Execute Package,Entry
0273 c411 | | Store 0x2,0x11
0274 e411 | | Load 0x2,0x11
0275 0120 | | Execute Any,Is_Value
0276 6803 |h | Jump_Zero 0x27a
0277 e009 | | Load 0x0,0x9
0278 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0279 7801 |x | Jump 0x27b
027a e411 | | Load 0x2,0x11
027b e410 | | Load 0x2,0x10
027c 0092 0404 | | Action Push_String_Extended,0x404 ; "Checking Subsystem Target Keys"
027e e012 | | Load 0x0,0x12
027f e40f | | Load 0x2,0xf
0280 0096 | | Execute Package,Entry
0281 c411 | | Store 0x2,0x11
0282 4800 |H | Short_Literal 0x0
0283 4800 |H | Short_Literal 0x0
0284 4801 |H | Short_Literal 0x1
0285 0092 0405 | | Action Push_String_Extended,0x405 ; "$$.Lists..Subsystem_List"
0287 801f | | Call 0x0,0x1f
0288 8020 | | Call 0x0,0x20
0289 0092 0406 | | Action Push_String_Extended,0x406 ; "$$.Internal.$$.Archives.Subsystems"
028b 800d | | Call 0x0,0xd
028c 6805 |h | Jump_Zero 0x292
028d 4800 |H | Short_Literal 0x0
028e 4800 |H | Short_Literal 0x0
028f 0092 0407 | | Action Push_String_Extended,0x407 ; "$$.Internal.$$.Lists..Subsystem_List"
0291 8020 | | Call 0x0,0x20
0292 e411 | | Load 0x2,0x11
0293 e410 | | Load 0x2,0x10
0294 e014 | | Load 0x0,0x14
0295 e40f | | Load 0x2,0xf
0296 0096 | | Execute Package,Entry
0297 c411 | | Store 0x2,0x11
0298 4801 |H | Short_Literal 0x1
0299 e004 | | Load 0x0,0x4
029a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
029b e411 | | Load 0x2,0x11
029c 0120 | | Execute Any,Is_Value
029d 6803 |h | Jump_Zero 0x2a1
029e e009 | | Load 0x0,0x9
029f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a0 7801 |x | Jump 0x2a2
02a1 e411 | | Load 0x2,0x11
02a2 e410 | | Load 0x2,0x10
02a3 0092 0408 | | Action Push_String_Extended,0x408 ; "Restoring New Subsystems"
02a5 e012 | | Load 0x0,0x12
02a6 e40f | | Load 0x2,0xf
02a7 0096 | | Execute Package,Entry
02a8 c411 | | Store 0x2,0x11
02a9 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
02ab 0092 0409 | | Action Push_String_Extended,0x409 ; "$$.Archives.Subsystems"
02ad 0092 040a | | Action Push_String_Extended,0x40a ; "new, replace, remake, coded"
02af 0092 040b | | Action Push_String_Extended,0x40b ; "*"
02b1 0092 040b | | Action Push_String_Extended,0x40b ; "*"
02b3 0092 03df | | Action Push_String_Extended,0x3df ; "?"
02b5 e021 | ! | Load 0x0,0x21
02b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
02b7 e411 | | Load 0x2,0x11
02b8 e410 | | Load 0x2,0x10
02b9 e014 | | Load 0x0,0x14
02ba e40f | | Load 0x2,0xf
02bb 0096 | | Execute Package,Entry
02bc c411 | | Store 0x2,0x11
02bd 0092 0406 | | Action Push_String_Extended,0x406 ; "$$.Internal.$$.Archives.Subsystems"
02bf 800d | | Call 0x0,0xd
02c0 6833 |h3 | Jump_Zero 0x2f4
02c1 e411 | | Load 0x2,0x11
02c2 0120 | | Execute Any,Is_Value
02c3 6803 |h | Jump_Zero 0x2c7
02c4 e009 | | Load 0x0,0x9
02c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c6 7801 |x | Jump 0x2c8
02c7 e411 | | Load 0x2,0x11
02c8 e410 | | Load 0x2,0x10
02c9 0092 040c | | Action Push_String_Extended,0x40c ; "Restoring Internal Tools"
02cb e012 | | Load 0x0,0x12
02cc e40f | | Load 0x2,0xf
02cd 0096 | | Execute Package,Entry
02ce c411 | | Store 0x2,0x11
02cf 4801 |H | Short_Literal 0x1
02d0 e004 | | Load 0x0,0x4
02d1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02d2 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
02d4 0092 0406 | | Action Push_String_Extended,0x406 ; "$$.Internal.$$.Archives.Subsystems"
02d6 0092 040a | | Action Push_String_Extended,0x40a ; "new, replace, remake, coded"
02d8 0092 040b | | Action Push_String_Extended,0x40b ; "*"
02da 0092 040b | | Action Push_String_Extended,0x40b ; "*"
02dc 0092 03df | | Action Push_String_Extended,0x3df ; "?"
02de e021 | ! | Load 0x0,0x21
02df 180e | | Execute Package,Field_Execute,Field_Number 0xe
02e0 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
02e2 e407 | | Load 0x2,0x7
02e3 4801 |H | Short_Literal 0x1
02e4 0092 03df | | Action Push_String_Extended,0x3df ; "?"
02e6 0092 03df | | Action Push_String_Extended,0x3df ; "?"
02e8 0092 03df | | Action Push_String_Extended,0x3df ; "?"
02ea 0092 040d | | Action Push_String_Extended,0x40d ; "$$.Internal.$$.Activity_File"
02ec e022 | " | Load 0x0,0x22
02ed 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
02ee e411 | | Load 0x2,0x11
02ef e410 | | Load 0x2,0x10
02f0 e014 | | Load 0x0,0x14
02f1 e40f | | Load 0x2,0xf
02f2 0096 | | Execute Package,Entry
02f3 c411 | | Store 0x2,0x11
02f4 e411 | | Load 0x2,0x11
02f5 0120 | | Execute Any,Is_Value
02f6 6803 |h | Jump_Zero 0x2fa
02f7 e009 | | Load 0x0,0x9
02f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f9 7801 |x | Jump 0x2fb
02fa e411 | | Load 0x2,0x11
02fb e410 | | Load 0x2,0x10
02fc 0092 040e | | Action Push_String_Extended,0x40e ; "Installing New Subsystems and Recoding Main Procedures"
02fe e012 | | Load 0x0,0x12
02ff e40f | | Load 0x2,0xf
0300 0096 | | Execute Package,Entry
0301 c411 | | Store 0x2,0x11
0302 4801 |H | Short_Literal 0x1
0303 e004 | | Load 0x0,0x4
0304 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0305 0092 040f | | Action Push_String_Extended,0x40f ; "!Machine.Release.Current.Commands"
0307 0092 0410 | | Action Push_String_Extended,0x410 ; "!Machine.Release.Current.Activity"
0309 e407 | | Load 0x2,0x7
030a 8023 | # | Call 0x0,0x23
030b e411 | | Load 0x2,0x11
030c e410 | | Load 0x2,0x10
030d e014 | | Load 0x0,0x14
030e e40f | | Load 0x2,0xf
030f 0096 | | Execute Package,Entry
0310 c411 | | Store 0x2,0x11
0311 e411 | | Load 0x2,0x11
0312 0120 | | Execute Any,Is_Value
0313 6803 |h | Jump_Zero 0x317
0314 e009 | | Load 0x0,0x9
0315 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0316 7801 |x | Jump 0x318
0317 e411 | | Load 0x2,0x11
0318 e410 | | Load 0x2,0x10
0319 0092 0411 | | Action Push_String_Extended,0x411 ; "Installing System_Maintenance.Current_Combined_Mload"
031b e012 | | Load 0x0,0x12
031c e40f | | Load 0x2,0xf
031d 0096 | | Execute Package,Entry
031e c411 | | Store 0x2,0x11
031f 4801 |H | Short_Literal 0x1
0320 e004 | | Load 0x0,0x4
0321 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0322 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
0324 4800 |H | Short_Literal 0x0
0325 0092 0412 | | Action Push_String_Extended,0x412 ; "!Commands.System_Maintenance.[, Current_Combined_Mload]"
0327 e00c | | Load 0x0,0xc
0328 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0329 00ea | | Load_Encached Null_String_Cache
032a 4801 |H | Short_Literal 0x1
032b 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
032d 4801 |H | Short_Literal 0x1
032e 0092 0413 | | Action Push_String_Extended,0x413 ; "!Commands.System_Maintenance.Current_Combined_Mload"
0330 e406 | | Load 0x2,0x6
0331 e00c | | Load 0x0,0xc
0332 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0333 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
0335 4800 |H | Short_Literal 0x0
0336 0092 0412 | | Action Push_String_Extended,0x412 ; "!Commands.System_Maintenance.[, Current_Combined_Mload]"
0338 e00c | | Load 0x0,0xc
0339 181e | | Execute Package,Field_Execute,Field_Number 0x1e
033a e411 | | Load 0x2,0x11
033b e410 | | Load 0x2,0x10
033c e014 | | Load 0x0,0x14
033d e40f | | Load 0x2,0xf
033e 0096 | | Execute Package,Entry
033f c411 | | Store 0x2,0x11
0340 0092 0414 | | Action Push_String_Extended,0x414 ; "$$.Archives.Subsystem_Miscellany"
0342 800d | | Call 0x0,0xd
0343 6822 |h" | Jump_Zero 0x366
0344 e411 | | Load 0x2,0x11
0345 0120 | | Execute Any,Is_Value
0346 6803 |h | Jump_Zero 0x34a
0347 e009 | | Load 0x0,0x9
0348 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0349 7801 |x | Jump 0x34b
034a e411 | | Load 0x2,0x11
034b e410 | | Load 0x2,0x10
034c 0092 0415 | | Action Push_String_Extended,0x415 ; "Restoring Miscellaneous Subsystem Components"
034e e012 | | Load 0x0,0x12
034f e40f | | Load 0x2,0xf
0350 0096 | | Execute Package,Entry
0351 c411 | | Store 0x2,0x11
0352 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
0354 0092 0414 | | Action Push_String_Extended,0x414 ; "$$.Archives.Subsystem_Miscellany"
0356 0092 0416 | | Action Push_String_Extended,0x416 ; "R1000, Changed, Replace, Remake"
0358 0092 040b | | Action Push_String_Extended,0x40b ; "*"
035a 0092 040b | | Action Push_String_Extended,0x40b ; "*"
035c 0092 03df | | Action Push_String_Extended,0x3df ; "?"
035e e021 | ! | Load 0x0,0x21
035f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0360 e411 | | Load 0x2,0x11
0361 e410 | | Load 0x2,0x10
0362 e014 | | Load 0x0,0x14
0363 e40f | | Load 0x2,0xf
0364 0096 | | Execute Package,Entry
0365 c411 | | Store 0x2,0x11
0366 e411 | | Load 0x2,0x11
0367 0120 | | Execute Any,Is_Value
0368 6803 |h | Jump_Zero 0x36c
0369 e009 | | Load 0x0,0x9
036a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036b 7801 |x | Jump 0x36d
036c e411 | | Load 0x2,0x11
036d e410 | | Load 0x2,0x10
036e 0092 03f3 | | Action Push_String_Extended,0x3f3 ; "Running Snapshot Daemon"
0370 e012 | | Load 0x0,0x12
0371 e40f | | Load 0x2,0xf
0372 0096 | | Execute Package,Entry
0373 c411 | | Store 0x2,0x11
0374 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "<PROFILE>"
0376 0092 03f4 | | Action Push_String_Extended,0x3f4 ; "snap"
0378 e015 | | Load 0x0,0x15
0379 180e | | Execute Package,Field_Execute,Field_Number 0xe
037a e411 | | Load 0x2,0x11
037b e410 | | Load 0x2,0x10
037c e014 | | Load 0x0,0x14
037d e40f | | Load 0x2,0xf
037e 0096 | | Execute Package,Entry
037f c411 | | Store 0x2,0x11
0380 8413 | | Call 0x2,0x13
0381 0092 0417 | | Action Push_String_Extended,0x417 ; " subsystem upgrade is completed."
0383 01cc | | Execute Vector,Catenate
0384 4800 |H | Short_Literal 0x0
0385 0092 0418 | | Action Push_String_Extended,0x418 ; "Normal_Completion"
0387 e019 | | Load 0x0,0x19
0388 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0389 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "Install_Subsystems"
038b e019 | | Load 0x0,0x19
038c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
038d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
038e TRAP_0248:
038e 0007 | | Action Break_Optional
038f e009 | | Load 0x0,0x9
0390 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0391 e411 | | Load 0x2,0x11
0392 012f | / | Execute Any,Equal
0393 681a |h | Jump_Zero 0x3ae
0394 e003 | | Load 0x0,0x3
0395 180e | | Execute Package,Field_Execute,Field_Number 0xe
0396 4808 |H | Short_Literal 0x8
0397 4801 |H | Short_Literal 0x1
0398 4801 |H | Short_Literal 0x1
0399 e017 | | Load 0x0,0x17
039a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
039b 0092 0419 | | Action Push_String_Extended,0x419 ; " raised"
039d 01cc | | Execute Vector,Catenate
039e e00a | | Load 0x0,0xa
039f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03a0 e003 | | Load 0x0,0x3
03a1 180e | | Execute Package,Field_Execute,Field_Number 0xe
03a2 4805 |H | Short_Literal 0x5
03a3 0092 03f8 | | Action Push_String_Extended,0x3f8 ; "Step has Failed"
03a5 e00a | | Load 0x0,0xa
03a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03a7 e411 | | Load 0x2,0x11
03a8 e410 | | Load 0x2,0x10
03a9 e014 | | Load 0x0,0x14
03aa e40f | | Load 0x2,0xf
03ab 0096 | | Execute Package,Entry
03ac c411 | | Store 0x2,0x11
03ad 780c |x | Jump 0x3ba
03ae e003 | | Load 0x0,0x3
03af 180e | | Execute Package,Field_Execute,Field_Number 0xe
03b0 4808 |H | Short_Literal 0x8
03b1 4801 |H | Short_Literal 0x1
03b2 4801 |H | Short_Literal 0x1
03b3 e017 | | Load 0x0,0x17
03b4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03b5 0092 041a | | Action Push_String_Extended,0x41a ; " raised while Updating Subsystems"
03b7 01cc | | Execute Vector,Catenate
03b8 e00a | | Load 0x0,0xa
03b9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03ba 0092 041b | | Action Push_String_Extended,0x41b ; "Updating Subsystems has failed"
03bc e024 | $ | Load 0x0,0x24
03bd e40f | | Load 0x2,0xf
03be 0096 | | Execute Package,Entry
03bf 4801 |H | Short_Literal 0x1
03c0 4801 |H | Short_Literal 0x1
03c1 e017 | | Load 0x0,0x17
03c2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03c3 0092 041c | | Action Push_String_Extended,0x41c ; " installing subsystems for "
03c5 01cc | | Execute Vector,Catenate
03c6 8413 | | Call 0x2,0x13
03c7 01cc | | Execute Vector,Catenate
03c8 4802 |H | Short_Literal 0x2
03c9 0092 03fb | | Action Push_String_Extended,0x3fb ; "Unhandled_Exception"
03cb e019 | | Load 0x0,0x19
03cc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03cd 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "Install_Subsystems"
03cf e019 | | Load 0x0,0x19
03d0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03d1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03d2 ; --------------------------------------------------------------------------------------
03d2 ; STRING TABLE
03d2 ; --------------------------------------------------------------------------------------
03d2 0098 | | .STRTAB 0x0098->0x041e ; "$$.Internal."
03d3 00a2 | | .STRTAB 0x00a2->0x0424 ; "$$.Logs."
03d4 00a8 | | .STRTAB 0x00a8->0x0428 ; "$$.Lists."
03d5 00af | | .STRTAB 0x00af->0x042c ; "$$.Archives."
03d6 00b9 | | .STRTAB 0x00b9->0x0432 ; "$$.Lists.Combined_Mload"
03d7 00ce | | .STRTAB 0x00ce->0x043e ; "$$.Activity_File"
03d8 00dc | | .STRTAB 0x00dc->0x0446 ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
03d9 014d | M | .STRTAB 0x014d->0x047f ; "$$.Master_Log_File"
03da 015d | ] | .STRTAB 0x015d->0x0488 ; "$$.Logs.Install_Subsystems"
03db 0175 | u | .STRTAB 0x0175->0x0495 ; "$$.Logs.Current_Subsystem_Step"
03dc 0191 | | .STRTAB 0x0191->0x04a4 ; "[Install_Subsystems (Check_Configuration => "
03dd 01bb | | .STRTAB 0x01bb->0x04ba ; ");]"
03de 01bc | | .STRTAB 0x01bc->0x04bc ; "!Machine"
03df 01c2 | | .STRTAB 0x01c2->0x04c0 ; "?"
03e0 01c1 | | .STRTAB 0x01c1->0x04c0 ; "Install_Subsystems"
03e1 01d1 | | .STRTAB 0x01d1->0x04c9 ; "<PROFILE>"
03e2 01d8 | | .STRTAB 0x01d8->0x04ce ; "!Machine`Install_Subsystems$$[D_@]"
03e3 01f8 | | .STRTAB 0x01f8->0x04df ; "$$[D_@]"
03e4 01fd | | .STRTAB 0x01fd->0x04e2 ; "Aborting subsystems installation: could not set PRIVILEGED MODE"
03e5 023a | : | .STRTAB 0x023a->0x0502 ; "Aborting subsystems installation: Current context is not a release world."
03e6 0281 | | .STRTAB 0x0281->0x0526 ; "Aborting subsystems installation: "
03e7 02a1 | | .STRTAB 0x02a1->0x0537 ; " is not the currently running EEDB configuration."
03e8 02d0 | | .STRTAB 0x02d0->0x0550 ; "Installing Subsystems for Release "
03e9 02f0 | | .STRTAB 0x02f0->0x0561 ; "Updating Miscellaneous Universe Items"
03ea 0313 | | .STRTAB 0x0313->0x0573 ; "$$.Lists.Init_Procs_To_Delete"
03eb 032e | . | .STRTAB 0x032e->0x0582 ; "Running COMP.DESTROY on Initialize Delete file"
03ec 035a | Z | .STRTAB 0x035a->0x0599 ; "<ERRORS>"
03ed 0360 | ` | .STRTAB 0x0360->0x059d ; "_$$.Lists.Init_Procs_To_Delete"
03ee 037c | | | .STRTAB 0x037c->0x05ac ; "<WORLDS>"
03ef 0382 | | .STRTAB 0x0382->0x05b0 ; "$$.Lists.Init_Procs_Deleted"
03f0 039b | | .STRTAB 0x039b->0x05bd ; "$$.Lists.Init_Procs_To_Change"
03f1 03b6 | | .STRTAB 0x03b6->0x05cc ; "Demoting Changed Initialize Procedures"
03f2 03da | | .STRTAB 0x03da->0x05df ; "_$$.Lists.Init_Procs_To_Change"
03f3 03f6 | | .STRTAB 0x03f6->0x05ee ; "Running Snapshot Daemon"
03f4 040b | | .STRTAB 0x040b->0x05f9 ; "snap"
03f5 040d | | .STRTAB 0x040d->0x05fb ; "Install_Subsystems has completed"
03f6 042b | + | .STRTAB 0x042b->0x060b ; "[Install_Subsystems has completed]"
03f7 044b | K | .STRTAB 0x044b->0x061c ; " raised installing release"
03f8 0463 | c | .STRTAB 0x0463->0x0629 ; "Step has Failed"
03f9 0470 | p | .STRTAB 0x0470->0x0631 ; "Install_Universe has failed"
03fa 0489 | | .STRTAB 0x0489->0x063e ; " installing "
03fb 0493 | | .STRTAB 0x0493->0x0644 ; "Unhandled_Exception"
03fc 04a4 | | .STRTAB 0x04a4->0x064e ; "Install_Subsystems has failed"
03fd 04bf | | .STRTAB 0x04bf->0x065c ; "$$"
03fe 04bf | | .STRTAB 0x04bf->0x065d ; "_"
03ff 04be | | .STRTAB 0x04be->0x065e ; "Updating the Subsystems"
0400 04d3 | | .STRTAB 0x04d3->0x0669 ; " subsystems"
0401 04dc | | .STRTAB 0x04dc->0x066f ; "Beginning_Upgrade"
0402 04eb | | .STRTAB 0x04eb->0x0677 ; "Fixing Standard Models"
0403 04ff | | .STRTAB 0x04ff->0x0682 ; "!"
0404 04fe | | .STRTAB 0x04fe->0x0683 ; "Checking Subsystem Target Keys"
0405 051a | | .STRTAB 0x051a->0x0692 ; "$$.Lists..Subsystem_List"
0406 0530 | 0 | .STRTAB 0x0530->0x069e ; "$$.Internal.$$.Archives.Subsystems"
0407 0550 | P | .STRTAB 0x0550->0x06af ; "$$.Internal.$$.Lists..Subsystem_List"
0408 0572 | r | .STRTAB 0x0572->0x06c1 ; "Restoring New Subsystems"
0409 0588 | | .STRTAB 0x0588->0x06cd ; "$$.Archives.Subsystems"
040a 059c | | .STRTAB 0x059c->0x06d8 ; "new, replace, remake, coded"
040b 05b5 | | .STRTAB 0x05b5->0x06e5 ; "*"
040c 05b4 | | .STRTAB 0x05b4->0x06e6 ; "Restoring Internal Tools"
040d 05ca | | .STRTAB 0x05ca->0x06f2 ; "$$.Internal.$$.Activity_File"
040e 05e4 | | .STRTAB 0x05e4->0x0700 ; "Installing New Subsystems and Recoding Main Procedures"
040f 0618 | | .STRTAB 0x0618->0x071b ; "!Machine.Release.Current.Commands"
0410 0637 | 7 | .STRTAB 0x0637->0x072b ; "!Machine.Release.Current.Activity"
0411 0656 | V | .STRTAB 0x0656->0x073c ; "Installing System_Maintenance.Current_Combined_Mload"
0412 0688 | | .STRTAB 0x0688->0x0756 ; "!Commands.System_Maintenance.[, Current_Combined_Mload]"
0413 06bd | | .STRTAB 0x06bd->0x0771 ; "!Commands.System_Maintenance.Current_Combined_Mload"
0414 06ee | | .STRTAB 0x06ee->0x078b ; "$$.Archives.Subsystem_Miscellany"
0415 070c | | .STRTAB 0x070c->0x079b ; "Restoring Miscellaneous Subsystem Components"
0416 0736 | 6 | .STRTAB 0x0736->0x07b1 ; "R1000, Changed, Replace, Remake"
0417 0753 | S | .STRTAB 0x0753->0x07c0 ; " subsystem upgrade is completed."
0418 0771 | q | .STRTAB 0x0771->0x07d0 ; "Normal_Completion"
0419 0780 | | .STRTAB 0x0780->0x07d9 ; " raised"
041a 0785 | | .STRTAB 0x0785->0x07dc ; " raised while Updating Subsystems"
041b 07a4 | | .STRTAB 0x07a4->0x07ed ; "Updating Subsystems has failed"
041c 07c0 | | .STRTAB 0x07c0->0x07fc ; " installing subsystems for "
041d 07d9 | | .STREND 0x07d9->0x0809
041e 2424 2e49 |$$.I| .STRTAB_STRINGS
080a 0000 0000 | | .BLANK 0000[0x6]
0810 ; --------------------------------------------------------------------------------------
0810 ; Debug Table
0810 ; --------------------------------------------------------------------------------------
0810 0004 0002 | | .DEBUG4 0x0004,0x0002,0x28b4,0x0000,0x0001,0x0000
0816 c0c1 0d14 | | .XXX[0x1ea]
0818 c8c0 d915 | |
081a 1919 18e0 | |
081c dcc0 c0c0 | |
081e e508 294c | )L|
0820 ccc4 c514 | |
0822 c0c0 c0d9 | |
0824 0d18 d0c4 | |
0826 c0c8 e0c0 | |
0828 c0c0 c8d0 | |
082a d518 d0c0 | |
082c e0c0 c0d4 | |
082e cce1 04d0 | |
0830 e0dc e0e4 | |
0832 d829 4ccc | )L |
0834 c4c5 14c0 | |
0836 c0c0 d910 | |
0838 c0c0 c0c0 | |
083a c0d0 d0e0 | |
083c d915 1919 | |
083e 18d0 d0e0 | |
0840 d4c8 d115 | |
0842 08e5 14c0 | |
0844 c0c4 dcc8 | |
0846 294c ccc4 |)L |
0848 c514 c0c0 | |
084a c0d9 10c1 | |
084c 0cd8 d518 | |
084e d0d1 1915 | |
0850 18c0 c0c1 | |
0852 0cc8 c0d9 | |
0854 1519 1918 | |
0856 e0dc c0c0 | |
0858 c119 1029 | )|
085a 4ccc c4c5 |L |
085c 14c0 c0c0 | |
085e d910 c4e0 | |
0860 c4c0 c8e0 | |
0862 c0c0 c0cc | |
0864 c0c8 c0c0 | |
0866 c0c0 c118 | |
0868 d104 e0c0 | |
086a d8dc dcc0 | |
086c e50c 294c | )L|
086e ccc4 c514 | |
0870 c0c0 c0d9 | |
0872 10c8 d0dc | |
0874 c8c0 c508 | |
0876 c0e0 c4d8 | |
0878 dccc d0dc | |
087a c8c0 cd08 | |
087c c0e0 c4d8 | |
087e d8c0 c0cc | |
0880 c829 4ccc | )L |
0882 c4c5 14c0 | |
0884 c0c0 d910 | |
0886 ccc0 c0c0 | |
0888 e104 c918 | |
088a c915 1919 | |
088c 18d0 d115 | |
088e 08e5 14c0 | |
0890 c0c0 e109 | |
0892 1104 d108 | |
0894 294c ccc4 |)L |
0896 c514 c0c0 | |
0898 c0d9 10cd | |
089a 0cd4 e0d1 | |
089c 18d1 04e0 | |
089e c0d8 dcc0 | |
08a0 c0c0 c104 | |
08a2 c8d4 e0d1 | |
08a4 04c8 c0d9 | |
08a6 1509 0829 | )|
08a8 4ccc c4c5 |L |
08aa 14c0 c0c0 | |
08ac d910 d0e1 | |
08ae 1919 18e0 | |
08b0 dcc0 c0c0 | |
08b2 c4c0 c8e0 | |
08b4 c0c0 c0c8 | |
08b6 d4e0 e0c0 | |
08b8 dcc8 c0c0 | |
08ba d914 294c | )L|
08bc ccc4 c514 | |
08be c0c0 c0d9 | |
08c0 10d4 d0c4 | |
08c2 c8c8 e0c0 | |
08c4 c0c0 c508 | |
08c6 c0e0 c4d8 | |
08c8 c8d5 14d8 | |
08ca c0c9 14c9 | |
08cc 10d9 1118 | |
08ce e429 4ccc | )L |
08d0 c4c5 14c0 | |
08d2 c0c0 d910 | |
08d4 d8c0 c0c0 | |
08d6 c4c1 1919 | |
08d8 18d0 d0e0 | |
08da d915 1919 | |
08dc 18d0 d0e0 | |
08de dce0 c0c0 | |
08e0 d8d4 dcc0 | |
08e2 294c ccc4 |)L |
08e4 c514 c0c0 | |
08e6 c0d9 10d9 | |
08e8 0cd0 c904 | |
08ea dcd8 c4c0 | |
08ec c115 14c8 | |
08ee e0d1 1915 | |
08f0 18c0 c0c1 | |
08f2 0cd0 e0dc | |
08f4 e10d 0829 | )|
08f6 4ccc c4c5 |L |
08f8 14c0 c0c0 | |
08fa d910 dce0 | |
08fc c0c0 c0d0 | |
08fe d0e0 d4c8 | |
0900 d0e0 d915 | |
0902 1919 18d0 | |
0904 d115 08e5 | |
0906 14c0 c0c5 | |
0908 1904 294c | )L|
090a ccc4 c514 | |
090c c0c0 c0d9 | |
090e 10e0 d0d8 | |
0910 d518 d0d1 | |
0912 1915 18c0 | |
0914 c0c1 0cd4 | |
0916 e0e1 04c8 | |
0918 c0d9 1519 | |
091a 1918 e0c4 | |
091c cc29 4ccc | )L |
091e c4c5 14c0 | |
0920 c0c0 d910 | |
0922 e4c0 d4e0 | |
0924 c8e0 c0c0 | |
0926 c0c8 d115 | |
0928 08e5 14c0 | |
092a c0c4 e0d0 | |
092c d914 c0c0 | |
092e e0c0 ccd4 | |
0930 294c ccc4 |)L |
0932 c514 c0c0 | |
0934 c0d9 10e5 | |
0936 0ce0 c0c0 | |
0938 c0c0 c0c0 | |
093a c0c9 10d0 | |
093c c119 1915 | |
093e 0cd0 e0dc | |
0940 e0c0 c0c0 | |
0942 d0d8 e429 | )|
0944 4ccc c4c5 |L |
0946 14c0 c0c0 | |
0948 d911 04e0 | |
094a d0e0 d4c8 | |
094c d0e0 d915 | |
094e 1919 150c | |
0950 d115 08e5 | |
0952 14c0 c0c4 | |
0954 d8d5 18d0 | |
0956 dd10 294c | )L|
0958 ccc4 c514 | |
095a c0c0 c0d9 | |
095c 1108 d0d1 | |
095e 1915 18c0 | |
0960 c0c1 0cd8 | |
0962 c0c9 04e4 | |
0964 e50d 10c9 | |
0966 10d1 0d19 | |
0968 1915 0cd1 | |
096a 1829 4ccc | )L |
096c c4c5 14c0 | |
096e c0c0 d911 | |
0970 0cc0 c8c0 | |
0972 c10c dcc8 | |
0974 c4e1 14cd | |
0976 04c0 c918 | |
0978 c0c0 d0c9 | |
097a 04dc d0e0 | |
097c d4d5 18cc | |
097e 294c ccc4 |)L |
0980 c514 c0c0 | |
0982 c0d9 110d | |
0984 0cd1 1508 | |
0986 e514 c0c0 | |
0988 c0d4 dd09 | |
098a 0cd1 1915 | |
098c 18c0 c0c1 | |
098e 0cdc c0c0 | |
0990 c0c8 c429 | )|
0992 4ccc c4c5 |L |
0994 14c0 c0c0 | |
0996 d911 10e0 | |
0998 d8c0 c4d8 | |
099a e0e4 e0e0 | |
099c e0d4 e0cc | |
099e e0c8 d0d0 | |
09a0 c0dc c0c4 | |
09a2 c0c0 c0c0 | |
09a4 d90c 294c | )L|
09a6 ccc4 c514 | |
09a8 c0c0 c0d9 | |
09aa 1114 d110 | |
09ac e50c d8e5 | |
09ae 14e0 d8d1 | |
09b0 04e0 dcd9 | |
09b2 14c0 c119 | |
09b4 0d18 c0dc | |
09b6 c0c0 c4d5 | |
09b8 1429 4ccc | )L |
09ba c4c5 14c0 | |
09bc c0c0 d911 | |
09be 18c0 d10d | |
09c0 1514 cd0d | |
09c2 0cc1 1919 | |
09c4 0d0c d114 | |
09c6 d514 d114 | |
09c8 dcd4 d114 | |
09ca d4d8 e510 | |
09cc 294c ccc4 |)L |
09ce c514 c0c0 | |
09d0 c0d9 1119 | |
09d2 0d19 1915 | |
09d4 0cd0 e110 | |
09d6 dccc e0c0 | |
09d8 c0c9 04d9 | |
09da 14c0 c0c4 | |
09dc c0c1 0d05 | |
09de 14c0 c429 | )|
09e0 4ccc c4c5 |L |
09e2 14c0 c0c0 | |
09e4 d914 c0e0 | |
09e6 c0c0 c0c0 | |
09e8 d0e4 c0dc | |
09ea c0c0 c10c | |
09ec d8d8 d514 | |
09ee d0c9 0515 | |
09f0 1919 190c | |
09f2 e110 294c | )L|
09f4 ccc4 c514 | |
09f6 c0c0 c0d9 | |
09f8 14c4 d0c9 | |
09fa 10d1 1119 | |
09fc 1918 e0d4 | |
09fe c0e1 10c8 | |