Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99m-bb - dec703.ctl
There are 3 other files named dec703.ctl in the archive. Click here to see a list.
;	16-JUN-88 HAH ADD BRANCH FOR NO UPDATE
;
;		       COPYRIGHT (C) 1986 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.
;
.R PEPB
*INITIALIZE DECNET-10-V703
*EXIT

.DELETE PAT:DNADLL.MAC,PAT:D36COM.MAC,PAT:LLINKS.MAC,PAT:NRTSER.MAC
.DELETE PAT:NTMAN.MAC,PAT:ROUTER.MAC,PAT:SCLINK.MAC,PAT:SCMUUO.MAC,PAT:SCPAR.MAC

.ERROR %
.DIR PAT:DEC703.PCF
.IF (ERROR) .GOTO NOUPD
.RUN ASL:UPDATE
*@PAT:DEC703.PCF
NOUPD::
.ERROR

.R PEPB
*SIGNAL-SUCCESS DECNET-10-V703
*EXIT

.GOTO FIN1
%ERR::
.GOTO ERROR
%CERR::
.GOTO ERROR
%TERR::
ERROR::

.R PEPB
*SIGNAL-FAILURE DECNET-10-V703
*EXIT

FIN1::
%FIN::