From:	SMTP%"bailey@GENETICS.UPENN.EDU" 17-AUG-1994 09:01:13.96
To:	EVERHART
CC:	
Subj:	Patch: NewsBuild.Com for link-only runs

Message-Id: <9408171146.AA13404@mx.smtp.psi.net>
Date:         Wed, 17 Aug 1994 02:51:44 EDT
Reply-To: Charles Bailey <bailey@GENETICS.UPENN.EDU>
Sender: ANU-NEWS Discussion <ANU-NEWS@VM1.NoDak.EDU>
From: Charles Bailey <bailey@GENETICS.UPENN.EDU>
Organization: HHMI/Human Genetics, Univ of Pa.
Subject:      Patch: NewsBuild.Com for link-only runs
To: Multiple recipients of list ANU-NEWS <ANU-NEWS@VM1.NoDak.EDU>

I received this patch fom Wayne Westmoreland earlier today, and am passing it
on to the net on his behalf.  It fixes two problems with NewsBuild.Com:
   1. When performing a link-only run, the NNTP server images were skipped.
   2. NewsBuild.Com would check C header files (e.g. for NNTP transport
      options), even for a link-only run, when it's known that they won't
      be needed.

Thanks, Wayne, for the patch.  I appreciate the effort, and I'm certain those
who use the precompiled object files available here will be pleased as well.

                    Regards,
                    Charles Bailey

!-------------------------------------------------------------------------------
!              Computational Biology and Informatics Laboratory
!         Dept. of Genetics, Univ. of Pennsylvania School of Medicine
!              Philadelphia, PA USA 19104     Tel. (215) 573-3112
!          Internet: bailey@genetics.upenn.edu  (IN 128.91.200.37)
!-------------------------------------------------------------------------------
$! ------------------ CUT HERE -----------------------
$ v='f$verify(f$trnlnm("SHARE_UNPACK_VERIFY"))'
$!
$! This archive created:
$!  Name : 940816_NewsBuild.Patch
$!  By   : bailey@genetics.upenn.edu
$!  Date : 16-AUG-1994 18:32:05.65
$!  Using: VMS_SHARE 8.5-1, (C) 1993 Andy Harper, Kings College London UK
$!
$! Credit is due to these people for their original ideas:
$!    James Gray, Michael Bednarek
$!
$! To unpack this archive:
$!    Minimum of VMS 4.4 (VAX) / OpenVMS 1.0 (Alpha) is required.
$!    Remove the headers of the first part, up to `cut here' line.
$!    Execute file as a command procedure.
$!
$! The following file(s) will be created after unpacking:
$!       1. 940816_NEWSBUILD.PATCH
$!
$ set="set"
$ set symbol/scope=(nolocal,noglobal)
$ f="SYS$SCRATCH:."+f$getjpi("","PID")+";"
$ if f$trnlnm("SHARE_UNPACK") .nes. "" then $ -
 f=f$parse("SHARE_UNPACK_TEMP",f)
$ e="write sys$error  ""%UNPACK"", "
$ w="write sys$output ""%UNPACK"", "
$ if .not. f$trnlnm("SHARE_UNPACK_LOG") then $ w = "!"
$ if f$getsyi("CPU") .gt. 127 then $ goto start
$ ve=f$getsyi("version")
$ if ve-f$extract(0,1,ve) .ges. "4.4" then $ goto start
$ e "-E-OLDVER, Must run at least VMS 4.4"
$ v=f$verify(v)
$ exit 44
$unpack:subroutine!P1=file,P2=chksum,P3=attrib,P4=size,P5=fileno,P6=filetotal
$ if f$parse(P1) .nes. "" then $ goto dirok
$ dn=f$parse(P1,,,"DIRECTORY")
$ w "-I-CREDIR, Creating directory ''dn'"
$ create/dir 'dn'
$ if $status then $ goto dirok
$ e "-E-CREDIRFAIL, Unable to create ''dn' File skipped"
$ delete 'f'*
$ exit
$dirok:
$ x=f$search(P1)
$ if x .eqs. "" then $ goto file_absent
$ e "-W-HIGHVERS, Creating higher version of ", P1
$file_absent:
$ w "-I-UNPACK, Unpacking ", P5, " of ", P6, " - ", P1, " - ", P4, " Blocks"
$ n=P1
$ if P3 .nes. "" then $ n=f
$ if .not. f$verify() then $ define/user sys$output nl:
$ EDIT/TPU/NOSEC/NODIS/COM=SYS$INPUT/NOJOURNAL 'f'/OUT='n'
PROCEDURE GetHex(s,p)LOCAL x1,x2;x1:=INDEX(t,SUBSTR(s,p,1))-1;x2:=INDEX(t,
SUBSTR(s,p+1,1))-1;RETURN 16*x1+x2;ENDPROCEDURE;PROCEDURE SkipPartsep LOCAL m;
LOOP m:=MARK(NONE);EXITIF m=END_OF(CURRENT_BUFFER);DELETE(m);EXITIF INDEX(
ERASE_LINE,"-+-+-+-+-+-+-+-+")=1;ENDLOOP;ENDPROCEDURE;
PROCEDURE ProcessLine LOCAL c,s,l,b,n,p;s := ERASE_LINE;c := SUBSTR(s,1,1);s :=
 s-c;IF c = "X" THEN SPLIT_LINE; ENDIF;MOVE_HORIZONTAL(-1);l := LENGTH(s);p :=
 1;LOOP EXITIF p > l;c := SUBSTR(s,p,1);p := p+1;CASE c FROM ' ' TO '`' ['`']
: COPY_TEXT(ASCII(GetHex(s,p))); p:=p+2;[' ']: p:=p+1;[INRANGE,OUTRANGE]
: COPY_TEXT(c);ENDCASE;ENDLOOP;ENDPROCEDURE;PROCEDURE Decode(b)LOCAL m;
POSITION(BEGINNING_OF(b));LOOP m:=MARK(NONE);EXITIF m=END_OF(b);DELETE(m);
IF INDEX(CURRENT_LINE,"+-+-+-+-+-+-+-+-")=1 THEN SkipPartSep;ELSE ProcessLine;
MOVE_HORIZONTAL(1);ENDIF;ENDLOOP;ENDPROCEDURE;SET(FACILITY_NAME,"UNPACK");SET(
SUCCESS,OFF);SET(INFORMATIONAL,OFF);t:="0123456789ABCDEF";f:=GET_INFO(
COMMAND_LINE,"file_name");o:=CREATE_BUFFER(f,f);Decode(o);WRITE_FILE(o,
GET_INFO(COMMAND_LINE,"output_file"));QUIT;
$ if p3 .eqs. "" then $ goto dl
$ open/write fdl &f
$ write fdl "RECORD"
$ write fdl P3
$ close fdl
$ w "-I-CONVRFM, Converting record format to ", P3
$ convert/fdl='f' 'f'-1 'f'
$ fa=f$getdvi(f$parse(f),"ALLDEVNAM")
$ Pa=f$getdvi(f$parse(P1),"ALLDEVNAM")
$ if fa .eqs. Pa then $ rename &f 'f$parse(P1)'
$ if fa .nes. Pa then $ copy &f 'f$parse(P1)'
$dl: delete 'f'*
$ checksum 'P1'
$ if checksum$checksum .nes. P2 then $ -
  e "-E-CHKSMFAIL, Checksum of ''P1' failed."
$ exit
$ endsubroutine
$start:
$!
$ create 'f'
XANU`20News`20Patch
XPatch`20ID:`20940816_newsbuild.com!wayne.westmoreland@srs.gov
XDate:`2016-Aug-1994
XAuthor:`20Wayne`20Westmoreland`20`20wayne.westmoreland@srs.gov
XNews`20Version:`206.1beta9
XNews`20Files:`20NewsBuild.com
XDescription:`20Fix`20the`20problem`20when`20doing`20a`20link`20only`20where`20
Vthe`20nntp`20servers`20
Xdon't`20get`20linked`20and`20also`20don't`20require`20the`20presence`20of`20he
Vader`20files`20when`20
Xonly`20linking.
X***`20newsbuild.com`09Wed`20May`2011`2010:31:16`201994
X---`20newsbuild_new.com`09Tue`20Aug`2016`2016:47:25`201994
X***************
X***`2066,68`20****
X---`2066,72`20----
X+`20$!`20`20`20`20`20`20V6.1b8`20`2015-Aug-1994`20`20`20`20`20wayne.westmorela
Vnd@srs.gov`20`20Wayne`20Westmoreland
X+`20$!`20`20`20`20`20`20`20`20-`20When`20doing`20a`20link`20only,`20don't`20sk
Vip`20linking`20the`20nntp`20servers`20and`20don't
X+`20$!`20`20`20`20`20`20`20`20`20`20require`20the`20presence`20of`20header`20f
Viles.
X+`20$!
X`20`20$!
X`20`20$!`20`20Usage:
X`20`20$!`09$`20SET`20DEF`20`5B.NEWS_SRC`5D
X***************
X***`20155,160`20****
X---`20159,189`20----
X`20`20$`20`20`20ENDIF
X`20`20$`20ENDIF
X`20`20$!
X+`20$!`09Examine`20parameter`202`20(Compile`20`7C`20Link`20`7C`20Both`20`7C`20
VObjects`20`7C`20Exes`20`7C`20empty)
X+`20$!
X+`20$`20force`20=`20f$extract(0,1,p2)
X+`20$`20skip_compile`20=`200
X+`20$`20skip_link`20=`200
X+`20$`20force_compile`20=`200
X+`20$`20force_link`20=`200
X+`20$`20IF`20force`20.EQS.`20"O"`20THEN`20$`20skip_link`20=`201
X+`20$`20IF`20force`20.EQS.`20"E"`20THEN`20$`20skip_compile`20=`201
X+`20$`20IF`20force`20.EQS.`20"C"
X+`20$`20THEN
X+`20$`20`20force_compile`20=`201
X+`20$`20`20skip_link`20=`201
X+`20$`20ENDIF
X+`20$`20IF`20force`20.EQS.`20"L"
X+`20$`20THEN`20
X+`20$`20`20force_link`20=`201
X+`20$`20`20skip_compile`20=`201
X+`20$`20ENDIF
X+`20$`20IF`20force`20.EQS.`20"B"
X+`20$`20THEN
X+`20$`20`20force_compile`20=`201
X+`20$`20`20force_link`20=`201
X+`20$`20ENDIF
X+`20$!
X`20`20$!`20Call`20in`20CMUTCP`20support
X`20`20$!
X`20`20$`20IF`20use_cmu
X***************
X***`20170,181`20****
X`20`20$`20`20`20write`20sys$output`20"ANU-NEWS`20under`20UCXSOCKETS`20is`20not
V`20thoroughly`20tested,"
X`20`20$`20`20`20write`20sys$output`20"the`20use`20of`20UCXQIOS`20is`20recommen
Vded.`20`20Also`20the"
X`20`20$`20`20`20write`20sys$output`20"NNTP_TCPUCXM`20server`20is`20not`20compi
Vled`20under`20UCXSOCKETS."
X!`20$`20`20`20IF`20f$search("sys$library:ucx$inetdef.h")`20.EQS.`20""
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20write`20sys$output`20"UCX`20support`20cannot`20be`20loaded
V`20-`20no`20library`20file"
X!`20$`20`20`20`20`20exit
X`20`20$`20`20`20ENDIF
X-`20$`20`20`20defsw`20=`20"/DEFINE=(UCXSOCKETS=1,UCX=1)"
X`20`20$`20`20`20if`20axpflag
X`20`20$`20`20`20then
X`20`20$`20`20`20`20`20DEFINE`20link_opt`20`5B-.news_src`5Doptions_c_ucxlink_ax
Vp.opt
X---`20199,213`20----
X`20`20$`20`20`20write`20sys$output`20"ANU-NEWS`20under`20UCXSOCKETS`20is`20not
V`20thoroughly`20tested,"
X`20`20$`20`20`20write`20sys$output`20"the`20use`20of`20UCXQIOS`20is`20recommen
Vded.`20`20Also`20the"
X`20`20$`20`20`20write`20sys$output`20"NNTP_TCPUCXM`20server`20is`20not`20compi
Vled`20under`20UCXSOCKETS."
X!`20$`20`20`20IF`20skip_compile`20.eq.`200
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20IF`20f$search("sys$library:ucx$inetdef.h")`20.EQS.`20""
X!`20$`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20write`20sys$output`20"UCX`20support`20cannot`20be`20
Vloaded`20-`20no`20library`20file"
X!`20$`20`20`20`20`20`20`20exit
X!`20$`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20defsw`20=`20"/DEFINE=(UCXSOCKETS=1,UCX=1)"
X`20`20$`20`20`20ENDIF
X`20`20$`20`20`20if`20axpflag
X`20`20$`20`20`20then
X`20`20$`20`20`20`20`20DEFINE`20link_opt`20`5B-.news_src`5Doptions_c_ucxlink_ax
Vp.opt
X***************
X***`20189,200`20****
X`20`20$!
X`20`20$`20IF`20use_ucxqios
X`20`20$`20THEN
X!`20$`20`20`20IF`20f$search("sys$library:ucx$inetdef.h")`20.EQS.`20""
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20write`20sys$output`20"UCX`20support`20cannot`20be`20loaded
V`20-`20no`20library`20file"
X!`20$`20`20`20`20`20exit
X`20`20$`20`20`20ENDIF
X-`20$`20`20`20defsw`20=`20"/DEFINE=(UCXQIOS=1,UCX=1)"
X`20`20$`20`20`20if`20axpflag
X`20`20$`20`20`20then
X`20`20$`20`20`20`20`20DEFINE`20link_opt`20`5B-.news_src`5Doptions_c_ucxlink_ax
Vp.opt
X---`20221,235`20----
X`20`20$!
X`20`20$`20IF`20use_ucxqios
X`20`20$`20THEN
X!`20$`20`20`20IF`20skip_compile`20.eq.`200
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20IF`20f$search("sys$library:ucx$inetdef.h")`20.EQS.`20""
X!`20$`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20write`20sys$output`20"UCX`20support`20cannot`20be`20
Vloaded`20-`20no`20library`20file"
X!`20$`20`20`20`20`20`20`20exit
X!`20$`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20defsw`20=`20"/DEFINE=(UCXQIOS=1,UCX=1)"
X`20`20$`20`20`20ENDIF
X`20`20$`20`20`20if`20axpflag
X`20`20$`20`20`20then
X`20`20$`20`20`20`20`20DEFINE`20link_opt`20`5B-.news_src`5Doptions_c_ucxlink_ax
Vp.opt
X***************
X***`20208,225`20****
X`20`20$!
X`20`20$`20IF`20use_multinet
X`20`20$`20THEN
X!`20$`20`20`20IF`20f$search("multinet_root:`5Bmultinet.include`5D*.h")`20.EQS.
V`20""
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20write`20sys$output`20"MULTINET`20support`20cannot`20be`20l
Voaded`20-`20no`20library`20files"
X!`20$`20`20`20`20`20exit
X!`20$`20`20`20ENDIF
X!`20$`20`20`20defsw`20=`20"/DEFINE=(MULTINET=1,__TYPES=1)"
X!`20$`20`20`20DEFINE`20vaxc$include`20`20multinet_root:`5Bmultinet.include`5D,
V-
X`20`20`09`09`09`20`20`20multinet_root:`5Bmultinet.include.sys`5D,-
X`20`20`09`09`09`20`20`20multinet_root:`5Bmultinet.include.arpa`5D,-
X`20`20`09`09`09`20`20`20multinet_root:`5Bmultinet.include.netinet`5D,-
X`20`20`09`09`09`20`20`20multinet_root:`5Bmultinet.include.vms`5D,-
X`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`09`20
V`20`20sys$library
X`20`20$`20`20`20if`20axpflag
X`20`20$`20`20`20then
X`20`20$`20`20`20`20`20DEFINE`20VMS`20MULTINET_ROOT:`5BMULTINET.INCLUDE.VMS`5D
V
X---`20243,263`20----
X`20`20$!
X`20`20$`20IF`20use_multinet
X`20`20$`20THEN
X!`20$`20`20`20IF`20skip_compile`20.eq.`200
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20IF`20f$search("multinet_root:`5Bmultinet.include`5D*.h")
V`20.EQS.`20""
X!`20$`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20write`20sys$output`20"MULTINET`20support`20cannot`20
Vbe`20loaded`20-`20no`20library`20files"
X!`20$`20`20`20`20`20`20`20exit
X!`20$`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20defsw`20=`20"/DEFINE=(MULTINET=1,__TYPES=1)"
X!`20$`20`20`20`20`20DEFINE`20vaxc$include`20`20multinet_root:`5Bmultinet.inclu
Vde`5D,-
X`20`20`09`09`09`20`20`20multinet_root:`5Bmultinet.include.sys`5D,-
X`20`20`09`09`09`20`20`20multinet_root:`5Bmultinet.include.arpa`5D,-
X`20`20`09`09`09`20`20`20multinet_root:`5Bmultinet.include.netinet`5D,-
X`20`20`09`09`09`20`20`20multinet_root:`5Bmultinet.include.vms`5D,-
X`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`09`20
V`20`20sys$library
X+`20$`20`20`20ENDIF
X`20`20$`20`20`20if`20axpflag
X`20`20$`20`20`20then
X`20`20$`20`20`20`20`20DEFINE`20VMS`20MULTINET_ROOT:`5BMULTINET.INCLUDE.VMS`5D
V
X***************
X***`20237,250`20****
X`20`20$!
X`20`20$`20IF`20use_tcpware
X`20`20$`20THEN
X!`20$`20`20`20IF`20f$search("TCPWARE_INCLUDE:*.h")`20.EQS.`20""
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20write`20sys$output`20"TCPware`20support`20cannot`20be`20lo
Vaded`20-`20no`20library`20files"
X!`20$`20`20`20`20`20exit
X`20`20$`20`20`20ENDIF
X-`20$`20`20`20defsw`20=`20"/DEFINE=(TCPWARE=1)"
X-`20$`20`20`20DEFINE`20vaxc$include`20`20`20`20tcpware_include,-
X-`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20`20sys$library
X`20`20$`20`20`20if`20axpflag
X`20`20$`20`20`20then
X`20`20$`20`20`20`20`20DEFINE`20link_opt`20`5B-.news_src`5Doptions_c_tcpwarelin
Vk_axp.opt
X---`20275,291`20----
X`20`20$!
X`20`20$`20IF`20use_tcpware
X`20`20$`20THEN
X!`20$`20`20`20IF`20skip_compile`20.eq.`200
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20IF`20f$search("TCPWARE_INCLUDE:*.h")`20.EQS.`20""
X!`20$`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20write`20sys$output`20"TCPware`20support`20cannot`20b
Ve`20loaded`20-`20no`20library`20files"
X!`20$`20`20`20`20`20`20`20exit
X!`20$`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20defsw`20=`20"/DEFINE=(TCPWARE=1)"
X!`20$`20`20`20`20`20DEFINE`20vaxc$include`20`20`20`20tcpware_include,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20`20`20`20sys$library
X`20`20$`20`20`20ENDIF
X`20`20$`20`20`20if`20axpflag
X`20`20$`20`20`20then
X`20`20$`20`20`20`20`20DEFINE`20link_opt`20`5B-.news_src`5Doptions_c_tcpwarelin
Vk_axp.opt
X***************
X***`20259,278`20****
X`20`20$!
X`20`20$`20IF`20use_twg
X`20`20$`20THEN
X!`20$`20`20`20IF`20f$search("TWG$TCP:`5BNETDIST.INCLUDE`5D*.H")`20.eqs.`20""
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20write`20sys$output`20"WIN`20support`20cannot`20be`20loaded
V`20-`20no`20library`20files"
X!`20$`20`20`20`20`20exit
X`20`20$`20`20`20ENDIF
X!`20$`20`20`20defsw`20=`20"/DEFINE=(TWG=1)"
X!`20$`20`20`20define`20vaxc$include`20sys$library,twg$tcp:`5Bnetdist.include
V`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20twg$tcp:`5Bnetdist.include.sys`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20twg$tcp:`5Bnetdist.include.vms`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20twg$tcp:`5Bnetdist.include.netinet`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20twg$tcp:`5Bnetdist.include.arpa`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20sys$library
X!`20$`20`20`20define`20sys`20twg$tcp:`5Bnetdist.include.sys`5D
X!`20$`20`20`20If`20F$Search("Sys$Share:TWGLib.Exe").nes.""
X`20`20$`20`20`20Then
X`20`20$`20`20`20`20`20if`20axpflag
X`20`20$`20`20`20`20`20then
X---`20300,323`20----
X`20`20$!
X`20`20$`20IF`20use_twg
X`20`20$`20THEN
X!`20$`20`20`20IF`20skip_compile`20.eq.`200
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20IF`20f$search("TWG$TCP:`5BNETDIST.INCLUDE`5D*.H")`20.eqs.
V`20""
X!`20$`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20write`20sys$output`20"WIN`20support`20cannot`20be`20
Vloaded`20-`20no`20library`20files"
X!`20$`20`20`20`20`20`20`20exit
X!`20$`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20defsw`20=`20"/DEFINE=(TWG=1)"
X!`20$`20`20`20`20`20define`20vaxc$include`20sys$library,twg$tcp:`5Bnetdist.inc
Vlude`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20`20`20twg$tcp:`5Bnetdist.include.sys`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20`20`20twg$tcp:`5Bnetdist.include.vms`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20`20`20twg$tcp:`5Bnetdist.include.netinet`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20`20`20twg$tcp:`5Bnetdist.include.arpa`5D,-
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20
V`20`20`20`20sys$library
X!`20$`20`20`20`20`20define`20sys`20twg$tcp:`5Bnetdist.include.sys`5D
X`20`20$`20`20`20ENDIF
X!`20$`20`20`20If`20(F$Search("Sys$Share:TWGLib.Exe").nes."").and.`20-
X!`20`20`20`20`20`20`20`20(F$Edit(F$Extract(0,4,p1),"Collapse,Upcase").nes."WIN
VO")
X`20`20$`20`20`20Then
X`20`20$`20`20`20`20`20if`20axpflag
X`20`20$`20`20`20`20`20then
X***************
X***`20303,333`20****
X`20`20$`20`20`20endif
X`20`20$`20ENDIF
X`20`20$!
X-`20$!`09Examine`20parameter`202`20(Compile`20`7C`20Link`20`7C`20Both`20`7C`20
VObjects`20`7C`20Exes`20`7C`20empty)
X-`20$!
X-`20$`20force`20=`20f$extract(0,1,p2)
X-`20$`20skip_compile`20=`200
X-`20$`20skip_link`20=`200
X-`20$`20force_compile`20=`200
X-`20$`20force_link`20=`200
X-`20$`20IF`20force`20.EQS.`20"O"`20THEN`20$`20skip_link`20=`201
X-`20$`20IF`20force`20.EQS.`20"E"`20THEN`20$`20skip_compile`20=`201
X-`20$`20IF`20force`20.EQS.`20"C"
X-`20$`20THEN
X-`20$`20`20force_compile`20=`201
X-`20$`20`20skip_link`20=`201
X-`20$`20ENDIF
X-`20$`20IF`20force`20.EQS.`20"L"
X-`20$`20THEN`20
X-`20$`20`20force_link`20=`201
X-`20$`20`20skip_compile`20=`201
X-`20$`20ENDIF
X-`20$`20IF`20force`20.EQS.`20"B"
X-`20$`20THEN
X-`20$`20`20force_compile`20=`201
X-`20$`20`20force_link`20=`201
X-`20$`20ENDIF
X-`20$!
X`20`20$!`09Examine`20parameter`203`20(DEBUG`20`7C`20NODEBUG`20`7C`20empty)
X`20`20$!
X`20`20$`20dbgtype`20=`20f$extract(0,1,p3)
X---`20348,353`20----
X***************
X***`20339,405`20****
X`20`20$!
X`20`20$!`09client-only`20means`20build`20NEWS.EXE`20and`20NEWS.HLB`20only;`20i
Vgnore`20the`20rest
X`20`20$`20client_only`20=`20(`20f$edit(f$extract(0,1,p4),"UPCASE")`20.eqs.`20"
VC"`20)
X-`20$!`09Examine`20parameter`205`20(Extra`20Compile`20Defines`20`7C`20empty)
X`20`20$!
X!`20$`20IF`20p5.nes.""
X`20`20$`20THEN
X-`20$`20`20IF`20defsw.eqs.""
X-`20$`20`20THEN
X-`20$`20`20`20defsw`20=`20"/DEFINE=("+p5+")"
X-`20$`20`20ELSE
X-`20$`20`20`20defsw`20=`20f$extract(0,f$length(defsw)-1,defsw)+p5+")"
X-`20$`20`20ENDIF
X-`20$`20ENDIF
X`20`20$!
X`20`20$!
X!`20$`20IF`20axpflag`09!`20Probably`20ALPHA
X!`20$`20THEN
X!`20$`09IF`20USE_MULTINET
X!`20$`09THEN
X!`20$`09`09CC_AXP_SW`20=`20"/PREFIX=(ALL_ENTRIES,EXCEPT=(SOCKET,CONNECT,BIND,L
VISTEN,SOCKET_READ,SOCKET_WRITE,SOCKET_CLOSE,SELECT,ACCEPT,BCMP,BCOPY,BZERO,GET
VHOSTBYNAME,"
X!`20$`09`09CC_AXP_SW`20=`20CC_AXP_SW`20+`20"GETSOCKOPT,SETSOCKOPT,GETHOSTBYADD
VR,GETPEERNAME,GETDTABLESIZE,HTONS,HTONL,NTOHS,NTOHL,SEND,SENDTO,RECV,RECVFROM)
V)"
X!`20$`09ELSE`20`20`20`20CC_AXP_SW`20=`20""
X!`20`09`09
X!`20$`09ENDIF
X!`20$`09cc`20:==`20"cc''defsw'/NOMEMBER_ALIGN/STANDARD=VAXC/TIE''CC_AXP_SW'"
X!`20$`20ELSE
X!`20$`09cc`20:==`20"cc''defsw'"
X!`20$`20ENDIF
X!`20$`20show`20symb`20cc
X`20`20$!
X-`20$!`20Save`20the`20Compile`20Time`20"Defines"`20for`20this`20compile.
X`20`20$!
X!`20$`20open/write`20temp`20`5B-.news_build`5Dcompile.defines
X!`20$`20write`20temp`20defsw
X!`20$`20close`20temp
X!`20$`20if`20f$search("`5B-.news_build`5Dcompile.defines;-1").eqs.""
X!`20$`20then
X!`20$`20`20`20force_compile`20=`201
X!`20$`20`20`20force_link`20=`201
X!`20$`20else
X!`20$`20`20`20differences/output=nla0:`20`5B-.news_build`5Dcompile.defines
X!`20$`20`20`20if`20$severity.eq.3
X!`20$`20`20`20`20`20then
X!`20$`09write`20sys$output`20""
X!`20$`09if`20f$file_attributes("`5B-.news_build`5Dcompile.defines;-1","FFB").e
Vqs.4
X!`20$`09`20`20then
X!`20$`09`20`20`20`20write`20sys$output`20"Forcing`20a`20complete`20recompile
V`20due`20to`20specification`20compile`20time`20defines"
X!`20$`09`20`20else
X!`20$`09`20`20`20`20write`20sys$output`20"Forcing`20a`20complete`20recompile
V`20due`20to`20compile`20defines`20changing`20from:"
X!`20$`09`20`20`20`20type`20`5B-.news_build`5Dcompile.defines;-1
X!`20$`09endif
X!`20$`09if`20f$length(defsw).eqs.0
X!`20$`09then
X!`20$`09`20`20write`20sys$output`20"to`20compiling`20without`20any`20compile
V`20time`20defines."
X!`20$`09else
X!`20$`09`20`20write`20sys$output`20"To:
X!`20$`09`20`20type`20`5B-.news_build`5Dcompile.defines
X!`20$`09endif
X!`20$`09write`20sys$output`20""
X!`20$`20`20`20`20`20`20`20force_compile`20=`201
X!`20$`20`20`20`20`20`20`20force_link`20=`201
X`20`20$`20`20`20endif
X-`20$`20`20`20purge`20`5B-.news_build`5Dcompile.defines
X`20`20$`20endif
X`20`20$!
X`20`20$!`09Examine`20parameter`206`20(Purge`20object,exe`20`7C`20do`20not`20pu
Vrge)
X---`20359,430`20----
X`20`20$!
X`20`20$!`09client-only`20means`20build`20NEWS.EXE`20and`20NEWS.HLB`20only;`20i
Vgnore`20the`20rest
X`20`20$`20client_only`20=`20(`20f$edit(f$extract(0,1,p4),"UPCASE")`20.eqs.`20"
VC"`20)
X`20`20$!
X!`20$`20IF`20SKIP_COMPILE`20.EQ.`200
X`20`20$`20THEN
X`20`20$!
X+`20$!`20`20`09Examine`20parameter`205`20(Extra`20Compile`20Defines`20`7C`20em
Vpty)
X`20`20$!
X!`20$`20`20`20IF`20p5.nes.""
X!`20$`20`20`20THEN
X!`20$`20`20`20`20IF`20defsw.eqs.""
X!`20$`20`20`20`20THEN
X!`20$`20`20`20`20`20defsw`20=`20"/DEFINE=("+p5+")"
X!`20$`20`20`20`20ELSE
X!`20$`20`20`20`20`20defsw`20=`20f$extract(0,f$length(defsw)-1,defsw)+p5+")"
X!`20$`20`20`20`20ENDIF
X!`20$`20`20`20ENDIF
X`20`20$!
X`20`20$!
X!`20$`20`20`20IF`20axpflag`09!`20Probably`20ALPHA
X!`20$`20`20`20THEN
X!`20$`20`20`09IF`20USE_MULTINET
X!`20$`20`20`09THEN
X!`20$`20`20`09`09CC_AXP_SW`20=`20"/PREFIX=(ALL_ENTRIES,EXCEPT=(SOCKET,CONNECT,
VBIND,LISTEN,SOCKET_READ,SOCKET_WRITE,SOCKET_CLOSE,SELECT,ACCEPT,BCMP,BCOPY,BZE
VRO,GETHOSTBYNAME,"
X!`20$`20`20`09`09CC_AXP_SW`20=`20CC_AXP_SW`20+`20"GETSOCKOPT,SETSOCKOPT,GETHOS
VTBYADDR,GETPEERNAME,GETDTABLESIZE,HTONS,HTONL,NTOHS,NTOHL,SEND,SENDTO,RECV,REC
VVFROM))"
X!`20$`20`20`09ELSE`20`20`20`20CC_AXP_SW`20=`20""
X!`20`20`20`09`09
X!`20$`20`20`09ENDIF
X!`20$`20`20`09cc`20:==`20"cc''defsw'/NOMEMBER_ALIGN/STANDARD=VAXC/TIE''CC_AXP_
VSW'"
X!`20$`20`20`20ELSE
X!`20$`20`20`09cc`20:==`20"cc''defsw'"
X!`20$`20`20`20ENDIF
X!`20$`20`20`20show`20symb`20cc
X!`20$!
X!`20$!`20`20`20Save`20the`20Compile`20Time`20"Defines"`20for`20this`20compile.
V
X!`20$!
X!`20$`20`20`20open/write`20temp`20`5B-.news_build`5Dcompile.defines
X!`20$`20`20`20write`20temp`20defsw
X!`20$`20`20`20close`20temp
X!`20$`20`20`20if`20f$search("`5B-.news_build`5Dcompile.defines;-1").eqs.""
X!`20$`20`20`20then
X!`20$`20`20`20`20`20force_compile`20=`201
X!`20$`20`20`20`20`20force_link`20=`201
X!`20$`20`20`20else
X!`20$`20`20`20`20`20differences/output=nla0:`20`5B-.news_build`5Dcompile.defin
Ves
X!`20$`20`20`20`20`20if`20$severity.eq.3
X!`20$`20`20`20`20`20`20`20then
X!`20$`20`20`09write`20sys$output`20""
X!`20$`20`20`09if`20f$file_attributes("`5B-.news_build`5Dcompile.defines;-1","F
VFB").eqs.4
X!`20$`20`20`09`20`20then
X!`20$`20`20`09`20`20`20`20write`20sys$output`20"Forcing`20a`20complete`20recom
Vpile`20due`20to`20specification`20compile`20time`20defines"
X!`20$`20`20`09`20`20else
X!`20$`20`20`09`20`20`20`20write`20sys$output`20"Forcing`20a`20complete`20recom
Vpile`20due`20to`20compile`20defines`20changing`20from:"
X!`20$`20`20`09`20`20`20`20type`20`5B-.news_build`5Dcompile.defines;-1
X!`20$`20`20`09endif
X!`20$`20`20`09if`20f$length(defsw).eqs.0
X!`20$`20`20`09then
X!`20$`20`20`09`20`20write`20sys$output`20"to`20compiling`20without`20any`20com
Vpile`20time`20defines."
X!`20$`20`20`09else
X!`20$`20`20`09`20`20write`20sys$output`20"To:
X!`20$`20`20`09`20`20type`20`5B-.news_build`5Dcompile.defines
X!`20$`20`20`09endif
X!`20$`20`20`09write`20sys$output`20""
X!`20$`20`20`20`20`20`20`20`20`20force_compile`20=`201
X!`20$`20`20`20`20`20`20`20`20`20force_link`20=`201
X!`20$`20`20`20`20`20endif
X!`20$`20`20`20`20`20purge`20`5B-.news_build`5Dcompile.defines
X`20`20$`20`20`20endif
X`20`20$`20endif
X`20`20$!
X`20`20$!`09Examine`20parameter`206`20(Purge`20object,exe`20`7C`20do`20not`20pu
Vrge)
X***************
X***`201032,1059`20****
X`20`20$!`0C
X`20`20$!`20`20NNTP_TCPCMU
X`20`20$!
X!`20$`20IF`20(use_cmu)`20.and.`20(f$search("`5B-.NEWS_SRC`5DNNTP_TCPCMU.C")`20
V.nes.`20"")`20-
X!`20`20`09`20.and.`20.not.`20client_only`20.and.`20.not.`20skip_compile
X`20`20$`20THEN
X!`20$`20`20`20IF`20force_compile
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20iftest`20=`201
X!`20$`20`20`20ELSE
X!`20$`20`20`20`20`20IF`20f$search("NNTP_TCPCMU.OBJ").eqs.""
X`20`20$`20`20`20`20`20THEN
X`20`20$`20`20`20`20`20`20`20iftest`20=`201
X`20`20$`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20iftest`20=`20f$cvtime(f$file_attributes("`5B-.NEWS_S
VRC`5DNNTP_TCPCMU.C","rdt")).gts.-
X!`20`09`20`20`20`20`20`20`20`20`20`20f$cvtime(f$file_attributes("NNTP_TCPCMU.O
VBJ","rdt"))
X`20`20$`20`20`20`20`20ENDIF
X-`20$`20`20`20ENDIF
X-`20$`20`20`20IF`20iftest
X-`20$`20`20`20THEN
X-`20$`20`20`20`20`20set`20def`20`5B-.news_src`5D
X-`20$`20`20`20`20`20write`20sys$output`20"$`20cc`20nntp_tcpcmu"
X-`20$`20`20`20`20`20cc/nolis/object=`5B-.news_build`5Dnntp_tcpcmu`20nntp_tcpcm
Vu
X-`20$`20`20`20`20`20set`20def`20`5B-.news_build`5D
X-`20$`20`20`20`20`20if`20purge_objs`20then`20purge`20nntp_tcpcmu.obj
X`20`20$`20`20`20ENDIF
X`20`20$!
X`20`20$`20`20`20IF`20(f$search("NNTP_TCPCMU.OBJ")`20.nes.`20"")`20.and.`20-
X---`201057,1087`20----
X`20`20$!`0C
X`20`20$!`20`20NNTP_TCPCMU
X`20`20$!
X!`20$`20IF`20(use_cmu)`20
X`20`20$`20THEN
X!`20$`20`20`20IF`20(f$search("`5B-.NEWS_SRC`5DNNTP_TCPCMU.C")`20.nes.`20"")`20
V-
X!`20`20`20`20`20`20`20`20.and.`20.not.`20client_only`20.and.`20.not.`20skip_co
Vmpile
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20IF`20force_compile
X`20`20$`20`20`20`20`20THEN
X`20`20$`20`20`20`20`20`20`20iftest`20=`201
X`20`20$`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20IF`20f$search("NNTP_TCPCMU.OBJ").eqs.""
X!`20$`20`20`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20`20`20iftest`20=`201
X!`20$`20`20`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20`20`20iftest`20=`20f$cvtime(f$file_attributes("`5B-.
VNEWS_SRC`5DNNTP_TCPCMU.C","rdt")).gts.-
X!`20`20`20`09`20`20`20`20`20`20`20`20`20`20f$cvtime(f$file_attributes("NNTP_TC
VPCMU.OBJ","rdt"))
X!`20$`20`20`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20IF`20iftest
X!`20$`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20set`20def`20`5B-.news_src`5D
X!`20$`20`20`20`20`20`20`20write`20sys$output`20"$`20cc`20nntp_tcpcmu"
X!`20$`20`20`20`20`20`20`20cc/nolis/object=`5B-.news_build`5Dnntp_tcpcmu`20nntp
V_tcpcmu
X!`20$`20`20`20`20`20`20`20set`20def`20`5B-.news_build`5D
X!`20$`20`20`20`20`20`20`20if`20purge_objs`20then`20purge`20nntp_tcpcmu.obj
X`20`20$`20`20`20`20`20ENDIF
X`20`20$`20`20`20ENDIF
X`20`20$!
X`20`20$`20`20`20IF`20(f$search("NNTP_TCPCMU.OBJ")`20.nes.`20"")`20.and.`20-
X***************
X***`201088,1115`20****
X`20`20$!`0C
X`20`20$!`20NNTP_TCPWINMULTINET
X`20`20$!
X!`20$`20IF`20(use_twg`20.or.`20use_multinet`20.or.`20use_tcpware)`20.and.`20(f
V$search("`5B-.NEWS_SRC`5DNNTP_TCPWINMULTINET.C")`20.nes.`20"")`20-
X!`20`20`09`20`20`20`20`20`20.and.`20.not.`20client_only`20.and.`20.not.`20skip
V_compile
X`20`20$`20THEN
X!`20$`20`20`20IF`20force_compile
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20iftest`20=`201
X!`20$`20`20`20ELSE
X!`20$`20`20`20`20`20IF`20f$search("NNTP_TCPWINMULTINET.OBJ").eqs.""
X`20`20$`20`20`20`20`20THEN
X`20`20$`20`20`20`20`20`20`20iftest`20=`201
X`20`20$`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20iftest`20=`20f$cvtime(f$file_attributes("`5B-.NEWS_S
VRC`5DNNTP_TCPWINMULTINET.C","rdt")).gts.-
X!`20`09`20`20`20`20`20`20`20`20`20`20f$cvtime(f$file_attributes("NNTP_TCPWINMU
VLTINET.OBJ","rdt"))
X`20`20$`20`20`20`20`20ENDIF
X-`20$`20`20`20ENDIF
X-`20$`20`20`20IF`20iftest
X-`20$`20`20`20THEN
X-`20$`20`20`20`20`20set`20def`20`5B-.news_src`5D
X-`20$`20`20`20`20`20write`20sys$output`20"$`20cc`20nntp_tcpwinmultinet"
X-`20$`20`20`20`20`20cc/nolis/object=`5B-.news_build`5Dnntp_tcpwinmultinet`20nn
Vtp_tcpwinmultinet
X-`20$`20`20`20`20`20set`20def`20`5B-.news_build`5D
X-`20$`20`20`20`20`20if`20purge_objs`20then`20purge`20nntp_tcpwinmultinet.obj
X`20`20$`20`20`20ENDIF
X`20`20$!
X`20`20$`20`20`20IF`20(f$search("NNTP_TCPWINMULTINET.OBJ")`20.nes.`20"")`20.and
V.`20-
X---`201116,1146`20----
X`20`20$!`0C
X`20`20$!`20NNTP_TCPWINMULTINET
X`20`20$!
X!`20$`20IF`20(use_twg`20.or.`20use_multinet`20.or.`20use_tcpware)
X`20`20$`20THEN
X!`20$`20`20`20IF`20(f$search("`5B-.NEWS_SRC`5DNNTP_TCPWINMULTINET.C")`20.nes.
V`20"")`20-
X!`20`20`20`20`20.and.`20.not.`20client_only`20.and.`20.not.`20skip_compile
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20IF`20force_compile
X`20`20$`20`20`20`20`20THEN
X`20`20$`20`20`20`20`20`20`20iftest`20=`201
X`20`20$`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20IF`20f$search("NNTP_TCPWINMULTINET.OBJ").eqs.""
X!`20$`20`20`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20`20`20iftest`20=`201
X!`20$`20`20`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20`20`20iftest`20=`20f$cvtime(f$file_attributes("`5B-.
VNEWS_SRC`5DNNTP_TCPWINMULTINET.C","rdt")).gts.-
X!`20`20`20`09`20`20`20`20`20`20`20`20`20`20f$cvtime(f$file_attributes("NNTP_TC
VPWINMULTINET.OBJ","rdt"))
X!`20$`20`20`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20IF`20iftest
X!`20$`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20set`20def`20`5B-.news_src`5D
X!`20$`20`20`20`20`20`20`20write`20sys$output`20"$`20cc`20nntp_tcpwinmultinet"
V
X!`20$`20`20`20`20`20`20`20cc/nolis/object=`5B-.news_build`5Dnntp_tcpwinmultine
Vt`20nntp_tcpwinmultinet
X!`20$`20`20`20`20`20`20`20set`20def`20`5B-.news_build`5D
X!`20$`20`20`20`20`20`20`20if`20purge_objs`20then`20purge`20nntp_tcpwinmultinet
V.obj
X`20`20$`20`20`20`20`20ENDIF
X`20`20$`20`20`20ENDIF
X`20`20$!
X`20`20$`20`20`20IF`20(f$search("NNTP_TCPWINMULTINET.OBJ")`20.nes.`20"")`20.and
V.`20-
X***************
X***`201145,1172`20****
X`20`20$!`20NNTP_TCPUCXM
X`20`20$!
X`20`20$!IF`20(use_ucxqios`20.or.`20use_multinet)`20-
X!`20$`20IF`20(use_ucxqios)`20-
X!`20`20`20`20`20`20.and.`20(f$search("`5B-.NEWS_SRC`5DNNTP_TCPUCXM.C")`20.nes.
V`20"")`20.and.`20.not.`20client_only`20.and.`20.not.`20skip_compile
X`20`20$`20THEN
X!`20$`20`20`20IF`20force_compile`20
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20iftest`20=`201
X!`20$`20`20`20ELSE
X!`20$`20`20`20`20`20IF`20f$search("NNTP_TCPUCXM.OBJ").eqs.""
X`20`20$`20`20`20`20`20THEN
X`20`20$`20`20`20`20`20`20`20iftest`20=`201
X`20`20$`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20iftest`20=`20f$cvtime(f$file_attributes("`5B-.NEWS_S
VRC`5DNNTP_TCPUCXM.C","rdt")).gts.-
X!`20`09`20`20`20`20`20`20`20`20`20`20f$cvtime(f$file_attributes("NNTP_TCPUCXM.
VOBJ","rdt"))`20
X`20`20$`20`20`20`20`20ENDIF
X-`20$`20`20`20ENDIF
X-`20$`20`20`20IF`20iftest
X-`20$`20`20`20THEN
X-`20$`20`20`20`20`20set`20def`20`5B-.news_src`5D
X-`20$`20`20`20`20`20write`20sys$output`20"$`20cc`20nntp_tcpucxm"
X-`20$`20`20`20`20`20cc/nolis/object=`5B-.news_build`5Dnntp_tcpucxm`20nntp_tcpu
Vcxm
X-`20$`20`20`20`20`20set`20def`20`5B-.news_build`5D
X-`20$`20`20`20`20`20if`20purge_objs`20then`20purge`20nntp_tcpucxm.obj
X`20`20$`20`20`20ENDIF
X`20`20$!
X`20`20$`20`20`20IF`20(f$search("NNTP_TCPUCXM.OBJ")`20.nes.`20"")`20.and.`20-
X---`201176,1205`20----
X`20`20$!`20NNTP_TCPUCXM
X`20`20$!
X`20`20$!IF`20(use_ucxqios`20.or.`20use_multinet)`20-
X!`20$`20IF`20(use_ucxqios)
X`20`20$`20THEN
X!`20`20`20`20`20IF`20(f$search("`5B-.NEWS_SRC`5DNNTP_TCPUCXM.C")`20.nes.`20"")
V`20.and.`20.not.`20client_only`20.and.`20.not.`20skip_compile
X`20`20$`20`20`20THEN
X!`20$`20`20`20`20`20IF`20force_compile`20
X`20`20$`20`20`20`20`20THEN
X`20`20$`20`20`20`20`20`20`20iftest`20=`201
X`20`20$`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20IF`20f$search("NNTP_TCPUCXM.OBJ").eqs.""
X!`20$`20`20`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20`20`20iftest`20=`201
X!`20$`20`20`20`20`20`20`20ELSE
X!`20$`20`20`20`20`20`20`20`20`20iftest`20=`20f$cvtime(f$file_attributes("`5B-.
VNEWS_SRC`5DNNTP_TCPUCXM.C","rdt")).gts.-
X!`20`20`20`09`20`20`20`20`20`20`20`20`20`20f$cvtime(f$file_attributes("NNTP_TC
VPUCXM.OBJ","rdt"))`20
X!`20$`20`20`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20ENDIF
X!`20$`20`20`20`20`20IF`20iftest
X!`20$`20`20`20`20`20THEN
X!`20$`20`20`20`20`20`20`20set`20def`20`5B-.news_src`5D
X!`20$`20`20`20`20`20`20`20write`20sys$output`20"$`20cc`20nntp_tcpucxm"
X!`20$`20`20`20`20`20`20`20cc/nolis/object=`5B-.news_build`5Dnntp_tcpucxm`20nnt
Vp_tcpucxm
X!`20$`20`20`20`20`20`20`20set`20def`20`5B-.news_build`5D
X!`20$`20`20`20`20`20`20`20if`20purge_objs`20then`20purge`20nntp_tcpucxm.obj
X`20`20$`20`20`20`20`20ENDIF
X`20`20$`20`20`20ENDIF
X`20`20$!
X`20`20$`20`20`20IF`20(f$search("NNTP_TCPUCXM.OBJ")`20.nes.`20"")`20.and.`20-
X***`20patchlist.h;-1
X---`20patchlist.h
X**************
X***`201,1
X`20`20=+=+=`20End`20=+=+=
X---`201,2`20-----
X+`20940816_newsbuild.com!wayne.westmoreland@srs.gov
X`20`20=+=+=`20End`20=+=+=
$ call unpack 940816_NEWSBUILD.PATCH -
 1327401413 "FORMAT STREAM_LF;CARRIAGE_CONTROL CARRIAGE_RETURN" 38 1 1
$ v=f$verify(v)
$ exit