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

⟦62ffe17a5⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5f28f0

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 06d8       |    |		.CONST	0x06d8								; 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 8003       |    |		.CONST	0x8003								; 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 00aa       |    |		.CONST	0x00aa								; Address of begin
0019 01a5       |    |		.CONST	0x01a5								; Address of exception handler
001a 0027       | '  |		.CONST	0x0027								; Number of locals
001b			INIT_0018:
001b e001       |    |		Load	0x0,0x1
001c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
001d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
001e 4820       |H   |		Short_Literal	0x20
001f e5fe       |    |		Load	0x2,-0x2
0020 e002       |    |		Load	0x0,0x2
0021 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0022 e002       |    |		Load	0x0,0x2
0023 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0024 482e       |H.  |		Short_Literal	0x2e
0025 00da       |    |		Load_Top	At_Offset_2
0026 01cb       |    |		Execute	Vector,Append
0027 e5ff       |    |		Load	0x2,-0x1
0028 e002       |    |		Load	0x0,0x2
0029 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
002a 01cc       |    |		Execute	Vector,Catenate
002b 0007       |    |		Action	Break_Optional
002c 00d8       |    |		Load_Top	At_Offset_0
002d 482e       |H.  |		Short_Literal	0x2e
002e e402       |    |		Load	0x2,0x2
002f 01cb       |    |		Execute	Vector,Append
0030 0092 02c9  |    |		Action	Push_String_Extended,0x2c9					; "<NONE>"
0032 01cc       |    |		Execute	Vector,Catenate
0033 01de       |    |		Execute	Vector,Not_Equal
0034 0007       |    |		Action	Break_Optional
0035 00d9       |    |		Load_Top	At_Offset_1
0036 0092 02ca  |    |		Action	Push_String_Extended,0x2ca					; "_PROBLEMS"
0038 01cc       |    |		Execute	Vector,Catenate
0039 0007       |    |		Action	Break_Optional
003a 0092 02cb  |    |		Action	Push_String_Extended,0x2cb					; "R1000,REPLACE,PROMOTE,REMAKE"
003c e5fd       |    |		Load	0x2,-0x3
003d 0335       | 5  |		Declare_Variable	Array,Duplicate
003e 00cd       |    |		Action	Spare6_Action
003f 0092 02cc  |    |		Action	Push_String_Extended,0x2cc					; "PROPAGATE,"
0041 e5fd       |    |		Load	0x2,-0x3
0042 01cc       |    |		Execute	Vector,Catenate
0043 0007       |    |		Action	Break_Optional
0044 0092 02cd  |    |		Action	Push_String_Extended,0x2cd					; "PROPAGATE,++*,!!!,***,%%%"
0046 0092 02ce  |    |		Action	Push_String_Extended,0x2ce					; "PERSEVERE,"
0048 e5fd       |    |		Load	0x2,-0x3
0049 01cc       |    |		Execute	Vector,Catenate
004a 0007       |    |		Action	Break_Optional
004b 0092 02cf  |    |		Action	Push_String_Extended,0x2cf					; "!MACHINE.RELEASE.CURRENT.COMMANDS"
004d 0092 02d0  |    |		Action	Push_String_Extended,0x2d0					; "!COMPILER_INTERFACE.SUBSYSTEM_INTERFACE"
004f 0092 02d1  |    |		Action	Push_String_Extended,0x2d1					; "!MACHINE.RELEASE.CURRENT.ACTIVITY"
0051 e402       |    |		Load	0x2,0x2
0052 0092 02d2  |    |		Action	Push_String_Extended,0x2d2					; ".ACL_INFORMATION"
0054 01cc       |    |		Execute	Vector,Catenate
0055 0007       |    |		Action	Break_Optional
0056 e402       |    |		Load	0x2,0x2
0057 0092 02d3  |    |		Action	Push_String_Extended,0x2d3					; ".ACTIVITY_ARCHIVE"
0059 01cc       |    |		Execute	Vector,Catenate
005a 0007       |    |		Action	Break_Optional
005b e402       |    |		Load	0x2,0x2
005c 0092 02d4  |    |		Action	Push_String_Extended,0x2d4					; ".ACTIVITY_FILE"
005e 01cc       |    |		Execute	Vector,Catenate
005f 0007       |    |		Action	Break_Optional
0060 e402       |    |		Load	0x2,0x2
0061 0092 02d5  |    |		Action	Push_String_Extended,0x2d5					; ".FREEZE_LIBRARY_FILE"
0063 01cc       |    |		Execute	Vector,Catenate
0064 0007       |    |		Action	Break_Optional
0065 e402       |    |		Load	0x2,0x2
0066 0092 02d6  |    |		Action	Push_String_Extended,0x2d6					; ".CODE_FILE"
0068 01cc       |    |		Execute	Vector,Catenate
0069 0007       |    |		Action	Break_Optional
006a e402       |    |		Load	0x2,0x2
006b 0092 02d7  |    |		Action	Push_String_Extended,0x2d7					; ".DEMOTE_FILE"
006d 01cc       |    |		Execute	Vector,Catenate
006e 0007       |    |		Action	Break_Optional
006f e402       |    |		Load	0x2,0x2
0070 0092 02d8  |    |		Action	Push_String_Extended,0x2d8					; ".FREEZE_FILE"
0072 01cc       |    |		Execute	Vector,Catenate
0073 0007       |    |		Action	Break_Optional
0074 e402       |    |		Load	0x2,0x2
0075 0092 02d9  |    |		Action	Push_String_Extended,0x2d9					; ".INSTALL_FILE"
0077 01cc       |    |		Execute	Vector,Catenate
0078 0007       |    |		Action	Break_Optional
0079 0092 02da  |    |		Action	Push_String_Extended,0x2da					; "!MACHINE.TRANSPORT_SERVICES"
007b e402       |    |		Load	0x2,0x2
007c 0092 02db  |    |		Action	Push_String_Extended,0x2db					; ".TRANSPORT_SERVICES"
007e 01cc       |    |		Execute	Vector,Catenate
007f 0007       |    |		Action	Break_Optional
0080 e402       |    |		Load	0x2,0x2
0081 0092 02dc  |    |		Action	Push_String_Extended,0x2dc					; ".TOOLS_ARCHIVE"
0083 01cc       |    |		Execute	Vector,Catenate
0084 0007       |    |		Action	Break_Optional
0085 e402       |    |		Load	0x2,0x2
0086 0092 02dd  |    |		Action	Push_String_Extended,0x2dd					; ".RELEASE_CONTENTS"
0088 01cc       |    |		Execute	Vector,Catenate
0089 0007       |    |		Action	Break_Optional
008a 029e 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Call,Unelaborated
008c 481b       |H   |		Short_Literal	0x1b
008d 4802       |H   |		Short_Literal	0x2
008e 0099       |    |		Action	Reference_Dynamic
008f 481b       |H   |		Short_Literal	0x1b
0090 4802       |H   |		Short_Literal	0x2
0091 0099       |    |		Action	Reference_Dynamic
0092 481b       |H   |		Short_Literal	0x1b
0093 4802       |H   |		Short_Literal	0x2
0094 0099       |    |		Action	Reference_Dynamic
0095 00c7       |    |		Action	Elaborate_Subprogram
0096 029f 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Call
0098 029f 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Call
009a 029f 020b  |    |		Declare_Subprogram	INIT_0208,For_Call
009c 029f 021b  |    |		Declare_Subprogram	INIT_0218,For_Call
009e 029f 022b  |   +|		Declare_Subprogram	INIT_0228,For_Call
00a0 029f 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Call
00a2 029f 0253  |   S|		Declare_Subprogram	INIT_0250,For_Call
00a4 029f 0273  |   s|		Declare_Subprogram	INIT_0270,For_Call
00a6 029f 0283  |    |		Declare_Subprogram	INIT_0280,For_Call
00a8 029f 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Call
00aa			BODY_0018:
00aa e5fd       |    |		Load	0x2,-0x3
00ab e003       |    |		Load	0x0,0x3
00ac 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
00ad e003       |    |		Load	0x0,0x3
00ae 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00af e405       |    |		Load	0x2,0x5
00b0 680c       |h   |		Jump_Zero	0xbd
00b1 4801       |H   |		Short_Literal	0x1
00b2 4803       |H   |		Short_Literal	0x3
00b3 4822       |H"  |		Short_Literal	0x22
00b4 0092 02de  |    |		Action	Push_String_Extended,0x2de					; "DTIA installation is being logged to file \x22"
00b6 e404       |    |		Load	0x2,0x4
00b7 01cc       |    |		Execute	Vector,Catenate
00b8 01cb       |    |		Execute	Vector,Append
00b9 841c       |    |		Call	0x2,0x1c
00ba e404       |    |		Load	0x2,0x4
00bb e004       |    |		Load	0x0,0x4
00bc 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00bd 4800       |H   |		Short_Literal	0x0
00be 4800       |H   |		Short_Literal	0x0
00bf 0092 02df  |    |		Action	Push_String_Extended,0x2df					; "[Install_Dtia (Log_File => \x22"
00c1 e404       |    |		Load	0x2,0x4
00c2 01cc       |    |		Execute	Vector,Catenate
00c3 0092 02e0  |    |		Action	Push_String_Extended,0x2e0					; "\x22, Response => \x22"
00c5 01cc       |    |		Execute	Vector,Catenate
00c6 e5fd       |    |		Load	0x2,-0x3
00c7 01cc       |    |		Execute	Vector,Catenate
00c8 0092 02e1  |    |		Action	Push_String_Extended,0x2e1					; "\x22);]"
00ca 01cc       |    |		Execute	Vector,Catenate
00cb 841b       |    |		Call	0x2,0x1b
00cc 4801       |H   |		Short_Literal	0x1
00cd 4803       |H   |		Short_Literal	0x3
00ce 0092 02e2  |    |		Action	Push_String_Extended,0x2e2					; "Beginning Installation of DTIA"
00d0 841c       |    |		Call	0x2,0x1c
00d1 4800       |H   |		Short_Literal	0x0
00d2 4802       |H   |		Short_Literal	0x2
00d3 0092 02e3  |    |		Action	Push_String_Extended,0x2e3					; "Enabling Operator privileges ..."
00d5 841b       |    |		Call	0x2,0x1b
00d6 4801       |H   |		Short_Literal	0x1
00d7 e005       |    |		Load	0x0,0x5
00d8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00d9 e005       |    |		Load	0x0,0x5
00da 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00db 6806       |h   |		Jump_Zero	0xe2
00dc 4801       |H   |		Short_Literal	0x1
00dd 4803       |H   |		Short_Literal	0x3
00de 0092 02e4  |    |		Action	Push_String_Extended,0x2e4					; "Operator Privileges Enabled."
00e0 841c       |    |		Call	0x2,0x1c
00e1 7808       |x   |		Jump	0xea
00e2 4801       |H   |		Short_Literal	0x1
00e3 4807       |H   |		Short_Literal	0x7
00e4 0092 02e5  |    |		Action	Push_String_Extended,0x2e5					; "Unable to enable Operator privileges.  Be sure you are logged in as OPERATOR!!"
00e6 841d       |    |		Call	0x2,0x1d
00e7 e003       |    |		Load	0x0,0x3
00e8 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
00e9 0257       | W  |		Execute	Discrete,Raise
00ea 8423       | #  |		Call	0x2,0x23
00eb 6806       |h   |		Jump_Zero	0xf2
00ec 4801       |H   |		Short_Literal	0x1
00ed 4803       |H   |		Short_Literal	0x3
00ee 0092 02e6  |    |		Action	Push_String_Extended,0x2e6					; "Authorization checks succeeded, beginning installation."
00f0 841c       |    |		Call	0x2,0x1c
00f1 7808       |x   |		Jump	0xfa
00f2 4801       |H   |		Short_Literal	0x1
00f3 4807       |H   |		Short_Literal	0x7
00f4 0092 02e7  |    |		Action	Push_String_Extended,0x2e7					; "Installation cannot proceed until products have been authorized.  Refer to the installation guide for required products."
00f6 841d       |    |		Call	0x2,0x1d
00f7 e003       |    |		Load	0x0,0x3
00f8 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
00f9 0257       | W  |		Execute	Discrete,Raise
00fa 4800       |H   |		Short_Literal	0x0
00fb 4802       |H   |		Short_Literal	0x2
00fc 0092 02e8  |    |		Action	Push_String_Extended,0x2e8					; "Saving ACLs of existing objects to be updated by this release."
00fe 841b       |    |		Call	0x2,0x1b
00ff e5fd       |    |		Load	0x2,-0x3
0100 e40f       |    |		Load	0x2,0xf
0101 e41a       |    |		Load	0x2,0x1a
0102 8420       |    |		Call	0x2,0x20
0103 8006       |    |		Call	0x0,0x6
0104 4801       |H   |		Short_Literal	0x1
0105 4803       |H   |		Short_Literal	0x3
0106 0092 02e9  |    |		Action	Push_String_Extended,0x2e9					; "The ACLs of existing objects have been saved."
0108 841c       |    |		Call	0x2,0x1c
0109 4800       |H   |		Short_Literal	0x0
010a 4802       |H   |		Short_Literal	0x2
010b 0092 02ea  |    |		Action	Push_String_Extended,0x2ea					; "Recording DTIA dependents ..."
010d 841b       |    |		Call	0x2,0x1b
010e e409       |    |		Load	0x2,0x9
010f e415       |    |		Load	0x2,0x15
0110 e413       |    |		Load	0x2,0x13
0111 e416       |    |		Load	0x2,0x16
0112 e414       |    |		Load	0x2,0x14
0113 e41a       |    |		Load	0x2,0x1a
0114 8420       |    |		Call	0x2,0x20
0115 8007       |    |		Call	0x0,0x7
0116 8421       | !  |		Call	0x2,0x21
0117 8427       | '  |		Call	0x2,0x27
0118 4800       |H   |		Short_Literal	0x0
0119 4802       |H   |		Short_Literal	0x2
011a 0092 02eb  |    |		Action	Push_String_Extended,0x2eb					; "Restoring Tools from Archives."
011c 841b       |    |		Call	0x2,0x1b
011d e408       |    |		Load	0x2,0x8
011e e419       |    |		Load	0x2,0x19
011f e407       |    |		Load	0x2,0x7
0120 0092 02ec  |    |		Action	Push_String_Extended,0x2ec					; "*"
0122 0092 02ec  |    |		Action	Push_String_Extended,0x2ec					; "*"
0124 0092 02ed  |    |		Action	Push_String_Extended,0x2ed					; "?"
0126 e008       |    |		Load	0x0,0x8
0127 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0128 4801       |H   |		Short_Literal	0x1
0129 4803       |H   |		Short_Literal	0x3
012a 0092 02ee  |    |		Action	Push_String_Extended,0x2ee					; "The Tools have been restored from Archive."
012c 841c       |    |		Call	0x2,0x1c
012d 4800       |H   |		Short_Literal	0x0
012e 4802       |H   |		Short_Literal	0x2
012f 0092 02ef  |    |		Action	Push_String_Extended,0x2ef					; "Restoring release activity from archive."
0131 841b       |    |		Call	0x2,0x1b
0132 e408       |    |		Load	0x2,0x8
0133 e410       |    |		Load	0x2,0x10
0134 e407       |    |		Load	0x2,0x7
0135 0092 02ec  |    |		Action	Push_String_Extended,0x2ec					; "*"
0137 0092 02ec  |    |		Action	Push_String_Extended,0x2ec					; "*"
0139 0092 02ed  |    |		Action	Push_String_Extended,0x2ed					; "?"
013b e008       |    |		Load	0x0,0x8
013c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
013d 4801       |H   |		Short_Literal	0x1
013e 4803       |H   |		Short_Literal	0x3
013f 0092 02f0  |    |		Action	Push_String_Extended,0x2f0					; "The release activity has been restored from Archive."
0141 841c       |    |		Call	0x2,0x1c
0142 4800       |H   |		Short_Literal	0x0
0143 4802       |H   |		Short_Literal	0x2
0144 0092 02f1  |    |		Action	Push_String_Extended,0x2f1					; "Updating system wide activity file."
0146 841b       |    |		Call	0x2,0x1b
0147 e409       |    |		Load	0x2,0x9
0148 e40e       |    |		Load	0x2,0xe
0149 4801       |H   |		Short_Literal	0x1
014a 0092 02ed  |    |		Action	Push_String_Extended,0x2ed					; "?"
014c 0092 02ed  |    |		Action	Push_String_Extended,0x2ed					; "?"
014e 0092 02ed  |    |		Action	Push_String_Extended,0x2ed					; "?"
0150 e411       |    |		Load	0x2,0x11
0151 e009       |    |		Load	0x0,0x9
0152 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0153 4801       |H   |		Short_Literal	0x1
0154 4803       |H   |		Short_Literal	0x3
0155 0092 02f2  |    |		Action	Push_String_Extended,0x2f2					; "The system wide activity file has been updated."
0157 841c       |    |		Call	0x2,0x1c
0158 8424       | $  |		Call	0x2,0x24
0159 e409       |    |		Load	0x2,0x9
015a 4801       |H   |		Short_Literal	0x1
015b 4800       |H   |		Short_Literal	0x0
015c e41a       |    |		Load	0x2,0x1a
015d 8420       |    |		Call	0x2,0x20
015e e00a       |    |		Load	0x0,0xa
015f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0160 4800       |H   |		Short_Literal	0x0
0161 4802       |H   |		Short_Literal	0x2
0162 0092 02f3  |    |		Action	Push_String_Extended,0x2f3					; "Setting Access Controls for the DTIA Tools."
0164 841b       |    |		Call	0x2,0x1b
0165 e40a       |    |		Load	0x2,0xa
0166 e41a       |    |		Load	0x2,0x1a
0167 8420       |    |		Call	0x2,0x20
0168 0092 02f4  |    |		Action	Push_String_Extended,0x2f4					; "'C(ADA,FILE,WORLD)"
016a 01cc       |    |		Execute	Vector,Catenate
016b 0092 02f5  |    |		Action	Push_String_Extended,0x2f5					; "Public => RWCOD"
016d e00b       |    |		Load	0x0,0xb
016e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
016f 4801       |H   |		Short_Literal	0x1
0170 4803       |H   |		Short_Literal	0x3
0171 0092 02f6  |    |		Action	Push_String_Extended,0x2f6					; "Access Controls established for new DTIA objects"
0173 841c       |    |		Call	0x2,0x1c
0174 e5fd       |    |		Load	0x2,-0x3
0175 e40f       |    |		Load	0x2,0xf
0176 800c       |    |		Call	0x0,0xc
0177 4801       |H   |		Short_Literal	0x1
0178 4803       |H   |		Short_Literal	0x3
0179 0092 02f7  |    |		Action	Push_String_Extended,0x2f7					; "Access Controls established for updated DTIA objects"
017b 841c       |    |		Call	0x2,0x1c
017c 8422       | "  |		Call	0x2,0x22
017d 4800       |H   |		Short_Literal	0x0
017e 4800       |H   |		Short_Literal	0x0
017f 0092 02f8  |    |		Action	Push_String_Extended,0x2f8					; "[Install_Dtia has completed]"
0181 841b       |    |		Call	0x2,0x1b
0182 e405       |    |		Load	0x2,0x5
0183 681b       |h   |		Jump_Zero	0x19f
0184 e004       |    |		Load	0x0,0x4
0185 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0186 4801       |H   |		Short_Literal	0x1
0187 4803       |H   |		Short_Literal	0x3
0188 4822       |H"  |		Short_Literal	0x22
0189 0092 02f9  |    |		Action	Push_String_Extended,0x2f9					; "Producing Installation Problems Log \x22"
018b e406       |    |		Load	0x2,0x6
018c 01cc       |    |		Execute	Vector,Catenate
018d 01cb       |    |		Execute	Vector,Append
018e 841c       |    |		Call	0x2,0x1c
018f 4800       |H   |		Short_Literal	0x0
0190 4800       |H   |		Short_Literal	0x0
0191 4800       |H   |		Short_Literal	0x0
0192 4801       |H   |		Short_Literal	0x1
0193 4801       |H   |		Short_Literal	0x1
0194 4801       |H   |		Short_Literal	0x1
0195 4800       |H   |		Short_Literal	0x0
0196 4801       |H   |		Short_Literal	0x1
0197 4800       |H   |		Short_Literal	0x0
0198 4800       |H   |		Short_Literal	0x0
0199 4801       |H   |		Short_Literal	0x1
019a 4801       |H   |		Short_Literal	0x1
019b e406       |    |		Load	0x2,0x6
019c e404       |    |		Load	0x2,0x4
019d e004       |    |		Load	0x0,0x4
019e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
019f 4801       |H   |		Short_Literal	0x1
01a0 4803       |H   |		Short_Literal	0x3
01a1 0092 02fa  |    |		Action	Push_String_Extended,0x2fa					; "Install_Dtia has completed.  Refer back to the Install Guide to complete the installation."
01a3 841c       |    |		Call	0x2,0x1c
01a4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01a5			TRAP_0018:
01a5 e003       |    |		Load	0x0,0x3
01a6 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
01a7 010f       |    |		Execute	Exception,Equal
01a8 6823       |h#  |		Jump_Zero	0x1cc
01a9 4800       |H   |		Short_Literal	0x0
01aa 4800       |H   |		Short_Literal	0x0
01ab 0092 02fb  |    |		Action	Push_String_Extended,0x2fb					; "[Install_Dtia has failed with errors]"
01ad 841b       |    |		Call	0x2,0x1b
01ae e405       |    |		Load	0x2,0x5
01af 681b       |h   |		Jump_Zero	0x1cb
01b0 e004       |    |		Load	0x0,0x4
01b1 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01b2 4801       |H   |		Short_Literal	0x1
01b3 4803       |H   |		Short_Literal	0x3
01b4 4822       |H"  |		Short_Literal	0x22
01b5 0092 02f9  |    |		Action	Push_String_Extended,0x2f9					; "Producing Installation Problems Log \x22"
01b7 e406       |    |		Load	0x2,0x6
01b8 01cc       |    |		Execute	Vector,Catenate
01b9 01cb       |    |		Execute	Vector,Append
01ba 841c       |    |		Call	0x2,0x1c
01bb 4800       |H   |		Short_Literal	0x0
01bc 4800       |H   |		Short_Literal	0x0
01bd 4800       |H   |		Short_Literal	0x0
01be 4801       |H   |		Short_Literal	0x1
01bf 4801       |H   |		Short_Literal	0x1
01c0 4801       |H   |		Short_Literal	0x1
01c1 4800       |H   |		Short_Literal	0x0
01c2 4801       |H   |		Short_Literal	0x1
01c3 4800       |H   |		Short_Literal	0x0
01c4 4800       |H   |		Short_Literal	0x0
01c5 4801       |H   |		Short_Literal	0x1
01c6 4801       |H   |		Short_Literal	0x1
01c7 e406       |    |		Load	0x2,0x6
01c8 e404       |    |		Load	0x2,0x4
01c9 e004       |    |		Load	0x0,0x4
01ca 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01cb 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01cc 0100       |    |		Execute	Exception,Raise
01cd 0000 0000  |    |		.XXX[0x3]
01cf 0000       |    |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d6       |    |		.CONST	0x01d6								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0003       |    |		.CONST	0x0003								; Number of locals
01d3			INIT_01d0:
01d3 00ea       |    |		Load_Encached	Null_String_Cache
01d4 029f 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Call
01d6			BODY_01d0:
01d6 e7fd       |    |		Load	0x3,-0x3
01d7 6801       |h   |		Jump_Zero	0x1d9
01d8 8603       |    |		Call	0x3,0x3
01d9 e003       |    |		Load	0x0,0x3
01da 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01db e7fe       |    |		Load	0x3,-0x2
01dc 00db       |    |		Load_Top	At_Offset_3
01dd e7ff       |    |		Load	0x3,-0x1
01de 01cc       |    |		Execute	Vector,Catenate
01df e004       |    |		Load	0x0,0x4
01e0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01e1 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01e2 0000 0000  |    |		.BLANK	0000[0x6]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb 00da       |    |		Load_Top	At_Offset_2
01ec e001       |    |		Load	0x0,0x1
01ed 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01ee 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
01ef 01db       |    |		Execute	Vector,Length
01f0 0e00       |    |		Execute_Immediate	Not_Equal,0x0
01f1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f2 0000 0000  |    |		.BLANK	0000[0x6]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 4801       |H   |		Short_Literal	0x1
01fc e403       |    |		Load	0x2,0x3
01fd e7ff       |    |		Load	0x3,-0x1
01fe e002       |    |		Load	0x0,0x2
01ff 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0200 0e00       |    |		Execute_Immediate	Not_Equal,0x0
0201 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0202 0000 0000  |    |		.BLANK	0000[0x6]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b 485d       |H]  |		Short_Literal	0x5d
020c 0092 02fc  |    |		Action	Push_String_Extended,0x2fc					; "[_"
020e e7ff       |    |		Load	0x3,-0x1
020f 01cc       |    |		Execute	Vector,Catenate
0210 01cb       |    |		Execute	Vector,Append
0211 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0212 0000 0000  |    |		.BLANK	0000[0x6]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b       |    |		.CONST	0x021b								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0001       |    |		.CONST	0x0001								; Number of locals
021b			BODY_0218:
021b			INIT_0218:
021b e40b       |    |		Load	0x2,0xb
021c 4800       |H   |		Short_Literal	0x0
021d e415       |    |		Load	0x2,0x15
021e 8420       |    |		Call	0x2,0x20
021f e00a       |    |		Load	0x0,0xa
0220 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0221 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0222 0000 0000  |    |		.BLANK	0000[0x6]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b e40b       |    |		Load	0x2,0xb
022c 4800       |H   |		Short_Literal	0x0
022d e415       |    |		Load	0x2,0x15
022e 8420       |    |		Call	0x2,0x20
022f e00a       |    |		Load	0x0,0xa
0230 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0231 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0232 0000 0000  |    |		.BLANK	0000[0x6]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023d       | =  |		.CONST	0x023d								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0002       |    |		.CONST	0x0002								; Number of locals
023b			INIT_0238:
023b 00e1       |    |		Load_Encached	Boolean_Cache
023c 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
023d			BODY_0238:
023d 4800       |H   |		Short_Literal	0x0
023e 4802       |H   |		Short_Literal	0x2
023f 0092 02fd  |    |		Action	Push_String_Extended,0x2fd					; "Checking product authorization ..."
0241 841b       |    |		Call	0x2,0x1b
0242 0092 02fe  |    |		Action	Push_String_Extended,0x2fe					; "DTIA"
0244 e00d       |    |		Load	0x0,0xd
0245 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0246 7007       |p   |		Jump_Nonzero	0x24e
0247 4801       |H   |		Short_Literal	0x1
0248 4807       |H   |		Short_Literal	0x7
0249 0092 02ff  |    |		Action	Push_String_Extended,0x2ff					; "The Dtia product is not authorized on this machine"
024b 841d       |    |		Call	0x2,0x1d
024c 4800       |H   |		Short_Literal	0x0
024d 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
024e 00d8       |    |		Load_Top	At_Offset_0
024f 00ca       |    |		Action	Exit_Nullary_Function
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0258       | X  |		.CONST	0x0258								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0002       |    |		.CONST	0x0002								; Number of locals
0253			INIT_0250:
0253 e003       |    |		Load	0x0,0x3
0254 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0255 e003       |    |		Load	0x0,0x3
0256 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0257 011e       |    |		Execute	Any,Convert
0258			BODY_0250:
0258 4800       |H   |		Short_Literal	0x0
0259 4802       |H   |		Short_Literal	0x2
025a 0092 0300  |    |		Action	Push_String_Extended,0x300					; "Updating command links."
025c 841b       |    |		Call	0x2,0x1b
025d 0092 0301  |    |		Action	Push_String_Extended,0x301					; "<QUIET>"
025f e003       |    |		Load	0x0,0x3
0260 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0261 e003       |    |		Load	0x0,0x3
0262 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0263 e40c       |    |		Load	0x2,0xc
0264 e411       |    |		Load	0x2,0x11
0265 800e       |    |		Call	0x0,0xe
0266 00d8       |    |		Load_Top	At_Offset_0
0267 e003       |    |		Load	0x0,0x3
0268 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0269 4801       |H   |		Short_Literal	0x1
026a 4803       |H   |		Short_Literal	0x3
026b 0092 0302  |    |		Action	Push_String_Extended,0x302					; "The command links have been updated."
026d 841c       |    |		Call	0x2,0x1c
026e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
026f 0000       |    |		.XXX[0x1]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 0092 0303  |    |		Action	Push_String_Extended,0x303					; "!MACHINE.RELEASE.ARCHIVE.DTIA."
0275 e402       |    |		Load	0x2,0x2
0276 e001       |    |		Load	0x0,0x1
0277 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0278 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0279 01cc       |    |		Execute	Vector,Catenate
027a 0092 0304  |    |		Action	Push_String_Extended,0x304					; ".SEGMENTS"
027c 01cc       |    |		Execute	Vector,Catenate
027d 00ca       |    |		Action	Exit_Nullary_Function
027e 0000 0000  |    |		.XXX[0x2]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 028c       |    |		.CONST	0x028c								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0003       |    |		.CONST	0x0003								; Number of locals
0283			INIT_0280:
0283 8425       | %  |		Call	0x2,0x25
0284 e001       |    |		Load	0x0,0x1
0285 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0286 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0287 00d8       |    |		Load_Top	At_Offset_0
0288 0092 0305  |    |		Action	Push_String_Extended,0x305					; ":DTIA"
028a 01cc       |    |		Execute	Vector,Catenate
028b 0007       |    |		Action	Break_Optional
028c			BODY_0280:
028c 00d9       |    |		Load_Top	At_Offset_1
028d 01db       |    |		Execute	Vector,Length
028e 680f       |h   |		Jump_Zero	0x29e
028f 4800       |H   |		Short_Literal	0x0
0290 4802       |H   |		Short_Literal	0x2
0291 0092 0306  |    |		Action	Push_String_Extended,0x306					; "Loading DTIA environment subsystem."
0293 841b       |    |		Call	0x2,0x1b
0294 4801       |H   |		Short_Literal	0x1
0295 00ea       |    |		Load_Encached	Null_String_Cache
0296 00ea       |    |		Load_Encached	Null_String_Cache
0297 00db       |    |		Load_Top	At_Offset_3
0298 800f       |    |		Call	0x0,0xf
0299 4801       |H   |		Short_Literal	0x1
029a 4803       |H   |		Short_Literal	0x3
029b 0092 0307  |    |		Action	Push_String_Extended,0x307					; "DTIA environment subsystem has been loaded."
029d 841c       |    |		Call	0x2,0x1c
029e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
029f 0000       |    |		.XXX[0x1]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 e417       |    |		Load	0x2,0x17
02a4 841e       |    |		Call	0x2,0x1e
02a5 7012       |p   |		Jump_Nonzero	0x2b8
02a6 4800       |H   |		Short_Literal	0x0
02a7 4802       |H   |		Short_Literal	0x2
02a8 0092 0308  |    |		Action	Push_String_Extended,0x308					; "Installing a new !MACHINE.TRANSPORT_SERVICES file."
02aa 841b       |    |		Call	0x2,0x1b
02ab 00ea       |    |		Load_Encached	Null_String_Cache
02ac 4800       |H   |		Short_Literal	0x0
02ad e409       |    |		Load	0x2,0x9
02ae 4800       |H   |		Short_Literal	0x0
02af e417       |    |		Load	0x2,0x17
02b0 e418       |    |		Load	0x2,0x18
02b1 e00a       |    |		Load	0x0,0xa
02b2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02b3 4801       |H   |		Short_Literal	0x1
02b4 4803       |H   |		Short_Literal	0x3
02b5 0092 0309  |    |		Action	Push_String_Extended,0x309					; "!MACHINE.TRANSPORT_SERVICES has been installed."
02b7 841c       |    |		Call	0x2,0x1c
02b8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02b9 0000 0000  |    |		.BLANK	0000[0x7]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3       |    |		.CONST	0x02c3								; Address of begin
02c1 02c7       |    |		.CONST	0x02c7								; Address of exception handler
02c2 0001       |    |		.CONST	0x0001								; Number of locals
02c3			BODY_02c0:
02c3			INIT_02c0:
02c3 e7ff       |    |		Load	0x3,-0x1
02c4 e010       |    |		Load	0x0,0x10
02c5 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
02c6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02c7			TRAP_02c0:
02c7 0007       |    |		Action	Break_Optional
02c8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02c9 ; --------------------------------------------------------------------------------------
02c9 ; STRING TABLE
02c9 ; --------------------------------------------------------------------------------------
02c9 0084       |    |		.STRTAB	0x0084->0x030b							; "<NONE>"
02ca 0088       |    |		.STRTAB	0x0088->0x030e							; "_PROBLEMS"
02cb 008f       |    |		.STRTAB	0x008f->0x0312							; "R1000,REPLACE,PROMOTE,REMAKE"
02cc 00a9       |    |		.STRTAB	0x00a9->0x0320							; "PROPAGATE,"
02cd 00b1       |    |		.STRTAB	0x00b1->0x0325							; "PROPAGATE,++*,!!!,***,%%%"
02ce 00c8       |    |		.STRTAB	0x00c8->0x0332							; "PERSEVERE,"
02cf 00d0       |    |		.STRTAB	0x00d0->0x0337							; "!MACHINE.RELEASE.CURRENT.COMMANDS"
02d0 00ef       |    |		.STRTAB	0x00ef->0x0347							; "!COMPILER_INTERFACE.SUBSYSTEM_INTERFACE"
02d1 0114       |    |		.STRTAB	0x0114->0x035b							; "!MACHINE.RELEASE.CURRENT.ACTIVITY"
02d2 0133       | 3  |		.STRTAB	0x0133->0x036b							; ".ACL_INFORMATION"
02d3 0141       | A  |		.STRTAB	0x0141->0x0373							; ".ACTIVITY_ARCHIVE"
02d4 0150       | P  |		.STRTAB	0x0150->0x037c							; ".ACTIVITY_FILE"
02d5 015c       | \  |		.STRTAB	0x015c->0x0383							; ".FREEZE_LIBRARY_FILE"
02d6 016e       | n  |		.STRTAB	0x016e->0x038d							; ".CODE_FILE"
02d7 0176       | v  |		.STRTAB	0x0176->0x0392							; ".DEMOTE_FILE"
02d8 0180       |    |		.STRTAB	0x0180->0x0398							; ".FREEZE_FILE"
02d9 018a       |    |		.STRTAB	0x018a->0x039e							; ".INSTALL_FILE"
02da 0195       |    |		.STRTAB	0x0195->0x03a4							; "!MACHINE.TRANSPORT_SERVICES"
02db 01ae       |    |		.STRTAB	0x01ae->0x03b2							; ".TRANSPORT_SERVICES"
02dc 01bf       |    |		.STRTAB	0x01bf->0x03bb							; ".TOOLS_ARCHIVE"
02dd 01cb       |    |		.STRTAB	0x01cb->0x03c2							; ".RELEASE_CONTENTS"
02de 01da       |    |		.STRTAB	0x01da->0x03cb							; "DTIA installation is being logged to file \x22"
02df 0203       |    |		.STRTAB	0x0203->0x03e0							; "[Install_Dtia (Log_File => \x22"
02e0 021d       |    |		.STRTAB	0x021d->0x03ee							; "\x22, Response => \x22"
02e1 022b       | +  |		.STRTAB	0x022b->0x03f6							; "\x22);]"
02e2 022d       | -  |		.STRTAB	0x022d->0x03f8							; "Beginning Installation of DTIA"
02e3 0249       | I  |		.STRTAB	0x0249->0x0407							; "Enabling Operator privileges ..."
02e4 0267       | g  |		.STRTAB	0x0267->0x0417							; "Operator Privileges Enabled."
02e5 0281       |    |		.STRTAB	0x0281->0x0425							; "Unable to enable Operator privileges.  Be sure you are logged in as OPERATOR!!"
02e6 02cd       |    |		.STRTAB	0x02cd->0x044c							; "Authorization checks succeeded, beginning installation."
02e7 0302       |    |		.STRTAB	0x0302->0x0468							; "Installation cannot proceed until products have been authorized.  Refer to the installation guide for required products."
02e8 0378       | x  |		.STRTAB	0x0378->0x04a4							; "Saving ACLs of existing objects to be updated by this release."
02e9 03b4       |    |		.STRTAB	0x03b4->0x04c3							; "The ACLs of existing objects have been saved."
02ea 03df       |    |		.STRTAB	0x03df->0x04d9							; "Recording DTIA dependents ..."
02eb 03fa       |    |		.STRTAB	0x03fa->0x04e8							; "Restoring Tools from Archives."
02ec 0416       |    |		.STRTAB	0x0416->0x04f7							; "*"
02ed 0415       |    |		.STRTAB	0x0415->0x04f7							; "?"
02ee 0414       |    |		.STRTAB	0x0414->0x04f8							; "The Tools have been restored from Archive."
02ef 043c       | <  |		.STRTAB	0x043c->0x050d							; "Restoring release activity from archive."
02f0 0462       | b  |		.STRTAB	0x0462->0x0521							; "The release activity has been restored from Archive."
02f1 0494       |    |		.STRTAB	0x0494->0x053b							; "Updating system wide activity file."
02f2 04b5       |    |		.STRTAB	0x04b5->0x054c							; "The system wide activity file has been updated."
02f3 04e2       |    |		.STRTAB	0x04e2->0x0564							; "Setting Access Controls for the DTIA Tools."
02f4 050b       |    |		.STRTAB	0x050b->0x0579							; "'C(ADA,FILE,WORLD)"
02f5 051b       |    |		.STRTAB	0x051b->0x0582							; "Public => RWCOD"
02f6 0528       | (  |		.STRTAB	0x0528->0x058a							; "Access Controls established for new DTIA objects"
02f7 0556       | V  |		.STRTAB	0x0556->0x05a2							; "Access Controls established for updated DTIA objects"
02f8 0588       |    |		.STRTAB	0x0588->0x05bc							; "[Install_Dtia has completed]"
02f9 05a2       |    |		.STRTAB	0x05a2->0x05ca							; "Producing Installation Problems Log \x22"
02fa 05c5       |    |		.STRTAB	0x05c5->0x05dc							; "Install_Dtia has completed.  Refer back to the Install Guide to complete the installation."
02fb 061d       |    |		.STRTAB	0x061d->0x0609							; "[Install_Dtia has failed with errors]"
02fc 0640       | @  |		.STRTAB	0x0640->0x061c							; "[_"
02fd 0640       | @  |		.STRTAB	0x0640->0x061d							; "Checking product authorization ..."
02fe 0660       | `  |		.STRTAB	0x0660->0x062e							; "DTIA"
02ff 0662       | b  |		.STRTAB	0x0662->0x0630							; "The Dtia product is not authorized on this machine"
0300 0692       |    |		.STRTAB	0x0692->0x0649							; "Updating command links."
0301 06a7       |    |		.STRTAB	0x06a7->0x0654							; "<QUIET>"
0302 06ac       |    |		.STRTAB	0x06ac->0x0658							; "The command links have been updated."
0303 06ce       |    |		.STRTAB	0x06ce->0x066a							; "!MACHINE.RELEASE.ARCHIVE.DTIA."
0304 06ea       |    |		.STRTAB	0x06ea->0x0679							; ".SEGMENTS"
0305 06f1       |    |		.STRTAB	0x06f1->0x067d							; ":DTIA"
0306 06f4       |    |		.STRTAB	0x06f4->0x0680							; "Loading DTIA environment subsystem."
0307 0715       |    |		.STRTAB	0x0715->0x0691							; "DTIA environment subsystem has been loaded."
0308 073e       | >  |		.STRTAB	0x073e->0x06a7							; "Installing a new !MACHINE.TRANSPORT_SERVICES file."
0309 076e       | n  |		.STRTAB	0x076e->0x06c0							; "!MACHINE.TRANSPORT_SERVICES has been installed."
030a 079b       |    |		.STREND 0x079b->0x06d7
030b 3c4e 4f4e  |<NON|		.STRTAB_STRINGS
06d8 ; --------------------------------------------------------------------------------------
06d8 ; Debug Table
06d8 ; --------------------------------------------------------------------------------------
06d8 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0xe7c4,0x0000,0x0001,0x0000
06de 885b 5858  | [XX|		.XXX[0xd]
06e0 da1a 5b99  |  [ |
06e2 4b99 591a  |K Y |
06e4 5d1b dc97  |]   |
06e6 d918 5d18  |  ] |
06e8 4b88 8809  |K   |
06ea 8288       |    |
06eb 0808 0808  |    |		.BLANK	0808[0xd]
06f8 10dd 5c9c  |  \ |		.XXX[0x16]
06fa 995b 9d17  | [  |
06fc d519 5c9b  |  \ |
06fe 5a5b 985b  |Z[ [|
0700 17d5 1e5c  |   \|
0702 1948 0988  | H  |
0704 0897 d8db  |    |
0706 db5b 585b  | [X[|
0708 991c c9d8  |    |
070a 9bd9 1e48  |   H|
070c 8a4b 0288  | K  |
070e 0808 0808  |    |		.BLANK	0808[0xb]
0719 111a 5c99  |  \ |		.XXX[0x17]
071b 58dd 1bdc  |X   |
071d 9e57 d51b  | W  |
071f dbdb 1ccb  |    |
0721 9059 1857  | Y W|
0723 d3d8 9a99  |    |
0725 58dd 0b92  |X   |
0727 5b9c dd18  |[   |
0729 5b1b 1959  |[  Y|
072b 0a48 1d1a  | H  |
072d 195b 8282  | [  |
072f 8808       |    |
0730 0808 0808  |    |		.BLANK	0808[0x9]
0739 0b4b 481b  | KH |		.XXX[0x21]
073b cb9a cb88  |    |
073d 18dd 5c9c  |  \ |
073f 995b 9d08  | [  |
0741 1d19 5c9b  |  \ |
0743 5a5b 985b  |Z[ [|
0745 081d 1e5c  |   \|
0747 1948 1a5c  | H \|
0749 c819 9a5b  |   [|
074b 994b 081b  | K  |
074d 195d 09dc  | ]  |
074f c81c da1d  |    |
0751 5d19 1bdd  |]   |
0753 db88 1a5b  |   [|
0755 880d 481b  |  H |
0757 5a5b 8b82  |Z[  |
0759 8288       |    |
075a 0808 0808  |    |		.BLANK	0808[0x9]
0763 0813 dc0b  |    |		.XXX[0x10]
0765 94da 1d5d  |   ]|
0767 191b dddb  |    |
0769 97d5 d85c  |   \|
076b 9b9a 5b99  |  [ |
076d c80a 0ccc  |    |
076f 0c0b 8c0a  |    |
0771 4ec2 8808  |N   |
0773 0808 0808  |    |		.BLANK	0808[0x9]
077c 13dc 0b94  |    |		.XXX[0x12]
077e da1d 5d19  |  ] |
0780 1bdd db88  |    |
0782 0a14 9958  |   X|
0784 5cdb db88  |\   |
0786 0f4f 8808  | O  |
0788 9499 5b19  |  [ |
078a 585c d948  |X\ H|
078c 8b02 8808  |    |
078e 0808 0808  |    |		.BLANK	0808[0xf]
079d 0811 5e1c  |  ^ |		.XXX[0x18]
079f 1b18 5b98  |  [ |
07a1 5d1a 5bdb  |] [ |
07a3 880f 4f88  |  O |
07a5 0892 5b9c  |  [ |
07a7 dd18 5b1b  |  [ |
07a9 0811 1d1a  |    |
07ab 5848 1499  |XH  |
07ad 5b19 585c  |[ X\|
07af d94c 97cc  | L  |
07b1 57cd 888a  |W   |
07b3 4ec2 8808  |N   |
07b5 0808 0808  |    |		.BLANK	0808[0x7]
07bc 195b 1cd9  | [  |		.XXX[0x3]
07be 4288       |B   |
07bf 0808 0808  |    |		.BLANK	0808[0x9]
07c8 080b 4b48  |  KH|		.XXX[0x1b]
07ca 10dd 5c9c  |  \ |
07cc 995b 9d08  | [  |
07ce 1d19 5c9b  |  \ |
07d0 5a5b 985b  |Z[ [|
07d2 081d 1e5c  |   \|
07d4 1948 1a5c  | H \|
07d6 c813 93d5  |    |
07d8 081a 5b9c  |  [ |
07da dd18 5b1b  |  [ |
07dc 1959 081b  | Y  |
07de dc88 18db  |    |
07e0 d919 5902  |  Y |
07e2 8808       |    |
07e3 0808 0808  |    |		.BLANK	0808[0x9]
07ec 131b d9cb  |    |		.XXX[0x14]
07ee 941d 5d17  |  ] |
07f0 d31a 5b99  |  [ |
07f2 480a 1359  |H  Y|
07f4 5cdc d859  |\  Y|
07f6 d948 0f4f  | H O|
07f8 8808 8853  |   S|
07fa 5858 da1a  |XX  |
07fc 5b99 4b91  |[ K |
07fe 591a 5d1b  |Y ] |