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

⟦c3af94e3e⟧

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

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 0530       | 0  |		.CONST	0x0530								; 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 00a6       |    |		.CONST	0x00a6								; Address of begin
0019 015d       | ]  |		.CONST	0x015d								; Address of exception handler
001a 0022       | "  |		.CONST	0x0022								; Number of locals
001b			INIT_0018:
001b 0092 0219  |    |		Action	Push_String_Extended,0x219					; "INSIGHT"
001d e001       |    |		Load	0x0,0x1
001e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
001f 00e1       |    |		Load_Encached	Boolean_Cache
0020 03f1       |    |		Declare_Variable	Discrete,With_Value
0021 e002       |    |		Load	0x0,0x2
0022 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0023 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0024 e002       |    |		Load	0x0,0x2
0025 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0026 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0027 e002       |    |		Load	0x0,0x2
0028 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0029 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
002a 482e       |H.  |		Short_Literal	0x2e
002b 00d9       |    |		Load_Top	At_Offset_1
002c 01cb       |    |		Execute	Vector,Append
002d e5ff       |    |		Load	0x2,-0x1
002e e003       |    |		Load	0x0,0x3
002f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0030 01cc       |    |		Execute	Vector,Catenate
0031 0007       |    |		Action	Break_Optional
0032 00d8       |    |		Load_Top	At_Offset_0
0033 482e       |H.  |		Short_Literal	0x2e
0034 00db       |    |		Load_Top	At_Offset_3
0035 01cb       |    |		Execute	Vector,Append
0036 0092 021a  |    |		Action	Push_String_Extended,0x21a					; "<NONE>"
0038 01cc       |    |		Execute	Vector,Catenate
0039 01de       |    |		Execute	Vector,Not_Equal
003a 0007       |    |		Action	Break_Optional
003b 00d9       |    |		Load_Top	At_Offset_1
003c 0092 021b  |    |		Action	Push_String_Extended,0x21b					; "_PROBLEMS"
003e 01cc       |    |		Execute	Vector,Catenate
003f 0007       |    |		Action	Break_Optional
0040 0092 021c  |    |		Action	Push_String_Extended,0x21c					; "R1000,CHANGED_OBJECTS,REPLACE,PROMOTE,REMAKE"
0042 e5fe       |    |		Load	0x2,-0x2
0043 0335       | 5  |		Declare_Variable	Array,Duplicate
0044 00cd       |    |		Action	Spare6_Action
0045 0092 021d  |    |		Action	Push_String_Extended,0x21d					; "PROPAGATE,"
0047 e5fe       |    |		Load	0x2,-0x2
0048 01cc       |    |		Execute	Vector,Catenate
0049 0007       |    |		Action	Break_Optional
004a 0092 021e  |    |		Action	Push_String_Extended,0x21e					; "PROPAGATE,++*,!!!,***,%%%"
004c 0092 021f  |    |		Action	Push_String_Extended,0x21f					; "PERSEVERE,"
004e e5fe       |    |		Load	0x2,-0x2
004f 01cc       |    |		Execute	Vector,Catenate
0050 0007       |    |		Action	Break_Optional
0051 0092 0220  |    |		Action	Push_String_Extended,0x220					; "!MACHINE.RELEASE.CURRENT.COMMANDS"
0053 0092 0221  |   !|		Action	Push_String_Extended,0x221					; "!COMPILER_INTERFACE.SUBSYSTEM_INTERFACE"
0055 0092 0222  |   "|		Action	Push_String_Extended,0x222					; "!MACHINE.RELEASE.CURRENT.ACTIVITY"
0057 e403       |    |		Load	0x2,0x3
0058 0092 0223  |   #|		Action	Push_String_Extended,0x223					; ".ACL_INFORMATION"
005a 01cc       |    |		Execute	Vector,Catenate
005b 0007       |    |		Action	Break_Optional
005c e403       |    |		Load	0x2,0x3
005d 0092 0224  |   $|		Action	Push_String_Extended,0x224					; ".RELEASE_CONTENTS"
005f 01cc       |    |		Execute	Vector,Catenate
0060 0007       |    |		Action	Break_Optional
0061 e403       |    |		Load	0x2,0x3
0062 0092 0225  |   %|		Action	Push_String_Extended,0x225					; ".INSIGHT_ACTIVITY"
0064 01cc       |    |		Execute	Vector,Catenate
0065 0007       |    |		Action	Break_Optional
0066 e403       |    |		Load	0x2,0x3
0067 0092 0226  |   &|		Action	Push_String_Extended,0x226					; ".ACTIVITY_ARCHIVE"
0069 01cc       |    |		Execute	Vector,Catenate
006a 0007       |    |		Action	Break_Optional
006b e403       |    |		Load	0x2,0x3
006c 0092 0227  |   '|		Action	Push_String_Extended,0x227					; ".EXISTING_CODE_FILE"
006e 01cc       |    |		Execute	Vector,Catenate
006f 0007       |    |		Action	Break_Optional
0070 e403       |    |		Load	0x2,0x3
0071 0092 0228  |   (|		Action	Push_String_Extended,0x228					; ".EXISTING_DEMOTE_FILE"
0073 01cc       |    |		Execute	Vector,Catenate
0074 0007       |    |		Action	Break_Optional
0075 e403       |    |		Load	0x2,0x3
0076 0092 0229  |   )|		Action	Push_String_Extended,0x229					; ".EXISTING_FREEZE_FILE"
0078 01cc       |    |		Execute	Vector,Catenate
0079 0007       |    |		Action	Break_Optional
007a e403       |    |		Load	0x2,0x3
007b 0092 022a  |   *|		Action	Push_String_Extended,0x22a					; ".EXISTING_INSTALL_FILE"
007d 01cc       |    |		Execute	Vector,Catenate
007e 0007       |    |		Action	Break_Optional
007f e403       |    |		Load	0x2,0x3
0080 0092 022b  |   +|		Action	Push_String_Extended,0x22b					; ".ARCHIVES"
0082 01cc       |    |		Execute	Vector,Catenate
0083 0007       |    |		Action	Break_Optional
0084 e403       |    |		Load	0x2,0x3
0085 0092 022c  |   ,|		Action	Push_String_Extended,0x22c					; ".SOFTWARE_ARCHIVE"
0087 01cc       |    |		Execute	Vector,Catenate
0088 0007       |    |		Action	Break_Optional
0089 e403       |    |		Load	0x2,0x3
008a 0092 022d  |   -|		Action	Push_String_Extended,0x22d					; ".TUTORIAL_ARCHIVE"
008c 01cc       |    |		Execute	Vector,Catenate
008d 0007       |    |		Action	Break_Optional
008e 00e1       |    |		Load_Encached	Boolean_Cache
008f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0090 029e 018b  |    |		Declare_Subprogram	INIT_0188,For_Call,Unelaborated
0092 481b       |H   |		Short_Literal	0x1b
0093 4802       |H   |		Short_Literal	0x2
0094 0099       |    |		Action	Reference_Dynamic
0095 481b       |H   |		Short_Literal	0x1b
0096 4802       |H   |		Short_Literal	0x2
0097 0099       |    |		Action	Reference_Dynamic
0098 481b       |H   |		Short_Literal	0x1b
0099 4802       |H   |		Short_Literal	0x2
009a 0099       |    |		Action	Reference_Dynamic
009b 00c7       |    |		Action	Elaborate_Subprogram
009c 029f 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Call
009e 029f 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Call
00a0 029f 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Call
00a2 029f 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Call
00a4 029f 0203  |    |		Declare_Subprogram	INIT_0200,For_Call
00a6			BODY_0018:
00a6 e405       |    |		Load	0x2,0x5
00a7 680c       |h   |		Jump_Zero	0xb4
00a8 4801       |H   |		Short_Literal	0x1
00a9 4803       |H   |		Short_Literal	0x3
00aa 4822       |H"  |		Short_Literal	0x22
00ab 0092 022e  |   .|		Action	Push_String_Extended,0x22e					; "Insight Installation is being logged to file \x22"
00ad e404       |    |		Load	0x2,0x4
00ae 01cc       |    |		Execute	Vector,Catenate
00af 01cb       |    |		Execute	Vector,Append
00b0 841c       |    |		Call	0x2,0x1c
00b1 e404       |    |		Load	0x2,0x4
00b2 e004       |    |		Load	0x0,0x4
00b3 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00b4 4800       |H   |		Short_Literal	0x0
00b5 4800       |H   |		Short_Literal	0x0
00b6 0092 022f  |   /|		Action	Push_String_Extended,0x22f					; "[Install_Product ( Log_File => "
00b8 e404       |    |		Load	0x2,0x4
00b9 01cc       |    |		Execute	Vector,Catenate
00ba 0092 0230  |   0|		Action	Push_String_Extended,0x230					; ", Response => "
00bc 01cc       |    |		Execute	Vector,Catenate
00bd e5fe       |    |		Load	0x2,-0x2
00be 01cc       |    |		Execute	Vector,Catenate
00bf 0092 0231  |   1|		Action	Push_String_Extended,0x231					; ");]"
00c1 01cc       |    |		Execute	Vector,Catenate
00c2 841b       |    |		Call	0x2,0x1b
00c3 4801       |H   |		Short_Literal	0x1
00c4 4803       |H   |		Short_Literal	0x3
00c5 0092 0232  |   2|		Action	Push_String_Extended,0x232					; "Beginning Installation of Insight"
00c7 841c       |    |		Call	0x2,0x1c
00c8 4800       |H   |		Short_Literal	0x0
00c9 4802       |H   |		Short_Literal	0x2
00ca 0092 0233  |   3|		Action	Push_String_Extended,0x233					; "Enabling Operator privileges ..."
00cc 841b       |    |		Call	0x2,0x1b
00cd 4801       |H   |		Short_Literal	0x1
00ce e005       |    |		Load	0x0,0x5
00cf 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00d0 e005       |    |		Load	0x0,0x5
00d1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00d2 6806       |h   |		Jump_Zero	0xd9
00d3 4801       |H   |		Short_Literal	0x1
00d4 4803       |H   |		Short_Literal	0x3
00d5 0092 0234  |   4|		Action	Push_String_Extended,0x234					; "Operator Privileges Enabled."
00d7 841c       |    |		Call	0x2,0x1c
00d8 7808       |x   |		Jump	0xe1
00d9 4801       |H   |		Short_Literal	0x1
00da 4807       |H   |		Short_Literal	0x7
00db 0092 0235  |   5|		Action	Push_String_Extended,0x235					; "Unable to enable Operator privileges.  Be sure you are logged in as OPERATOR!!"
00dd 841d       |    |		Call	0x2,0x1d
00de e006       |    |		Load	0x0,0x6
00df 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
00e0 0257       | W  |		Execute	Discrete,Raise
00e1 4800       |H   |		Short_Literal	0x0
00e2 4802       |H   |		Short_Literal	0x2
00e3 0092 0236  |   6|		Action	Push_String_Extended,0x236					; "Checking product authorization ..."
00e5 841b       |    |		Call	0x2,0x1b
00e6 e402       |    |		Load	0x2,0x2
00e7 6806       |h   |		Jump_Zero	0xee
00e8 4801       |H   |		Short_Literal	0x1
00e9 4803       |H   |		Short_Literal	0x3
00ea 0092 0237  |   7|		Action	Push_String_Extended,0x237					; "Authorization checks succeeded, beginning installation."
00ec 841c       |    |		Call	0x2,0x1c
00ed 7808       |x   |		Jump	0xf6
00ee 4801       |H   |		Short_Literal	0x1
00ef 4807       |H   |		Short_Literal	0x7
00f0 0092 0238  |   8|		Action	Push_String_Extended,0x238					; "Installation cannot proceed until products have been authorized.  Refer to the installation guide for required products."
00f2 841d       |    |		Call	0x2,0x1d
00f3 e006       |    |		Load	0x0,0x6
00f4 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
00f5 0257       | W  |		Execute	Discrete,Raise
00f6 4800       |H   |		Short_Literal	0x0
00f7 4802       |H   |		Short_Literal	0x2
00f8 0092 0239  |   9|		Action	Push_String_Extended,0x239					; "Restoring Software_Archive."
00fa 841b       |    |		Call	0x2,0x1b
00fb e408       |    |		Load	0x2,0x8
00fc e418       |    |		Load	0x2,0x18
00fd e407       |    |		Load	0x2,0x7
00fe 0092 023a  |   :|		Action	Push_String_Extended,0x23a					; "*"
0100 0092 023a  |   :|		Action	Push_String_Extended,0x23a					; "*"
0102 0092 023b  |   ;|		Action	Push_String_Extended,0x23b					; "?"
0104 e007       |    |		Load	0x0,0x7
0105 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0106 4801       |H   |		Short_Literal	0x1
0107 4803       |H   |		Short_Literal	0x3
0108 0092 023c  |   <|		Action	Push_String_Extended,0x23c					; "Software Archive has been restored."
010a 841c       |    |		Call	0x2,0x1c
010b 4800       |H   |		Short_Literal	0x0
010c 4802       |H   |		Short_Literal	0x2
010d 0092 023d  |   =|		Action	Push_String_Extended,0x23d					; "Updating system wide activity file."
010f 841b       |    |		Call	0x2,0x1b
0110 0092 023e  |   >|		Action	Push_String_Extended,0x23e					; "<PROFILE>"
0112 e412       |    |		Load	0x2,0x12
0113 0092 023f  |   ?|		Action	Push_String_Extended,0x23f					; "R1000"
0115 0092 023a  |   :|		Action	Push_String_Extended,0x23a					; "*"
0117 0092 023a  |   :|		Action	Push_String_Extended,0x23a					; "*"
0119 0092 023b  |   ;|		Action	Push_String_Extended,0x23b					; "?"
011b e007       |    |		Load	0x0,0x7
011c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
011d e409       |    |		Load	0x2,0x9
011e e40e       |    |		Load	0x2,0xe
011f 4801       |H   |		Short_Literal	0x1
0120 0092 023b  |   ;|		Action	Push_String_Extended,0x23b					; "?"
0122 0092 023b  |   ;|		Action	Push_String_Extended,0x23b					; "?"
0124 0092 023b  |   ;|		Action	Push_String_Extended,0x23b					; "?"
0126 e411       |    |		Load	0x2,0x11
0127 e008       |    |		Load	0x0,0x8
0128 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0129 4801       |H   |		Short_Literal	0x1
012a 4803       |H   |		Short_Literal	0x3
012b 0092 0240  |   @|		Action	Push_String_Extended,0x240					; "The system wide activity file has been updated."
012d 841c       |    |		Call	0x2,0x1c
012e 8421       | !  |		Call	0x2,0x21
012f 4800       |H   |		Short_Literal	0x0
0130 4802       |H   |		Short_Literal	0x2
0131 0092 0241  |   A|		Action	Push_String_Extended,0x241					; "Remove searchlist entry for Insight Release1_0_1."
0133 841b       |    |		Call	0x2,0x1b
0134 8422       | "  |		Call	0x2,0x22
0135 4800       |H   |		Short_Literal	0x0
0136 4800       |H   |		Short_Literal	0x0
0137 0092 0242  |   B|		Action	Push_String_Extended,0x242					; "[Install_Product has completed]"
0139 841b       |    |		Call	0x2,0x1b
013a e405       |    |		Load	0x2,0x5
013b 681b       |h   |		Jump_Zero	0x157
013c e004       |    |		Load	0x0,0x4
013d 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
013e 4801       |H   |		Short_Literal	0x1
013f 4803       |H   |		Short_Literal	0x3
0140 4822       |H"  |		Short_Literal	0x22
0141 0092 0243  |   C|		Action	Push_String_Extended,0x243					; "Producing Installation Problems Log \x22"
0143 e406       |    |		Load	0x2,0x6
0144 01cc       |    |		Execute	Vector,Catenate
0145 01cb       |    |		Execute	Vector,Append
0146 841c       |    |		Call	0x2,0x1c
0147 4800       |H   |		Short_Literal	0x0
0148 4800       |H   |		Short_Literal	0x0
0149 4800       |H   |		Short_Literal	0x0
014a 4801       |H   |		Short_Literal	0x1
014b 4801       |H   |		Short_Literal	0x1
014c 4801       |H   |		Short_Literal	0x1
014d 4800       |H   |		Short_Literal	0x0
014e 4801       |H   |		Short_Literal	0x1
014f 4800       |H   |		Short_Literal	0x0
0150 4800       |H   |		Short_Literal	0x0
0151 4801       |H   |		Short_Literal	0x1
0152 4801       |H   |		Short_Literal	0x1
0153 e406       |    |		Load	0x2,0x6
0154 e404       |    |		Load	0x2,0x4
0155 e004       |    |		Load	0x0,0x4
0156 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0157 4801       |H   |		Short_Literal	0x1
0158 4803       |H   |		Short_Literal	0x3
0159 0092 0244  |   D|		Action	Push_String_Extended,0x244					; "Install_Product has completed.  Refer back to the Install Guide to complete the installation."
015b 841c       |    |		Call	0x2,0x1c
015c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
015d			TRAP_0018:
015d e006       |    |		Load	0x0,0x6
015e 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
015f 010f       |    |		Execute	Exception,Equal
0160 6823       |h#  |		Jump_Zero	0x184
0161 4800       |H   |		Short_Literal	0x0
0162 4800       |H   |		Short_Literal	0x0
0163 0092 0245  |   E|		Action	Push_String_Extended,0x245					; "[Install_Product has failed with errors]"
0165 841b       |    |		Call	0x2,0x1b
0166 e405       |    |		Load	0x2,0x5
0167 681b       |h   |		Jump_Zero	0x183
0168 e004       |    |		Load	0x0,0x4
0169 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
016a 4801       |H   |		Short_Literal	0x1
016b 4803       |H   |		Short_Literal	0x3
016c 4822       |H"  |		Short_Literal	0x22
016d 0092 0243  |   C|		Action	Push_String_Extended,0x243					; "Producing Installation Problems Log \x22"
016f e406       |    |		Load	0x2,0x6
0170 01cc       |    |		Execute	Vector,Catenate
0171 01cb       |    |		Execute	Vector,Append
0172 841c       |    |		Call	0x2,0x1c
0173 4800       |H   |		Short_Literal	0x0
0174 4800       |H   |		Short_Literal	0x0
0175 4800       |H   |		Short_Literal	0x0
0176 4801       |H   |		Short_Literal	0x1
0177 4801       |H   |		Short_Literal	0x1
0178 4801       |H   |		Short_Literal	0x1
0179 4800       |H   |		Short_Literal	0x0
017a 4801       |H   |		Short_Literal	0x1
017b 4800       |H   |		Short_Literal	0x0
017c 4800       |H   |		Short_Literal	0x0
017d 4801       |H   |		Short_Literal	0x1
017e 4801       |H   |		Short_Literal	0x1
017f e406       |    |		Load	0x2,0x6
0180 e404       |    |		Load	0x2,0x4
0181 e004       |    |		Load	0x0,0x4
0182 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0183 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0184 0100       |    |		Execute	Exception,Raise
0185 0000 0000  |    |		.XXX[0x3]
0187 0000       |    |
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018e       |    |		.CONST	0x018e								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0003       |    |		.CONST	0x0003								; Number of locals
018b			INIT_0188:
018b 00ea       |    |		Load_Encached	Null_String_Cache
018c 029f 0213  |    |		Declare_Subprogram	INIT_0210,For_Call
018e			BODY_0188:
018e e7fd       |    |		Load	0x3,-0x3
018f 6801       |h   |		Jump_Zero	0x191
0190 8603       |    |		Call	0x3,0x3
0191 e006       |    |		Load	0x0,0x6
0192 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0193 e7fe       |    |		Load	0x3,-0x2
0194 00db       |    |		Load_Top	At_Offset_3
0195 e7ff       |    |		Load	0x3,-0x1
0196 01cc       |    |		Execute	Vector,Catenate
0197 e004       |    |		Load	0x0,0x4
0198 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0199 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
019a 0000 0000  |    |		.BLANK	0000[0x6]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 485d       |H]  |		Short_Literal	0x5d
01a4 0092 0246  |   F|		Action	Push_String_Extended,0x246					; "[_"
01a6 e7ff       |    |		Load	0x3,-0x1
01a7 01cc       |    |		Execute	Vector,Catenate
01a8 01cb       |    |		Execute	Vector,Append
01a9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01aa 0000 0000  |    |		.BLANK	0000[0x6]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01c1       |    |		.CONST	0x01c1								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0002       |    |		.CONST	0x0002								; Number of locals
01b3			INIT_01b0:
01b3 e002       |    |		Load	0x0,0x2
01b4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01b5 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
01b6 02c7       |    |		Declare_Variable	Any
01b7 4801       |H   |		Short_Literal	0x1
01b8 e002       |    |		Load	0x0,0x2
01b9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01ba 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01bb e7ff       |    |		Load	0x3,-0x1
01bc 841e       |    |		Call	0x2,0x1e
01bd e002       |    |		Load	0x0,0x2
01be 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01bf 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
01c0 a602       |    |		Store_Unchecked	0x3,0x2
01c1			BODY_01b0:
01c1 00d8       |    |		Load_Top	At_Offset_0
01c2 e002       |    |		Load	0x0,0x2
01c3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01c4 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
01c5 7008       |p   |		Jump_Nonzero	0x1ce
01c6 4801       |H   |		Short_Literal	0x1
01c7 a41a       |    |		Store_Unchecked	0x2,0x1a
01c8 e40b       |    |		Load	0x2,0xb
01c9 4800       |H   |		Short_Literal	0x0
01ca e7ff       |    |		Load	0x3,-0x1
01cb 841e       |    |		Call	0x2,0x1e
01cc e009       |    |		Load	0x0,0x9
01cd 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
01ce 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01cf 0000       |    |		.XXX[0x1]
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 e41a       |    |		Load	0x2,0x1a
01d4 6806       |h   |		Jump_Zero	0x1db
01d5 e40b       |    |		Load	0x2,0xb
01d6 4800       |H   |		Short_Literal	0x0
01d7 e7ff       |    |		Load	0x3,-0x1
01d8 841e       |    |		Call	0x2,0x1e
01d9 e009       |    |		Load	0x0,0x9
01da 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01db 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01dc 0000 0000  |    |		.BLANK	0000[0x4]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01eb       |    |		.CONST	0x01eb								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0002       |    |		.CONST	0x0002								; Number of locals
01e3			INIT_01e0:
01e3 0092 0247  |   G|		Action	Push_String_Extended,0x247					; "!Tools.Design.Insight.Insight_Commands'SPEC_VIEW("
01e5 e411       |    |		Load	0x2,0x11
01e6 01cc       |    |		Execute	Vector,Catenate
01e7 0092 0248  |   H|		Action	Push_String_Extended,0x248					; ").Units.@"
01e9 01cc       |    |		Execute	Vector,Catenate
01ea 0007       |    |		Action	Break_Optional
01eb			BODY_01e0:
01eb 4800       |H   |		Short_Literal	0x0
01ec 4802       |H   |		Short_Literal	0x2
01ed 0092 0249  |   I|		Action	Push_String_Extended,0x249					; "Updating command links."
01ef 841b       |    |		Call	0x2,0x1b
01f0 0092 023e  |   >|		Action	Push_String_Extended,0x23e					; "<PROFILE>"
01f2 e40c       |    |		Load	0x2,0xc
01f3 0092 024a  |   J|		Action	Push_String_Extended,0x24a					; "#"
01f5 00db       |    |		Load_Top	At_Offset_3
01f6 e00a       |    |		Load	0x0,0xa
01f7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01f8 4801       |H   |		Short_Literal	0x1
01f9 4803       |H   |		Short_Literal	0x3
01fa 0092 024b  |   K|		Action	Push_String_Extended,0x24b					; "The command links have been updated."
01fc 841c       |    |		Call	0x2,0x1c
01fd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01fe 0000 0000  |    |		.XXX[0x2]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0205       |    |		.CONST	0x0205								; Address of begin
0201 020b       |    |		.CONST	0x020b								; Address of exception handler
0202 0002       |    |		.CONST	0x0002								; Number of locals
0203			INIT_0200:
0203 0092 024c  |   L|		Action	Push_String_Extended,0x24c					; "!TOOLS.DESIGN.INSIGHT.INSIGHT_COMMANDS.REV1_0_SPEC.UNITS"
0205			BODY_0200:
0205 00ea       |    |		Load_Encached	Null_String_Cache
0206 00ea       |    |		Load_Encached	Null_String_Cache
0207 00da       |    |		Load_Top	At_Offset_2
0208 e00b       |    |		Load	0x0,0xb
0209 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
020a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
020b			TRAP_0200:
020b 0007       |    |		Action	Break_Optional
020c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
020d 0000 0000  |    |		.XXX[0x3]
020f 0000       |    |
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0217       |    |		.CONST	0x0217								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 e7ff       |    |		Load	0x3,-0x1
0214 e00c       |    |		Load	0x0,0xc
0215 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
0216 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0217			TRAP_0210:
0217 0007       |    |		Action	Break_Optional
0218 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0219 ; --------------------------------------------------------------------------------------
0219 ; STRING TABLE
0219 ; --------------------------------------------------------------------------------------
0219 006a       | j  |		.STRTAB	0x006a->0x024e							; "INSIGHT"
021a 006f       | o  |		.STRTAB	0x006f->0x0251							; "<NONE>"
021b 0073       | s  |		.STRTAB	0x0073->0x0254							; "_PROBLEMS"
021c 007a       | z  |		.STRTAB	0x007a->0x0259							; "R1000,CHANGED_OBJECTS,REPLACE,PROMOTE,REMAKE"
021d 00a4       |    |		.STRTAB	0x00a4->0x026f							; "PROPAGATE,"
021e 00ac       |    |		.STRTAB	0x00ac->0x0274							; "PROPAGATE,++*,!!!,***,%%%"
021f 00c3       |    |		.STRTAB	0x00c3->0x0280							; "PERSEVERE,"
0220 00cb       |    |		.STRTAB	0x00cb->0x0285							; "!MACHINE.RELEASE.CURRENT.COMMANDS"
0221 00ea       |    |		.STRTAB	0x00ea->0x0296							; "!COMPILER_INTERFACE.SUBSYSTEM_INTERFACE"
0222 010f       |    |		.STRTAB	0x010f->0x02a9							; "!MACHINE.RELEASE.CURRENT.ACTIVITY"
0223 012e       | .  |		.STRTAB	0x012e->0x02ba							; ".ACL_INFORMATION"
0224 013c       | <  |		.STRTAB	0x013c->0x02c2							; ".RELEASE_CONTENTS"
0225 014b       | K  |		.STRTAB	0x014b->0x02ca							; ".INSIGHT_ACTIVITY"
0226 015a       | Z  |		.STRTAB	0x015a->0x02d3							; ".ACTIVITY_ARCHIVE"
0227 0169       | i  |		.STRTAB	0x0169->0x02db							; ".EXISTING_CODE_FILE"
0228 017a       | z  |		.STRTAB	0x017a->0x02e5							; ".EXISTING_DEMOTE_FILE"
0229 018d       |    |		.STRTAB	0x018d->0x02ef							; ".EXISTING_FREEZE_FILE"
022a 01a0       |    |		.STRTAB	0x01a0->0x02fa							; ".EXISTING_INSTALL_FILE"
022b 01b4       |    |		.STRTAB	0x01b4->0x0305							; ".ARCHIVES"
022c 01bb       |    |		.STRTAB	0x01bb->0x0309							; ".SOFTWARE_ARCHIVE"
022d 01ca       |    |		.STRTAB	0x01ca->0x0312							; ".TUTORIAL_ARCHIVE"
022e 01d9       |    |		.STRTAB	0x01d9->0x031a							; "Insight Installation is being logged to file \x22"
022f 0205       |    |		.STRTAB	0x0205->0x0331							; "[Install_Product ( Log_File => "
0230 0222       | "  |		.STRTAB	0x0222->0x0341							; ", Response => "
0231 022e       | .  |		.STRTAB	0x022e->0x0348							; ");]"
0232 022f       | /  |		.STRTAB	0x022f->0x0349							; "Beginning Installation of Insight"
0233 024e       | N  |		.STRTAB	0x024e->0x035a							; "Enabling Operator privileges ..."
0234 026c       | l  |		.STRTAB	0x026c->0x036a							; "Operator Privileges Enabled."
0235 0286       |    |		.STRTAB	0x0286->0x0378							; "Unable to enable Operator privileges.  Be sure you are logged in as OPERATOR!!"
0236 02d2       |    |		.STRTAB	0x02d2->0x039f							; "Checking product authorization ..."
0237 02f2       |    |		.STRTAB	0x02f2->0x03b0							; "Authorization checks succeeded, beginning installation."
0238 0327       | '  |		.STRTAB	0x0327->0x03cb							; "Installation cannot proceed until products have been authorized.  Refer to the installation guide for required products."
0239 039d       |    |		.STRTAB	0x039d->0x0407							; "Restoring Software_Archive."
023a 03b6       |    |		.STRTAB	0x03b6->0x0415							; "*"
023b 03b5       |    |		.STRTAB	0x03b5->0x0415							; "?"
023c 03b4       |    |		.STRTAB	0x03b4->0x0416							; "Software Archive has been restored."
023d 03d5       |    |		.STRTAB	0x03d5->0x0427							; "Updating system wide activity file."
023e 03f6       |    |		.STRTAB	0x03f6->0x0439							; "<PROFILE>"
023f 03fd       |    |		.STRTAB	0x03fd->0x043d							; "R1000"
0240 0400       |    |		.STRTAB	0x0400->0x0440							; "The system wide activity file has been updated."
0241 042d       | -  |		.STRTAB	0x042d->0x0457							; "Remove searchlist entry for Insight Release1_0_1."
0242 045c       | \  |		.STRTAB	0x045c->0x0470							; "[Install_Product has completed]"
0243 0479       | y  |		.STRTAB	0x0479->0x047f							; "Producing Installation Problems Log \x22"
0244 049c       |    |		.STRTAB	0x049c->0x0492							; "Install_Product has completed.  Refer back to the Install Guide to complete the installation."
0245 04f7       |    |		.STRTAB	0x04f7->0x04c0							; "[Install_Product has failed with errors]"
0246 051d       |    |		.STRTAB	0x051d->0x04d4							; "[_"
0247 051d       |    |		.STRTAB	0x051d->0x04d5							; "!Tools.Design.Insight.Insight_Commands'SPEC_VIEW("
0248 054c       | L  |		.STRTAB	0x054c->0x04ee							; ").Units.@"
0249 0553       | S  |		.STRTAB	0x0553->0x04f2							; "Updating command links."
024a 0568       | h  |		.STRTAB	0x0568->0x04fe							; "#"
024b 0567       | g  |		.STRTAB	0x0567->0x04fe							; "The command links have been updated."
024c 0589       |    |		.STRTAB	0x0589->0x0510							; "!TOOLS.DESIGN.INSIGHT.INSIGHT_COMMANDS.REV1_0_SPEC.UNITS"
024d 05bf       |    |		.STREND 0x05bf->0x052c
024e 494e 5349  |INSI|		.STRTAB_STRINGS
052d 0000 0000  |    |		.XXX[0x3]
052f 0000       |    |
0530 ; --------------------------------------------------------------------------------------
0530 ; Debug Table
0530 ; --------------------------------------------------------------------------------------
0530 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x4e7d,0x0000,0x0001,0x0000
0536 62b8 4000  |b @ |		.XXX[0xca]
0538 2378 1781  |#x  |
053a 8202 4000  |  @ |
053c 3c8a 0000  |<   |
053e 6a02 4000  |j @ |
0540 7308 1781  |s   |
0542 827f 0100  |    |
0544 0240 4000  | @@ |
0546 5e02 4000  |^ @ |
0548 208a 0000  |    |
054a 5202 4000  |R @ |
054c 7100 07e8  |q   |
054e e240 4000  | @@ |
0550 5c42 0001  |\B  |
0552 eeb8 4080  |  @ |
0554 0640 4000  | @@ |
0556 5d00 0003  |]   |
0558 5a48 1eff  |ZH  |
055a a042 0000  | B  |
055c 4eb0 4000  |N @ |
055e 2240 4000  |"@@ |
0560 5d00 0005  |]   |
0562 3e48 1eff  |>H  |
0564 a042 0000  | B  |
0566 3ab0 4000  |: @ |
0568 2100 0001  |!   |
056a c648 1eff  | H  |
056c a042 0000  | B  |
056e 2ab0 4000  |* @ |
0570 200a ffff  |    |
0572 de02 9c80  |    |
0574 040a ffff  |    |
0576 c202 9c80  |    |
0578 088a ffff  |    |
057a e240 4000  | @@ |
057c 5c42 ffff  |\B  |
057e da40 4000  | @@ |
0580 5e02 4000  |^ @ |
0582 584a 0001  |XJ  |
0584 6ae0 4080  |j @ |
0586 0750 1780  | P  |
0588 e248 4000  | H@ |
058a 6900 0026  |i  &|
058c 4240 4000  |B@@ |
058e 6602 4000  |f @ |
0590 208a 0000  |    |
0592 8a02 4000  |  @ |
0594 6fd0 1a00  |o   |
0596 0202 3a82  |  : |
0598 008a 0000  |    |
059a 4b50 1eff  |KP  |
059c a290 1eff  |    |
059e a3a0 1200  |    |
05a0 0340 1280  | @  |
05a2 1288 1780  |    |
05a4 83a0 9180  |    |
05a6 03a0 1280  |    |
05a8 2340 9180  |#@  |
05aa 1340 1280  | @  |
05ac 33a0 9180  |3   |
05ae 23a0 1280  |#   |
05b0 4340 9180  |C@  |
05b2 3390 1280  |3   |
05b4 53a0 9180  |S   |
05b6 42e0 4080  |B @ |
05b8 0042 0000  | B  |
05ba ff90 9180  |    |
05bc 5202 4000  |R @ |
05be 280a 0000  |(   |
05c0 1e50 2afd  | P* |
05c2 ff50 9eff  | P  |
05c4 a250 4080  | P@ |
05c6 0240 4000  | @@ |
05c8 6100 0891  |a   |
05ca ea48 1eff  | H  |
05cc a100 0008  |    |
05ce 4240 4000  |B@@ |
05d0 5c42 0000  |\B  |
05d2 cee0 4080  |  @ |
05d4 0c8a 0000  |    |
05d6 ca42 4000  | B@ |
05d8 7358 1781  |sX  |
05da 7202 4000  |r @ |
05dc 2c8a 0000  |,   |
05de 2668 1eff  |&h  |
05e0 a308 1781  |    |
05e2 727f 0100  |r   |
05e4 0240 4000  | @@ |
05e6 5e02 4000  |^ @ |
05e8 20ca 0000  |    |
05ea a242 4000  | B@ |
05ec 7268 1eff  |rh  |
05ee a380 0d00  |    |
05f0 0390 0d80  |    |
05f2 1260 1780  | `  |
05f4 8380 8c80  |    |
05f6 0380 0d80  |    |
05f8 2390 8c80  |#   |
05fa 1390 0d80  |    |
05fc 3380 8c80  |3   |
05fe 2380 0d80  |#   |