Google
 

Trailing-Edge - PDP-10 Archives - bb-y390o-bm_tops20_v41_atpch_20 - autopatch/fts201.ddc
There are 4 other files named fts201.ddc in the archive. Click here to see a list.
;
; COPYRIGHT (c) 1983, 1984, 1985 BY
;	    Digital Equipment Corporation, Maynard, MA.
;
;   This software is furnished under a license and may be  used
;   and  copied  only  in  accordance  with  the  terms of such
;   license and with  the  inclusion  of  the  above  copyright
;   notice.   This software or any other copies thereof may not
;   be provided  or  otherwise	made  available  to  any  other
;   person.   No  title  to  and  ownership  of the software is
;   hereby transferred.
;
;   The information in	this  software	is  subject  to  change
;   without  notice and should not be construed as a commitment
;   by Digital Equipment Corporation.
;
;   Digital  assumes  no  responsibility   for	 the   use   or
;   reliability  of  its  software  on	equipment  which is not
;   supplied by Digital.
;

@DEFINE DIS: AP20:<AUTOPATCH.FTS>
@MOUNT TAPE FTS:/READ-ONLY/REMARK:"MOUNT TAPE BB-M251A-BM"
@ENABLE
@DUMPER
*TAPE FTS:
*REWIND
*FILES
*SKIP 1
*RES PS:<*>FTSLIB.REL DIS:
*RES PS:<*>FTS20.REL DIS:
*REWIND
*EXIT
@DEF DSK: DIS:
@MAKLIB
;	DELETE DAP MODULES
*FTS2V1=FTS20/DEL:(RMSERR,OPEN,GETPUT,M11FIL,RDWRIT,DAP,DAPERR,DAPSUB)
*FTS2V1=FTS2V1/DEL:(DAPT20,DIRECT,DIR20,DIRLST,NXTF20,NXTFIL,SETAI,STRING,TRACE)
;	DELETE XPN MODULES
*FTS2V1=FTS2V1/DEL:(XPNCLO,XPNERR,XPNEVE,XPNFAI,XPNGET)
*FTS2V1=FTS2V1/DEL:(XPNOPN,XPNPMR,XPNPUT,XPNDIS,XPNUTL,XPNPSI)
;	DELETE XPORT MODULES
*FTS2V1=FTS2V1/DEL:(XGET,XIOB,XDESC,XSPEC,XDUMPF,XOPEN,XCLOSE,XPUT,XBACK)
*FTS2V1=FTS2V1/DEL:(XDELET,XRENAM,X36,XT20,XVALID,XZAP,XBUILD,XPARSE,XMEM,XHEAP)
*FTS2V1=FTS2V1/DEL:(XFAIL,XTERM,XPMSG,XXMSG,XROOT,SAPPEN,SASCII,SBIN,SCOPY)
*FTS2V1=FTS2V1/DEL:(SFAIL,SFORM,SJOIN,SMSG,SSCAN,STEMP,SVALID,STRCMP)
*FTS2V1=FTS2V1/DEL:(STREQL,STRGEQ,STRGTR,STRLEQ,STRLSS,STRNEQ)
;	EXTRACT FTSSYM
*FTSSYM=FTSLIB/EXT:(FTSSYM)
;	APPEND FTSSYM
*FTS2V1=FTS2V1/MAS:(FTSSYM),FTSSYM/APP
@DEF DSK: