|
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: 3072 (0xc00)
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 0450 | P | .CONST 0x0450 ; 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 8002 | | .CONST 0x8002 ; 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 006f | o | .CONST 0x006f ; Address of begin
0019 021c | | .CONST 0x021c ; Address of exception handler
001a 0013 | | .CONST 0x0013 ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1
001c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
001d e002 | | Load 0x0,0x2
001e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001f 02c7 | | Declare_Variable Any
0020 e002 | | Load 0x0,0x2
0021 180e | | Execute Package,Field_Execute,Field_Number 0xe
0022 a403 | | Store_Unchecked 0x2,0x3
0023 e002 | | Load 0x0,0x2
0024 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0025 02c7 | | Declare_Variable Any
0026 0092 0256 | V| Action Push_String_Extended,0x256 ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
0028 e002 | | Load 0x0,0x2
0029 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
002a a404 | | Store_Unchecked 0x2,0x4
002b 0092 0257 | W| Action Push_String_Extended,0x257 ; "$$.Master_Log_File"
002d 485f |H_ | Short_Literal 0x5f
002e 4800 |H | Short_Literal 0x0
002f 4803 |H | Short_Literal 0x3
0030 4804 |H | Short_Literal 0x4
0031 e003 | | Load 0x0,0x3
0032 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0033 e003 | | Load 0x0,0x3
0034 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0035 01ca | | Execute Vector,Prepend
0036 0007 | | Action Break_Optional
0037 0092 0258 | X| Action Push_String_Extended,0x258 ; "$$.Logs.Install_Universe"
0039 00d9 | | Load_Top At_Offset_1
003a 01cc | | Execute Vector,Catenate
003b 0007 | | Action Break_Optional
003c e004 | | Load 0x0,0x4
003d e005 | | Load 0x0,0x5
003e e405 | | Load 0x2,0x5
003f 00db | | Load_Top At_Offset_3
0040 e006 | | Load 0x0,0x6
0041 0387 | | Declare_Variable Package
0042 00d8 | | Load_Top At_Offset_0
0043 020f | | Execute Module,Activate
0044 0092 0259 | Y| Action Push_String_Extended,0x259 ; "$$.Lists.Demote_Specs"
0046 00db | | Load_Top At_Offset_3
0047 01cc | | Execute Vector,Catenate
0048 0007 | | Action Break_Optional
0049 0092 025a | Z| Action Push_String_Extended,0x25a ; "$$.Lists.Install_Specs"
004b e406 | | Load 0x2,0x6
004c 01cc | | Execute Vector,Catenate
004d 0007 | | Action Break_Optional
004e 0092 025b | [| Action Push_String_Extended,0x25b ; "$$.Lists.Code_Specs"
0050 e406 | | Load 0x2,0x6
0051 01cc | | Execute Vector,Catenate
0052 0007 | | Action Break_Optional
0053 0092 025c | \| Action Push_String_Extended,0x25c ; "$$.Lists.Freeze_Specs"
0055 e406 | | Load 0x2,0x6
0056 01cc | | Execute Vector,Catenate
0057 0007 | | Action Break_Optional
0058 0092 025d | ]| Action Push_String_Extended,0x25d ; "$$.Lists.Acls_list"
005a e406 | | Load 0x2,0x6
005b 01cc | | Execute Vector,Catenate
005c 0007 | | Action Break_Optional
005d e5ff | | Load 0x2,-0x1
005e e007 | | Load 0x0,0x7
005f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0060 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0061 4801 |H | Short_Literal 0x1
0062 e5ff | | Load 0x2,-0x1
0063 8008 | | Call 0x0,0x8
0064 0092 025e | ^| Action Push_String_Extended,0x25e ; "$$.Logs.Current_Universe_Step"
0066 e009 | | Load 0x0,0x9
0067 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0068 02c7 | | Declare_Variable Any
0069 00d8 | | Load_Top At_Offset_0
006a 1c00 | | Execute_Immediate Run_Utility,0x0
006b 00e1 | | Load_Encached Boolean_Cache
006c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
006d 00e1 | | Load_Encached Boolean_Cache
006e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
006f BODY_0018:
006f e40e | | Load 0x2,0xe
0070 0092 025f | _| Action Push_String_Extended,0x25f ; "Updated_Units"
0072 01df | | Execute Vector,Equal
0073 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0074 00d9 | | Load_Top At_Offset_1
0075 7011 |p | Jump_Nonzero 0x87
0076 e002 | | Load 0x0,0x2
0077 180e | | Execute Package,Field_Execute,Field_Number 0xe
0078 4800 |H | Short_Literal 0x0
0079 0092 0260 | `| Action Push_String_Extended,0x260 ; "[Install_Universe (Units_List => \x22"
007b e5ff | | Load 0x2,-0x1
007c 01cc | | Execute Vector,Catenate
007d 0092 0261 | a| Action Push_String_Extended,0x261 ; "\x22, Device => \x22"
007f 01cc | | Execute Vector,Catenate
0080 e5fe | | Load 0x2,-0x2
0081 01cc | | Execute Vector,Catenate
0082 0092 0262 | b| Action Push_String_Extended,0x262 ; "\x22);]"
0084 01cc | | Execute Vector,Catenate
0085 e00a | | Load 0x0,0xa
0086 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0087 e404 | | Load 0x2,0x4
0088 e002 | | Load 0x0,0x2
0089 1810 | | Execute Package,Field_Execute,Field_Number 0x10
008a 00d9 | | Load_Top At_Offset_1
008b 6804 |h | Jump_Zero 0x90
008c 00ea | | Load_Encached Null_String_Cache
008d e408 | | Load 0x2,0x8
008e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
008f 7806 |x | Jump 0x96
0090 0092 0263 | c| Action Push_String_Extended,0x263 ; "Installing the units listed in "
0092 e40e | | Load 0x2,0xe
0093 01cc | | Execute Vector,Catenate
0094 e408 | | Load 0x2,0x8
0095 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0096 4801 |H | Short_Literal 0x1
0097 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0098 e40f | | Load 0x2,0xf
0099 0092 0264 | d| Action Push_String_Extended,0x264 ; "[]"
009b 01df | | Execute Vector,Equal
009c 6805 |h | Jump_Zero 0xa2
009d 0092 0265 | e| Action Push_String_Extended,0x265 ; "No units to be Restored"
009f e408 | | Load 0x2,0x8
00a0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00a1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00a2 0092 0266 | f| Action Push_String_Extended,0x266 ; "Install_Universe"
00a4 800b | | Call 0x0,0xb
00a5 695a |iZ | Jump_Zero 0x200
00a6 00da | | Load_Top At_Offset_2
00a7 0120 | | Execute Any,Is_Value
00a8 6803 |h | Jump_Zero 0xac
00a9 e009 | | Load 0x0,0x9
00aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ab 7801 |x | Jump 0xad
00ac 00da | | Load_Top At_Offset_2
00ad e410 | | Load 0x2,0x10
00ae 0092 0267 | g| Action Push_String_Extended,0x267 ; "Computing Compilation Dependencies for "
00b0 e40e | | Load 0x2,0xe
00b1 01cc | | Execute Vector,Catenate
00b2 e408 | | Load 0x2,0x8
00b3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00b4 c411 | | Store 0x2,0x11
00b5 e002 | | Load 0x0,0x2
00b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b7 4802 |H | Short_Literal 0x2
00b8 0092 0268 | h| Action Push_String_Extended,0x268 ; "Computing Recoding for !"
00ba e40f | | Load 0x2,0xf
00bb 01cc | | Execute Vector,Catenate
00bc e00a | | Load 0x0,0xa
00bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00be 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
00c0 e40c | | Load 0x2,0xc
00c1 e40b | | Load 0x2,0xb
00c2 e40a | | Load 0x2,0xa
00c3 e409 | | Load 0x2,0x9
00c4 0092 026a | j| Action Push_String_Extended,0x26a ; "!"
00c6 e40f | | Load 0x2,0xf
00c7 01cc | | Execute Vector,Catenate
00c8 800c | | Call 0x0,0xc
00c9 00da | | Load_Top At_Offset_2
00ca e410 | | Load 0x2,0x10
00cb e408 | | Load 0x2,0x8
00cc 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00cd c411 | | Store 0x2,0x11
00ce 00da | | Load_Top At_Offset_2
00cf 0120 | | Execute Any,Is_Value
00d0 6803 |h | Jump_Zero 0xd4
00d1 e009 | | Load 0x0,0x9
00d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d3 7801 |x | Jump 0xd5
00d4 00da | | Load_Top At_Offset_2
00d5 e410 | | Load 0x2,0x10
00d6 0092 026b | k| Action Push_String_Extended,0x26b ; "Saving ACLs on "
00d8 e40e | | Load 0x2,0xe
00d9 01cc | | Execute Vector,Catenate
00da e408 | | Load 0x2,0x8
00db 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00dc c411 | | Store 0x2,0x11
00dd e002 | | Load 0x0,0x2
00de 180e | | Execute Package,Field_Execute,Field_Number 0xe
00df 4802 |H | Short_Literal 0x2
00e0 0092 026c | l| Action Push_String_Extended,0x26c ; "Saving Access_Lists for !"
00e2 e40f | | Load 0x2,0xf
00e3 01cc | | Execute Vector,Catenate
00e4 e00a | | Load 0x0,0xa
00e5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00e6 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
00e8 e40d | | Load 0x2,0xd
00e9 0092 026a | j| Action Push_String_Extended,0x26a ; "!"
00eb e40f | | Load 0x2,0xf
00ec 01cc | | Execute Vector,Catenate
00ed 800d | | Call 0x0,0xd
00ee 00da | | Load_Top At_Offset_2
00ef e410 | | Load 0x2,0x10
00f0 e408 | | Load 0x2,0x8
00f1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00f2 c411 | | Store 0x2,0x11
00f3 e40c | | Load 0x2,0xc
00f4 800e | | Call 0x0,0xe
00f5 701d |p | Jump_Nonzero 0x113
00f6 00da | | Load_Top At_Offset_2
00f7 0120 | | Execute Any,Is_Value
00f8 6803 |h | Jump_Zero 0xfc
00f9 e009 | | Load 0x0,0x9
00fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fb 7801 |x | Jump 0xfd
00fc 00da | | Load_Top At_Offset_2
00fd e410 | | Load 0x2,0x10
00fe 0092 026d | m| Action Push_String_Extended,0x26d ; "Unfreezing Clients of "
0100 e40e | | Load 0x2,0xe
0101 01cc | | Execute Vector,Catenate
0102 e408 | | Load 0x2,0x8
0103 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0104 c411 | | Store 0x2,0x11
0105 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
0107 4800 |H | Short_Literal 0x0
0108 0092 026e | n| Action Push_String_Extended,0x26e ; "_"
010a e40c | | Load 0x2,0xc
010b 01cc | | Execute Vector,Catenate
010c e00f | | Load 0x0,0xf
010d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
010e 00da | | Load_Top At_Offset_2
010f e410 | | Load 0x2,0x10
0110 e408 | | Load 0x2,0x8
0111 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0112 c411 | | Store 0x2,0x11
0113 e409 | | Load 0x2,0x9
0114 800e | | Call 0x0,0xe
0115 7020 |p | Jump_Nonzero 0x136
0116 00da | | Load_Top At_Offset_2
0117 0120 | | Execute Any,Is_Value
0118 6803 |h | Jump_Zero 0x11c
0119 e009 | | Load 0x0,0x9
011a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011b 7801 |x | Jump 0x11d
011c 00da | | Load_Top At_Offset_2
011d e410 | | Load 0x2,0x10
011e 0092 026f | o| Action Push_String_Extended,0x26f ; "Demoting Clients of "
0120 e40e | | Load 0x2,0xe
0121 01cc | | Execute Vector,Catenate
0122 e408 | | Load 0x2,0x8
0123 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0124 c411 | | Store 0x2,0x11
0125 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
0127 4800 |H | Short_Literal 0x0
0128 0092 0270 | p| Action Push_String_Extended,0x270 ; "<ALL_WORLDS>"
012a 4801 |H | Short_Literal 0x1
012b 0092 026e | n| Action Push_String_Extended,0x26e ; "_"
012d e409 | | Load 0x2,0x9
012e 01cc | | Execute Vector,Catenate
012f e010 | | Load 0x0,0x10
0130 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0131 00da | | Load_Top At_Offset_2
0132 e410 | | Load 0x2,0x10
0133 e408 | | Load 0x2,0x8
0134 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0135 c411 | | Store 0x2,0x11
0136 00da | | Load_Top At_Offset_2
0137 0120 | | Execute Any,Is_Value
0138 6803 |h | Jump_Zero 0x13c
0139 e009 | | Load 0x0,0x9
013a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
013b 7801 |x | Jump 0x13d
013c 00da | | Load_Top At_Offset_2
013d e410 | | Load 0x2,0x10
013e 0092 0271 | q| Action Push_String_Extended,0x271 ; "Replacing "
0140 e40e | | Load 0x2,0xe
0141 01cc | | Execute Vector,Catenate
0142 e408 | | Load 0x2,0x8
0143 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0144 c411 | | Store 0x2,0x11
0145 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
0147 e5fe | | Load 0x2,-0x2
0148 0092 0272 | r| Action Push_String_Extended,0x272 ; "Replace, Remake"
014a 0092 0273 | s| Action Push_String_Extended,0x273 ; "*"
014c 0092 026a | j| Action Push_String_Extended,0x26a ; "!"
014e 0092 0274 | t| Action Push_String_Extended,0x274 ; "?"
0150 e40f | | Load 0x2,0xf
0151 01cc | | Execute Vector,Catenate
0152 e011 | | Load 0x0,0x11
0153 180e | | Execute Package,Field_Execute,Field_Number 0xe
0154 00da | | Load_Top At_Offset_2
0155 e410 | | Load 0x2,0x10
0156 e408 | | Load 0x2,0x8
0157 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0158 c411 | | Store 0x2,0x11
0159 e40a | | Load 0x2,0xa
015a 800e | | Call 0x0,0xe
015b 7024 |p$ | Jump_Nonzero 0x180
015c 00da | | Load_Top At_Offset_2
015d 0120 | | Execute Any,Is_Value
015e 6803 |h | Jump_Zero 0x162
015f e009 | | Load 0x0,0x9
0160 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0161 7801 |x | Jump 0x163
0162 00da | | Load_Top At_Offset_2
0163 e410 | | Load 0x2,0x10
0164 0092 0275 | u| Action Push_String_Extended,0x275 ; "Installing Demoted Clients of "
0166 e40e | | Load 0x2,0xe
0167 01cc | | Execute Vector,Catenate
0168 e408 | | Load 0x2,0x8
0169 1819 | | Execute Package,Field_Execute,Field_Number 0x19
016a c411 | | Store 0x2,0x11
016b 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
016d 4800 |H | Short_Literal 0x0
016e 0092 0270 | p| Action Push_String_Extended,0x270 ; "<ALL_WORLDS>"
0170 4802 |H | Short_Literal 0x2
0171 4802 |H | Short_Literal 0x2
0172 0092 0276 | v| Action Push_String_Extended,0x276 ; "[_"
0174 e40a | | Load 0x2,0xa
0175 01cc | | Execute Vector,Catenate
0176 0092 0277 | w| Action Push_String_Extended,0x277 ; ", ~!tools.rpc.rev9_1_5??]"
0178 01cc | | Execute Vector,Catenate
0179 e010 | | Load 0x0,0x10
017a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
017b 00da | | Load_Top At_Offset_2
017c e410 | | Load 0x2,0x10
017d e408 | | Load 0x2,0x8
017e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
017f c411 | | Store 0x2,0x11
0180 e40b | | Load 0x2,0xb
0181 800e | | Call 0x0,0xe
0182 7024 |p$ | Jump_Nonzero 0x1a7
0183 00da | | Load_Top At_Offset_2
0184 0120 | | Execute Any,Is_Value
0185 6803 |h | Jump_Zero 0x189
0186 e009 | | Load 0x0,0x9
0187 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0188 7801 |x | Jump 0x18a
0189 00da | | Load_Top At_Offset_2
018a e410 | | Load 0x2,0x10
018b 0092 0278 | x| Action Push_String_Extended,0x278 ; "Coding Demoted Clients of "
018d e40e | | Load 0x2,0xe
018e 01cc | | Execute Vector,Catenate
018f e408 | | Load 0x2,0x8
0190 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0191 c411 | | Store 0x2,0x11
0192 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
0194 4800 |H | Short_Literal 0x0
0195 0092 0270 | p| Action Push_String_Extended,0x270 ; "<ALL_WORLDS>"
0197 4803 |H | Short_Literal 0x3
0198 4802 |H | Short_Literal 0x2
0199 0092 0276 | v| Action Push_String_Extended,0x276 ; "[_"
019b e40b | | Load 0x2,0xb
019c 01cc | | Execute Vector,Catenate
019d 0092 0277 | w| Action Push_String_Extended,0x277 ; ", ~!tools.rpc.rev9_1_5??]"
019f 01cc | | Execute Vector,Catenate
01a0 e010 | | Load 0x0,0x10
01a1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01a2 00da | | Load_Top At_Offset_2
01a3 e410 | | Load 0x2,0x10
01a4 e408 | | Load 0x2,0x8
01a5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01a6 c411 | | Store 0x2,0x11
01a7 e40c | | Load 0x2,0xc
01a8 800e | | Call 0x0,0xe
01a9 701d |p | Jump_Nonzero 0x1c7
01aa 00da | | Load_Top At_Offset_2
01ab 0120 | | Execute Any,Is_Value
01ac 6803 |h | Jump_Zero 0x1b0
01ad e009 | | Load 0x0,0x9
01ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01af 7801 |x | Jump 0x1b1
01b0 00da | | Load_Top At_Offset_2
01b1 e410 | | Load 0x2,0x10
01b2 0092 0279 | y| Action Push_String_Extended,0x279 ; "Refreezing Clients of "
01b4 e40e | | Load 0x2,0xe
01b5 01cc | | Execute Vector,Catenate
01b6 e408 | | Load 0x2,0x8
01b7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01b8 c411 | | Store 0x2,0x11
01b9 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
01bb 4800 |H | Short_Literal 0x0
01bc 0092 026e | n| Action Push_String_Extended,0x26e ; "_"
01be e40c | | Load 0x2,0xc
01bf 01cc | | Execute Vector,Catenate
01c0 e00f | | Load 0x0,0xf
01c1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01c2 00da | | Load_Top At_Offset_2
01c3 e410 | | Load 0x2,0x10
01c4 e408 | | Load 0x2,0x8
01c5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01c6 c411 | | Store 0x2,0x11
01c7 00da | | Load_Top At_Offset_2
01c8 0120 | | Execute Any,Is_Value
01c9 6803 |h | Jump_Zero 0x1cd
01ca e009 | | Load 0x0,0x9
01cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cc 7801 |x | Jump 0x1ce
01cd 00da | | Load_Top At_Offset_2
01ce e410 | | Load 0x2,0x10
01cf 0092 027a | z| Action Push_String_Extended,0x27a ; "Restoring Acls on "
01d1 e40e | | Load 0x2,0xe
01d2 01cc | | Execute Vector,Catenate
01d3 e408 | | Load 0x2,0x8
01d4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01d5 c411 | | Store 0x2,0x11
01d6 e002 | | Load 0x0,0x2
01d7 180e | | Execute Package,Field_Execute,Field_Number 0xe
01d8 4802 |H | Short_Literal 0x2
01d9 0092 027b | {| Action Push_String_Extended,0x27b ; "Restoring Access_Lists from "
01db e40d | | Load 0x2,0xd
01dc 01cc | | Execute Vector,Catenate
01dd e00a | | Load 0x0,0xa
01de 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01df 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
01e1 e40d | | Load 0x2,0xd
01e2 8012 | | Call 0x0,0x12
01e3 00da | | Load_Top At_Offset_2
01e4 e410 | | Load 0x2,0x10
01e5 e408 | | Load 0x2,0x8
01e6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01e7 c411 | | Store 0x2,0x11
01e8 00da | | Load_Top At_Offset_2
01e9 0120 | | Execute Any,Is_Value
01ea 6803 |h | Jump_Zero 0x1ee
01eb e009 | | Load 0x0,0x9
01ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ed 7801 |x | Jump 0x1ef
01ee 00da | | Load_Top At_Offset_2
01ef e410 | | Load 0x2,0x10
01f0 0092 027c | || Action Push_String_Extended,0x27c ; "Running Snapshot Daemon"
01f2 e408 | | Load 0x2,0x8
01f3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01f4 c411 | | Store 0x2,0x11
01f5 0092 0269 | i| Action Push_String_Extended,0x269 ; "<PROFILE>"
01f7 0092 027d | }| Action Push_String_Extended,0x27d ; "snapshot"
01f9 e013 | | Load 0x0,0x13
01fa 180e | | Execute Package,Field_Execute,Field_Number 0xe
01fb 00da | | Load_Top At_Offset_2
01fc e410 | | Load 0x2,0x10
01fd e408 | | Load 0x2,0x8
01fe 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01ff c411 | | Store 0x2,0x11
0200 00d9 | | Load_Top At_Offset_1
0201 6804 |h | Jump_Zero 0x206
0202 00ea | | Load_Encached Null_String_Cache
0203 e408 | | Load 0x2,0x8
0204 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0205 7804 |x | Jump 0x20a
0206 0092 027e | ~| Action Push_String_Extended,0x27e ; "Install_Universe has completed"
0208 e408 | | Load 0x2,0x8
0209 1812 | | Execute Package,Field_Execute,Field_Number 0x12
020a 4800 |H | Short_Literal 0x0
020b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
020c e403 | | Load 0x2,0x3
020d e002 | | Load 0x0,0x2
020e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
020f e402 | | Load 0x2,0x2
0210 e001 | | Load 0x0,0x1
0211 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0212 00d9 | | Load_Top At_Offset_1
0213 7007 |p | Jump_Nonzero 0x21b
0214 e002 | | Load 0x0,0x2
0215 180e | | Execute Package,Field_Execute,Field_Number 0xe
0216 4800 |H | Short_Literal 0x0
0217 0092 027f | | Action Push_String_Extended,0x27f ; "[Install_Universe has completed]"
0219 e00a | | Load 0x0,0xa
021a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
021b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
021c TRAP_0018:
021c 0007 | | Action Break_Optional
021d e002 | | Load 0x0,0x2
021e 180e | | Execute Package,Field_Execute,Field_Number 0xe
021f 4808 |H | Short_Literal 0x8
0220 4801 |H | Short_Literal 0x1
0221 4801 |H | Short_Literal 0x1
0222 e014 | | Load 0x0,0x14
0223 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0224 0092 0280 | | Action Push_String_Extended,0x280 ; " raised"
0226 01cc | | Execute Vector,Catenate
0227 e00a | | Load 0x0,0xa
0228 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0229 e009 | | Load 0x0,0x9
022a 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
022b e411 | | Load 0x2,0x11
022c 012f | / | Execute Any,Equal
022d 680c |h | Jump_Zero 0x23a
022e e002 | | Load 0x0,0x2
022f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0230 4805 |H | Short_Literal 0x5
0231 0092 0281 | | Action Push_String_Extended,0x281 ; "Step has Failed"
0233 e00a | | Load 0x0,0xa
0234 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0235 00db | | Load_Top At_Offset_3
0236 e410 | | Load 0x2,0x10
0237 e408 | | Load 0x2,0x8
0238 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0239 c411 | | Store 0x2,0x11
023a 00da | | Load_Top At_Offset_2
023b 680d |h | Jump_Zero 0x249
023c 00d9 | | Load_Top At_Offset_1
023d 6803 |h | Jump_Zero 0x241
023e 00ea | | Load_Encached Null_String_Cache
023f e408 | | Load 0x2,0x8
0240 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0241 e403 | | Load 0x2,0x3
0242 e002 | | Load 0x0,0x2
0243 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0244 e402 | | Load 0x2,0x2
0245 e001 | | Load 0x0,0x1
0246 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0247 00d8 | | Load_Top At_Offset_0
0248 0101 | | Execute Exception,Reraise
0249 00d9 | | Load_Top At_Offset_1
024a 6804 |h | Jump_Zero 0x24f
024b 0092 0282 | | Action Push_String_Extended,0x282 ; "Install_Universe has failed"
024d e408 | | Load 0x2,0x8
024e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
024f e403 | | Load 0x2,0x3
0250 e002 | | Load 0x0,0x2
0251 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0252 e402 | | Load 0x2,0x2
0253 e001 | | Load 0x0,0x1
0254 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0255 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0256 ; --------------------------------------------------------------------------------------
0256 ; STRING TABLE
0256 ; --------------------------------------------------------------------------------------
0256 005c | \ | .STRTAB 0x005c->0x0284 ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
0257 00cd | | .STRTAB 0x00cd->0x02bd ; "$$.Master_Log_File"
0258 00dd | | .STRTAB 0x00dd->0x02c6 ; "$$.Logs.Install_Universe"
0259 00f3 | | .STRTAB 0x00f3->0x02d2 ; "$$.Lists.Demote_Specs"
025a 0106 | | .STRTAB 0x0106->0x02dd ; "$$.Lists.Install_Specs"
025b 011a | | .STRTAB 0x011a->0x02e8 ; "$$.Lists.Code_Specs"
025c 012b | + | .STRTAB 0x012b->0x02f1 ; "$$.Lists.Freeze_Specs"
025d 013e | > | .STRTAB 0x013e->0x02fc ; "$$.Lists.Acls_list"
025e 014e | N | .STRTAB 0x014e->0x0305 ; "$$.Logs.Current_Universe_Step"
025f 0169 | i | .STRTAB 0x0169->0x0313 ; "Updated_Units"
0260 0174 | t | .STRTAB 0x0174->0x031a ; "[Install_Universe (Units_List => \x22"
0261 0194 | | .STRTAB 0x0194->0x032b ; "\x22, Device => \x22"
0262 01a0 | | .STRTAB 0x01a0->0x0332 ; "\x22);]"
0263 01a2 | | .STRTAB 0x01a2->0x0334 ; "Installing the units listed in "
0264 01bf | | .STRTAB 0x01bf->0x0343 ; "[]"
0265 01bf | | .STRTAB 0x01bf->0x0344 ; "No units to be Restored"
0266 01d4 | | .STRTAB 0x01d4->0x0350 ; "Install_Universe"
0267 01e2 | | .STRTAB 0x01e2->0x0358 ; "Computing Compilation Dependencies for "
0268 0207 | | .STRTAB 0x0207->0x036b ; "Computing Recoding for !"
0269 021d | | .STRTAB 0x021d->0x0377 ; "<PROFILE>"
026a 0224 | $ | .STRTAB 0x0224->0x037c ; "!"
026b 0223 | # | .STRTAB 0x0223->0x037c ; "Saving ACLs on "
026c 0230 | 0 | .STRTAB 0x0230->0x0384 ; "Saving Access_Lists for !"
026d 0247 | G | .STRTAB 0x0247->0x0390 ; "Unfreezing Clients of "
026e 025b | [ | .STRTAB 0x025b->0x039b ; "_"
026f 025a | Z | .STRTAB 0x025a->0x039c ; "Demoting Clients of "
0270 026c | l | .STRTAB 0x026c->0x03a6 ; "<ALL_WORLDS>"
0271 0276 | v | .STRTAB 0x0276->0x03ac ; "Replacing "
0272 027e | ~ | .STRTAB 0x027e->0x03b1 ; "Replace, Remake"
0273 028b | | .STRTAB 0x028b->0x03b8 ; "*"
0274 028a | | .STRTAB 0x028a->0x03b9 ; "?"
0275 0289 | | .STRTAB 0x0289->0x03b9 ; "Installing Demoted Clients of "
0276 02a5 | | .STRTAB 0x02a5->0x03c8 ; "[_"
0277 02a5 | | .STRTAB 0x02a5->0x03c9 ; ", ~!tools.rpc.rev9_1_5??]"
0278 02bc | | .STRTAB 0x02bc->0x03d6 ; "Coding Demoted Clients of "
0279 02d4 | | .STRTAB 0x02d4->0x03e3 ; "Refreezing Clients of "
027a 02e8 | | .STRTAB 0x02e8->0x03ee ; "Restoring Acls on "
027b 02f8 | | .STRTAB 0x02f8->0x03f7 ; "Restoring Access_Lists from "
027c 0312 | | .STRTAB 0x0312->0x0405 ; "Running Snapshot Daemon"
027d 0327 | ' | .STRTAB 0x0327->0x0410 ; "snapshot"
027e 032d | - | .STRTAB 0x032d->0x0414 ; "Install_Universe has completed"
027f 0349 | I | .STRTAB 0x0349->0x0423 ; "[Install_Universe has completed]"
0280 0367 | g | .STRTAB 0x0367->0x0433 ; " raised"
0281 036c | l | .STRTAB 0x036c->0x0437 ; "Step has Failed"
0282 0379 | y | .STRTAB 0x0379->0x043e ; "Install_Universe has failed"
0283 0392 | | .STREND 0x0392->0x044c
0284 5065 7273 |Pers| .STRTAB_STRINGS
044c 0000 0000 | | .BLANK 0000[0x4]
0450 ; --------------------------------------------------------------------------------------
0450 ; Debug Table
0450 ; --------------------------------------------------------------------------------------
0450 0004 0001 | | .DEBUG4 0x0004,0x0001,0x37ba,0x0000,0x0001,0x0000
0456 8da5 a4e4 | | .XXX[0x1aa]
0458 e000 2c01 | , |
045a 1539 0d3d | 9 =|
045c 1125 391c | %9 |
045e 80e4 e000 | |
0460 3001 4d5d |0 M]|
0462 2511 5120 |% Q |
0464 80e0 e0e0 | |
0466 80c0 2801 | ( |
0468 115d 2511 | ]% |
046a 5120 80e4 |Q |
046c 80c0 3401 | 4 |
046e 0909 6080 | ` |
0470 e480 c4cc | |
0472 80c0 80b4 | |
0474 cc00 1801 | |
0476 0925 5135 | %Q5|
0478 0540 1000 | @ |
047a c0c0 c0c0 | |
047c 1000 d8c0 | |
047e c0c0 1000 | |
0480 d8c0 c0c0 | |
0482 1000 d8c0 | |
0484 c0c0 1000 | |
0486 dd14 c0c0 | |
0488 1000 d8cc | |
048a c0c0 1000 | |
048c d8cc c0c0 | |
048e 1000 d8cc | |
0490 c0c0 1000 | |
0492 d8cc c0c0 | |
0494 1000 d514 | |
0496 c0c0 1000 | |
0498 c0c0 c0c0 | |
049a 1000 c0c0 | |
049c c0c0 1000 | |
049e c0c0 c0c0 | |
04a0 1c01 1539 | 9|
04a2 110d 2105 | ! |
04a4 4800 4401 |H D |
04a6 4d51 0549 |MQ I|
04a8 510d 2105 |Q ! |
04aa 4881 85cd |H |
04ac 8da5 a4e4 | |
04ae e400 2c01 | , |
04b0 1539 0d3d | 9 =|
04b2 1125 391c | %9 |
04b4 80e4 e400 | |
04b6 3001 4d5d |0 M]|
04b8 2511 5120 |% Q |
04ba 80e0 e0e0 | |
04bc 80c0 2801 | ( |
04be 115d 2511 | ]% |
04c0 5120 80e4 |Q |
04c2 80c0 3401 | 4 |
04c4 0909 6080 | ` |
04c6 e480 c4cc | |
04c8 80c0 80b4 | |
04ca cc00 1801 | |
04cc 0925 5135 | %Q5|
04ce 0540 1000 | @ |
04d0 c0c0 c0c0 | |
04d2 1000 c0c0 | |
04d4 c0c0 1000 | |
04d6 c0c0 c0c0 | |
04d8 1000 c0c0 | |
04da c0c0 1000 | |
04dc cd14 c0c0 | |
04de 1000 d8cc | |
04e0 c0c0 1000 | |
04e2 d8c0 c0c0 | |
04e4 1000 d8c0 | |
04e6 c0c0 1000 | |
04e8 d8cc c0c0 | |
04ea 1000 cd14 | |
04ec c0c0 1000 | |
04ee c0c0 c0c0 | |
04f0 1000 c0c0 | |
04f2 c0c0 1000 | |
04f4 c0c0 c0c0 | |
04f6 1c01 1539 | 9|
04f8 110d 2105 | ! |
04fa 4800 4801 |H H |
04fc 4d51 0549 |MQ I|
04fe 510d 2105 |Q ! |
0500 4881 85cd |H |
0502 8da5 a4c4 | |
0504 c0c0 3001 | 0 |
0506 1539 0d3d | 9 =|
0508 1125 391c | %9 |
050a 80c4 c0c0 | |
050c 3001 4d5d |0 M]|
050e 2511 5120 |% Q |
0510 80e0 e0e0 | |
0512 80c0 2801 | ( |
0514 115d 2511 | ]% |
0516 5120 80e4 |Q |
0518 80c0 3401 | 4 |
051a 0909 6080 | ` |
051c e480 c4cc | |
051e 80c0 80b4 | |
0520 cc00 1801 | |
0522 0925 5135 | %Q5|
0524 0540 1000 | @ |
0526 c0c0 c0c0 | |
0528 1000 c0cc | |
052a c0c0 1000 | |
052c c0cc c0c0 | |
052e 1000 c0cc | |
0530 c0c0 1000 | |
0532 cd18 c0c0 | |
0534 1000 d8cc | |
0536 c0c0 1000 | |
0538 d8cc c0c0 | |
053a 1000 d8cc | |
053c c0c0 1000 | |
053e d8cc c0c0 | |
0540 1000 cd10 | |
0542 c0c0 1000 | |
0544 c0c0 c0c0 | |
0546 1000 c0c0 | |
0548 c0c0 1000 | |
054a c0c0 c0c0 | |
054c 1c01 1539 | 9|
054e 110d 2105 | ! |
0550 4800 4801 |H H |
0552 4d51 0549 |MQ I|
0554 510d 2105 |Q ! |
0556 4881 85cd |H |
0558 8da5 a4c4 | |
055a c0c4 3001 | 0 |
055c 1539 0d3d | 9 =|
055e 1125 391c | %9 |
0560 80c4 c0c4 | |
0562 3001 4d5d |0 M]|
0564 2511 5120 |% Q |
0566 80e0 e0e0 | |
0568 80c0 2801 | ( |
056a 115d 2511 | ]% |
056c 5120 80e4 |Q |
056e 80c0 3401 | 4 |
0570 0909 6080 | ` |
0572 e480 c4cc | |
0574 80c0 80b4 | |
0576 cc00 1801 | |
0578 0925 5135 | %Q5|
057a 0540 1000 | @ |
057c c0c0 c0c0 | |
057e 1000 c0c0 | |
0580 c0c0 1000 | |
0582 c0c0 c0c0 | |
0584 1000 c0c0 | |
0586 c0c0 1000 | |
0588 cd14 c0c0 | |
058a 1000 d8cc | |
058c c0c0 1000 | |
058e dd14 c0c0 | |
0590 1000 d8c0 | |
0592 c0c0 1000 | |
0594 d8cc c0c0 | |
0596 1000 cd14 | |
0598 c0c0 1000 | |
059a c0c0 c0c0 | |
059c 1000 c0c0 | |
059e c0c0 1000 | |
05a0 c0c0 c0c0 | |
05a2 1c01 1539 | 9|
05a4 110d 2105 | ! |
05a6 4800 4801 |H H |
05a8 4d51 0549 |MQ I|
05aa 510d 2105 |Q ! |
05ac 4881 85cd |H |
05ae 8da5 a4c4 | |
05b0 c0c8 3001 | 0 |
05b2 1539 0d3d | 9 =|
05b4 1125 391c | %9 |
05b6 80c4 c0c8 | |
05b8 3001 4d5d |0 M]|
05ba 2511 5120 |% Q |
05bc 80e0 e0e0 | |
05be 80c0 2801 | ( |
05c0 115d 2511 | ]% |
05c2 5120 80e4 |Q |
05c4 80c0 3401 | 4 |
05c6 0909 6080 | ` |
05c8 e480 c4cc | |
05ca 80c0 80b4 | |
05cc cc00 1801 | |
05ce 0925 5135 | %Q5|
05d0 0540 1000 | @ |
05d2 c0c0 c0c0 | |
05d4 1000 c50c | |
05d6 c0c0 1000 | |
05d8 ccd8 c0c0 | |
05da 1000 ccc0 | |
05dc c0c0 1000 | |
05de ccc0 c0c0 | |
05e0 1000 dd0c | |
05e2 c0c0 1000 | |
05e4 ccc0 c0c0 | |
05e6 1000 ccc0 | |
05e8 c0c0 1000 | |
05ea ccc0 c0c0 | |
05ec 1000 ccc0 | |
05ee c0c0 1000 | |
05f0 c0c0 c0c0 | |
05f2 1000 c0c0 | |
05f4 c0c0 1000 | |
05f6 c0c0 c0c0 | |
05f8 1c01 1539 | 9|
05fa 110d 2105 | ! |
05fc 4800 4801 |H H |
05fe 4d51 0549 |MQ I|