DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦116882d76⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0d2ce3

Derivation

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

Disassembly

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 0000 000e  |    |		.XXX[0xa]
0458 9000 0000  |    |
045a 48b0 0000  |H   |
045c 0000 0000  |    |
045e 0003 cf80  |    |
0460 0000 0000  |    |		.BLANK	0000[0x6]
0466 e820       |    |		.XXX[0x1]
0467 0000 0000  |    |		.BLANK	0000[0x8]
046f 0119 4020  |  @ |		.XXX[0x6]
0471 8000 0000  |    |
0473 0000 1098  |    |
0475 0000 0000  |    |		.BLANK	0000[0x6]
047b 0512 8000  |    |		.XXX[0xd]
047d 000f 7200  |  r |
047f 0000 0000  |    |
0481 0000 013f  |   ?|
0483 c000 0004  |    |
0485 4e80 0000  |N   |
0487 1178       | x  |
0488 0000 0000  |    |		.BLANK	0000[0x6]
048e 051c 0000  |    |		.XXX[0x9]
0490 0013 9200  |    |
0492 0000 0000  |    |
0494 0000 013d  |   =|
0496 0023       | #  |
0497 0000 0000  |    |		.BLANK	0000[0x5]
049c 003e 2800  | >( |		.XXX[0x2]
049e 0000 0000  |    |		.BLANK	0000[0xc]
04aa 0003 9500  |    |		.XXX[0x3]
04ac 8000       |    |
04ad 0000 0000  |    |		.BLANK	0000[0x10]
04bd 0005 7100  |  q |		.XXX[0x2]
04bf 0000 0000  |    |		.BLANK	0000[0x5]
04c4 0001 0320  |    |		.XXX[0x8]
04c6 2280 0410  |"   |
04c8 8000 0012  |    |
04ca 7c02 0c00  ||   |
04cc 0000 0000  |    |		.BLANK	0000[0x9]
04d5 0049 4800  | IH |		.XXX[0x2]
04d7 0000 0000  |    |		.BLANK	0000[0x8]
04df 4ec8       |N   |		.XXX[0x1]
04e0 0000 0000  |    |		.BLANK	0000[0x8]
04e8 0041 a000  | A  |		.XXX[0x2]
04ea 0000 0000  |    |		.BLANK	0000[0x5]
04ef 0014 2000  |    |		.XXX[0x1d]
04f1 0000 0000  |    |
04f3 0000 00ed  |    |
04f5 0000 0003  |    |
04f7 c380 0000  |    |
04f9 0000 0000  |    |
04fb 003d 4000  | =@ |
04fd 0000 0000  |    |
04ff 0000 042e  |   .|
0501 0089 0010  |    |
0503 7c02 2c00  || , |
0505 4df8 0000  |M   |
0507 0000 0000  |    |
0509 0003 9b80  |    |
050b 8500       |    |
050c 0000 0000  |    |		.BLANK	0000[0x5]
0511 fbe0 0000  |    |		.XXX[0x3]
0513 03f5       |    |
0514 0000 0000  |    |		.BLANK	0000[0x4]
0518 3be8 0810  |;   |		.XXX[0x2]
051a 0000 0000  |    |		.BLANK	0000[0x9]
0523 0001 0b00  |    |		.XXX[0x7]
0525 0000 0535  |   5|
0527 8000 0013  |    |
0529 5800       |X   |
052a 0000 0000  |    |		.BLANK	0000[0x8]
0532 10ce       |    |		.XXX[0x1]
0533 0000 0000  |    |		.BLANK	0000[0xf]
0542 0005 5b80  |  [ |		.XXX[0x10]
0544 0000 0000  |    |
0546 0000 0056  |   V|
0548 5000 0001  |P   |
054a 5420 0000  |T   |
054c 0000 0000  |    |
054e 0014 0c00  |    |
0550 0000 3a90  |  : |
0552 0000 0000  |    |		.BLANK	0000[0xa]
055c 0001 3200  |  2 |		.XXX[0xb]
055e 21c0 04f9  |!   |
0560 8000 0012  |    |
0562 b402 1000  |    |
0564 4998 0000  |I   |
0566 0121       | !  |
0567 0000 0000  |    |		.BLANK	0000[0x9]
0570 fe80 0000  |    |		.XXX[0x2a]
0572 0000 0000  |    |
0574 0011 1c00  |    |
0576 0000 4710  |  G |
0578 0000 011e  |    |
057a 0000 0004  |    |
057c a600 0000  |    |
057e 12d2 0220  |    |
0580 004b c008  | K  |
0582 6001 3080  |` 0 |
0584 0000 04cf  |    |
0586 0000 0013  |    |
0588 ca00 0000  |    |
058a 50d8 0000  |P   |
058c 0148 e000  | H  |
058e 0005 3e80  |  > |
0590 0000 15a8  |    |
0592 0001 95b8  |    |
0594 81bd d1a1  |    |
0596 95c9 cc80  |    |
0598 f4f8 2880  |  ( |
059a 8080 8080  |    |		.BLANK	8080[0xd]
05a7 81b9 d5b1  |    |		.XXX[0x4]
05a9 b0ec 2880  |  ( |
05ab 8080 8080  |    |		.BLANK	8080[0x9]
05b4 8195 b990  |    |		.XXX[0x6]
05b6 818d 85cd  |    |
05b8 94ec 2880  |  ( |
05ba 8080 8080  |    |		.BLANK	8080[0x7]
05c1 81dd a195  |    |		.XXX[0x7]
05c3 b881 31a5  |  1 |
05c5 b994 80f4  |    |
05c7 f828       | (  |
05c8 8080 8080  |    |		.BLANK	8080[0x9]
05d1 8081 8d85  |    |		.XXX[0x8]
05d3 cd94 812d  |   -|
05d5 95e4 c881  |    |
05d7 a5cc 2880  |  ( |
05d9 8080 8080  |    |		.BLANK	8080[0xb]
05e4 81dd a195  |    |		.XXX[0xd]
05e6 b881 5185  |  Q |
05e8 8881 f080  |    |
05ea 9d14 9c81  |    |
05ec f080 9d94  |    |
05ee 9c80 f4f8  |    |
05f0 2880       |(   |
05f1 8080 8080  |    |		.BLANK	8080[0xd]
05fe 8115 91a5  |    |		.XXX[0x2]