1!GROK!THIS!
2# Descrip.MMS for perl5 on VMS
3# Last revised 5-Dec-2001 by Craig Berry -- craigberry@mac.com
4#
5#: This file uses MMS syntax, and can be processed using DEC's MMS product,
6#: or the free MMK clone (available by ftp at ftp.spc.edu).  If you want to
7#: a Unix-style MAKE tool, run this file through mms2make.pl, which should
8#: be found in the same directory as this file.
9#:
10#: Lines beginning with "#:" will be removed by mms2make.pl when converting
11#: this file to MAKE syntax.
12#
13#	tidy      -- purge files generated by executing this file
14#	clean     -- remove all intermediate (e.g. object files, C files generated
15#	             during build) files generated by executing this file,
16#	             but leave 'installable' files (images, library) intact
17#	realclean -- remove all files generated by executing this file
18#	cleansrc  -- 'realclean' + purge *.c,*.h,descrip.mms
19#	crtl.opt  -- compiler-specific linker options file (made automatically)
20#
21
22#### Start of system configuration section. ####
23
24~DECC~
25~DECCXX~
26~GNUC~
27~ARCH-TYPE~ = 1
28~THREAD~
29~SOCKET~
30~MALLOC~
31~CC~
32~MTK~
33~MTU~
34~FLAGS~
35~LARGEFILE~
36~ARCHNAME~
37~USEVMSDEBUG~
38~PREFIX~
39
40#: >>>>> Architecture-specific options <<<<<
41.ifdef IXE
42O = .ibj
43OLB = .ilb
44E = .ixe
45.else
46.ifdef AXE
47# File type to use for object files
48O = .abj
49# File type to use for object libraries
50OLB = .alb
51# File type to use for executable images
52E = .axe
53.else
54# File type to use for object files
55O = .obj
56# File type to use for object libraries
57OLB = .olb
58# File type to use for executable images
59E = .exe
60.endif
61.endif
62
63.ifdef __IA64__
64OBJVAL = $(O)
65.else
66.ifdef __AXP__
67OBJVAL = $(O)
68.else
69OBJVAL = $(MMS$TARGET_NAME)$(O)
70.endif
71.endif
72
73PERL_VERSION = ~PV~
74
75.ifdef MALLOC
76MALLOC_O = malloc$(O)
77MALLOC_C = malloc$(C)
78.endif
79
80.ifdef DECC_SOCKETS
81SOCKET=1
82.endif
83
84ARCHDIR =  [.lib.$(ARCHNAME).$(PERL_VERSION)]
85ARCHCORE = [.lib.$(ARCHNAME).$(PERL_VERSION).CORE]
86ARCHAUTO = [.lib.$(ARCHNAME).$(PERL_VERSION).auto]
87
88#: >>>>>Compiler-specific options <<<<<
89.ifdef GNUC
90.first
91	@ If F$TrnLnm("Sys").eqs."" Then Define/NoLog SYS GNU_CC_Include:[VMS]
92CC = gcc
93# -fno-builtin avoids bug in gcc up to version 2.6.2 which can destroy
94# data when memcpy() is called on large (>64 kB) blocks of memory
95# (fixed in gcc 2.6.3)
96XTRACCFLAGS = /Obj=$(MMS$TARGET_NAME)$(O)/NoCase_Hack/Optimize=2
97DBGSPECFLAGS =
98XTRADEF =
99XTRAOBJS =
100LIBS1 = GNU_CC:[000000]GCCLIB.OLB/Library
101LIBS2 = Sys$Share:VAXCRTL/Shareable
102POSIX =
103.else
104XTRAOBJS =
105LIBS1 = $(XTRAOBJS)
106DBGSPECFLAGS = /Show=(expansion,include)/machine
107# Some versions of DECCRTL on AXP have a bug in chdir() which causes the change
108# to persist after the image exits, even when this was not requested, iff
109# SYSNAM is enabled.  This is fixed in CSC Patch # AXPACRT04_061, but turning
110# off SYSNAM for the MM[SK] subprocess doesn't hurt anything, so we do it
111# just in case.
112.first
113	@ If F$TrnLnm("Sys").eqs."" .and. F$TrnLnm("DECC$System_Include").nes."" Then Define/NoLog SYS DECC$System_Include
114.ifdef __AXP__
115	@ Set Process/Privilege=(NoSYSNAM)
116	@ If F$TrnLnm("Sys").eqs."" .and. F$TrnLnm("DECC$System_Include").eqs."" Then Define/NoLog SYS Sys$Library
117.else
118	@ If F$TrnLnm("Sys").eqs."" .and. F$TrnLnm("DECC$System_Include").eqs."" Then Define/NoLog SYS DECC$Library_Include
119.endif
120
121.ifdef DECCXX
122XTRACCFLAGS = /Include=[]/Standard=ANSI/Prefix=All/Obj=$(OBJVAL)
123.else
124XTRACCFLAGS = /Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=$(OBJVAL)
125.endif
126XTRADEF =
127POSIX = POSIX
128.endif
129
130#: >>>>> Configuration options <<<<<
131#: __DEBUG__: builds images with full VMS debugger support
132.ifdef __DEBUG__
133DBGCCFLAGS = /List/Debug/NoOpt$(DBGSPECFLAGS)
134DBGLINKFLAGS = /Trace/Debug/Map=$(MMS$TARGET_NAME).MAP/Full/Cross
135DBG = DBG
136.else
137DBGCCFLAGS = /NoList
138DBGLINKFLAGS = /NoTrace/NoMap
139DBG =
140.endif
141
142.ifdef THREADED
143THREADDEF =
144THREAD = THREAD
145.endif
146
147.ifdef OLDTHREADED
148THREADDEF =
149THREAD = THREAD
150THRLIBS1 = sys$share:cma$lib_shr/share|sys$share:cma$rtl/share
151.ifdef __AXP__
152THRLIBS2 = sys$share:cma$open_lib_shr/share|sys$share:cma$open_rtl/share
153.endif
154.endif
155
156.ifdef MTU
157.ifdef MTK
158MTHREADLINKFLAGS = /THREADS=(MULTIPLE_KERNEL,UPCALLS)
159.else
160MTHREADLINKFLAGS = /THREADS=UPCALLS
161.endif
162.else
163MTHREADLINKFLAGS =
164.endif
165
166# C preprocessor manifest "DEBUGGING" ==> perl -D, not the VMS debugger
167.IFDEF LARGEFILE
168CFLAGS = $(XTRACCFLAGS)$(DBGCCFLAGS)$(FLAGS)/Define=$(LARGEFILE)
169CORECFLAGS = $(XTRACCFLAGS)$(DBGCCFLAGS)$(FLAGS)/Define=(PERL_CORE,$(LARGEFILE))
170.ELSE
171CFLAGS = $(XTRACCFLAGS)$(DBGCCFLAGS)$(FLAGS)
172CORECFLAGS = $(XTRACCFLAGS)$(DBGCCFLAGS)$(FLAGS)/Define=PERL_CORE
173.ENDIF
174
175LINKFLAGS = $(DBGLINKFLAGS)
176
177MAKE = $(MMS)
178MAKEFILE = Descrip.MMS   # this file
179NOOP = continue
180
181# Macros to invoke a copy of miniperl during the build.  Targets which
182# are built using these macros should depend on $(MINIPERL_EXE)
183MINIPERL_EXE = Sys$Disk:[]miniperl$(E)
184MINIPERL = MCR $(MINIPERL_EXE) "-I[.lib]"
185MINIPERLQ = MCR $(MINIPERL_EXE) ""-I[.lib]""
186XSUBPP = $(MINIPERL) "-I[.ext.re]" [.lib.extutils]xsubpp -noprototypes
187# Macro to invoke a preexisting copy of Perl.  This is used to regenerate
188# some header files when rebuilding Perl, but premade versions are provided
189# in the distribution, so it's OK if this doesn't work; it's here to make
190# life easier for those who modify Perl and rebuild it.
191INSTPERL = perl
192# Macros to invoke a copy of perl during the build.  Targets which
193# are built using these macros should depend on $(PERL_EXE) EXT
194.IFDEF __DEBUG__
195PERL_EXE = Sys$Disk:[]n$(DBG)perl$(E)
196.ELSE
197PERL_EXE = Sys$Disk:[]perl$(E)
198.ENDIF
199PERL = MCR $(PERL_EXE) "-I[.lib]"
200
201# Space-separated list of "static" extensions to build into perlshr (case counts).
202MYEXT = DynaLoader
203# object files for these extensions; the trailing comma is required if
204# there are any object files specified
205# These must be built separately, or you must add rules below to build them
206myextobj = DynaLoader$(O),
207EXT = $(MYEXT)
208extobj = $(myextobj)
209
210.ifdef LIBS2
211.else
212LIBS2=
213.endif
214
215.ifdef THRLIBS1
216.else
217THRLIBS1=
218.endif
219
220.ifdef THRLIBS2
221.else
222THRLIBS2=
223.endif
224
225FULLLIBS2 = $(LIBS2)|$(THRLIBS1)|$(THRLIBS2)
226
227#### End of system configuration section. ####
228
229c0 = $(MALLOC_C) av.c caretx.c deb.c doio.c doop.c dquote.c dump.c globals.c gv.c hv.c mro_core.c
230c1 = mg.c locale.c mathoms.c miniperlmain.c numeric.c op.c pad.c perl.c perlio.c
231c2 = perly.c pp.c pp_ctl.c pp_hot.c pp_pack.c pp_sort.c pp_sys.c regcomp.c regexec.c reentr.c
232c3 = run.c scope.c sv.c taint.c time64.c toke.c universal.c utf8.c util.c vms.c keywords.c
233c = $(c0) $(c1) $(c2) $(c3)
234
235obj0 = perl$(O)
236obj1 = $(MALLOC_O) av$(O) caretx$(O) deb$(O) doio$(O) doop$(O) dquote$(O) dump$(O) mro_core$(O) globals$(O) gv$(O) hv$(O)
237obj2 = keywords$(O) locale$(O) mathoms$(O) mg$(O) miniperlmain$(O) numeric$(O) op$(O) pad$(O) perlio$(O)
238obj3 = perly$(O) pp$(O) pp_ctl$(O) pp_hot$(O) reentr$(O) pp_pack$(O) pp_sort$(O) pp_sys$(O) regcomp$(O)
239obj4 = regexec$(O) run$(O) scope$(O) sv$(O) taint$(O) time64$(O) toke$(O) universal$(O) utf8$(O) util$(O) vms$(O)
240
241mini_obj = perlmini$(O) $(obj1) $(obj2) $(obj3) $(obj4)
242obj = $(obj0) $(obj1) $(obj2) $(obj3) $(obj4)
243
244h0 = av.h config.h cop.h cv.h embed.h embedvar.h
245h1 = EXTERN.h form.h gv.h handy.h hv.h l1_char_class_tab.h INTERN.h intrpvar.h
246h2 = iperlsys.h keywords.h mydtrace.h mg.h mg_vtable.h nostdio.h op.h
247h3 = op_reg_common.h opcode.h opnames.h overload.h pad.h parser.h patchlevel.h
248h4 = perl.h perlapi.h perlio.h perlsdio.h perlvars.h perly.h
249h5 = pp.h pp_proto.h proto.h regcomp.h regexp.h regnodes.h scope.h
250h6 = sv.h thread.h utf8.h util.h vmsish.h warnings.h xsub.h
251h = $(h0) $(h1) $(h2) $(h3) $(h4) $(h5) $(h6)
252
253acopt = $(ARCHCORE)perlshr_attr.opt $(ARCHCORE)$(DBG)perlshr_bld.opt
254ac = archcore_includes.ts $(acopt)
255
256generated_headers = uudmap.h bitcount.h mg_data.h
257
258CRTL = []crtl.opt
259CRTLOPTS =,$(CRTL)/Options
260
261.SUFFIXES
262
263.ifdef LINK_ONLY
264.else
265.SUFFIXES $(O) .c .xs
266
267.xs.c :
268	$(XSUBPP) $(MMS$SOURCE) >$(MMS$TARGET)
269
270.c$(O) :
271	$(CC) $(CFLAGS) $(MMS$SOURCE)
272
273.xs$(O) :
274	$(XSUBPP) $(MMS$SOURCE) >$(MMS$SOURCE_NAME).c
275	$(CC) $(CFLAGS) $(MMS$SOURCE_NAME).c
276.endif
277
278# Unicode data files generated by mktables
279unidatafiles = lib/unicore/Decomposition.pl lib/unicore/TestProp.pl \
280	lib/unicore/CombiningClass.pl lib/unicore/Name.pl \
281	lib/unicore/UCD.pl lib/unicore/Name.pm \
282	lib/unicore/mktables.lst
283
284# Directories of Unicode data files generated by mktables
285unidatadirs = lib/unicore/To lib/unicore/lib
286
287# Modules which must be installed before we can build extensions
288LIBPREREQ = $(ARCHDIR)Config.pm $(ARCHDIR)Config_heavy.pl $(ARCHDIR)vmspipe.com
289
290utils1 = [.utils]perldoc.com [.utils]h2ph.com
291utils2 = [.utils]h2xs.com [.utils]libnetcfg.com [.lib]perlbug.com [.utils]json_pp.com
292utils3 = [.utils]perlivp.com [.lib]splain.com [.utils]pl2pm.com [.utils]xsubpp.com [.utils]pod2html.com [.utils]instmodsh.com
293utils4 = [.utils]enc2xs.com [.utils]piconv.com [.utils]cpan.com [.utils]prove.com [.utils]ptar.com [.utils]ptardiff.com [.utils]shasum.com
294utils5 = [.utils]corelist.com [.utils]ptargrep.com [.utils]zipdetails.com [.utils]encguess.com [.utils]streamzip.com
295
296all : base extras archcorefiles preplibrary [.pod]perltoc.pod
297	@ QUALIFIERS := $(MMSQUALIFIERS)
298	@ QUALIFIERS = QUALIFIERS - """" - """"
299	@ write sys$output " "
300	@ write sys$output " Everything is up to date. '$(MMS)''QUALIFIERS' test' to run test suite."
301
302git_version.h : $(MINIPERL_EXE) make_patchnum.pl
303        $(MINIPERL) make_patchnum.pl
304
305base : miniperl git_version.h nonxsext perl
306	@ $(NOOP)
307extras : dynext libmods utils extra.pods
308	@ $(NOOP)
309libmods : $(LIBPREREQ)
310	@ $(NOOP)
311utils : $(utils1) $(utils2) $(utils3) $(utils4) $(utils5)
312	@ $(NOOP)
313extra.pods : miniperl
314	@ @extra_pods.com
315
316PERLDELTA_CURRENT = [.pod]perl5355delta.pod
317
318$(PERLDELTA_CURRENT) : [.pod]perldelta.pod
319	Copy/NoConfirm/Log $(MMS$SOURCE) $(PERLDELTA_CURRENT)
320
321[.pod]perlmodlib.pod : [.pod]perlmodlib.pl MANIFEST $(MINIPERL_EXE)
322	$(MINIPERL) [.pod]perlmodlib.pl "-q"
323
324[.pod]perlapi.pod : [.pod]perlintern.pod
325	@ $(NOOP)
326
327[.pod]perlintern.pod : embed.fnc autodoc.pl $(MINIPERL_EXE)
328	$(MINIPERL) autodoc.pl
329
330[.pod]perltoc.pod : $(PERLDELTA_CURRENT) [.pod]perlapi.pod [.pod]perlintern.pod  [.pod]perlmodlib.pod extra.pods $(PERL_EXE)
331	@ define/user_mode $(DBG)PERLSHR SYS$DISK:[]$(DBG)perlshr$(E)
332	$(PERL) "-f" [.pod]buildtoc "-q"
333
334archcorefiles : $(ac) $(ARCHAUTO)time.stamp
335	@ $(NOOP)
336
337# See the comment in Makefile.SH explaining this seemingly cranky ordering
338$(MINIPERL_EXE) : [.lib]buildcustomize.pl
339	@ $(NOOP)
340
341vmspipe.com : [.vms]vmspipe.com
342	Copy/NoConfirm/Log $(MMS$SOURCE) []
343
344miniperl : $(DBG)miniperl$(E)  vmspipe.com
345	@ Continue
346
347[.lib]buildcustomize.pl :  miniperlmain$(O), $(DBG)libperlmini$(OLB) $(CRTL) write_buildcustomize.pl
348	Link $(LINKFLAGS)/NoDebug/Trace/NoMap/NoFull/NoCross/Exe=$(MINIPERL_EXE) miniperlmain$(O),$(DBG)libperlmini$(OLB)/Library $(CRTLOPTS)
349       $(MINIPERL) "-f" write_buildcustomize.pl
350
351$(DBG)miniperl$(E) :  miniperlmain$(O), $(DBG)libperlmini$(OLB) $(CRTL)
352	Link $(LINKFLAGS)/Trace/Exe=$(MMS$TARGET) miniperlmain$(O), $(DBG)libperlmini$(OLB)/Library $(CRTLOPTS)
353
354$(DBG)libperl$(OLB) : $(obj)
355	@ If F$Search("$(MMS$TARGET)").eqs."" Then Library/Object/Create $(MMS$TARGET)
356	Library/Object/Replace $(MMS$TARGET) $(MMS$SOURCE_LIST)
357
358$(DBG)libperlmini$(OLB) : $(mini_obj)
359	@ If F$Search("$(MMS$TARGET)").eqs."" Then Library/Object/Create $(MMS$TARGET)
360	Library/Object/Replace $(MMS$TARGET) $(MMS$SOURCE_LIST)
361
362perlmain.c : miniperlmain.c $(MINIPERL_EXE) nonxsext
363	$(MINIPERL) -"MExtUtils::Miniperl" -e "writemain(\'perlmain.c', @ARGV)" "$(EXT)"
364
365.ifdef __DEBUG__
366# Link an extra perl that doesn't invoke the debugger
367perl : $(DBG)perl$(E)
368	Link $(LINKFLAGS)$(MTHREADLINKFLAGS)/NoDebug/Trace/NoMap/NoCross/NoFull/Exe=N$(DBG)perl$(E) perlmain$(O), perlshr.opt/Option, perlshr_attr.opt/Option $(CRTLOPTS)
369.else
370perl : $(DBG)perl$(E)
371	@ Continue
372.endif
373
374$(DBG)perl$(E) : perlmain$(O), $(DBG)perlshr$(E), $(MINIPERL_EXE)
375	@ @[.vms]genopt "PerlShr.Opt/Write" "|" "''F$Environment("Default")'$(DBG)PerlShr$(E)/Share"
376	Link $(LINKFLAGS)$(MTHREADLINKFLAGS)/Exe=$(MMS$TARGET) perlmain$(O), perlshr.opt/Option, perlshr_attr.opt/Option $(CRTLOPTS)
377
378$(DBG)perlshr$(E) : $(DBG)libperl$(OLB) $(extobj) $(DBG)perlshr_xtras.ts
379	Link $(LINKFLAGS)/Share=$(MMS$TARGET) $(extobj) []$(DBG)perlshr_bld.opt/Option, perlshr_attr.opt/Option
380
381perlmini.c : perl.c
382	@ IF F$SEARCH("$(MMS$TARGET)") .NES. "" THEN DELETE/NOCONFIRM/LOG $(MMS$TARGET);*
383	@ COPY/NOCONFIRM _NLA0: $(MMS$TARGET)
384	@ SET FILE /ATTRIBUTES=RFM:STMLF $(MMS$TARGET)
385	@ OPEN/APPEND perlmini $(MMS$TARGET)
386	@ WRITE perlmini "#define PERL_IS_MINIPERL"
387	@ CLOSE perlmini
388	@ APPEND/NOCONFIRM/LOG $(MMS$SOURCE) $(MMS$TARGET)
389
390perlmini$(O) : perlmini.c
391	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
392
393bitcount.h mg_data.h : uudmap.h
394	@ $(NOOP)
395
396uudmap.h : generate_uudmap$(E)
397	MCR SYS$DISK:[]generate_uudmap$(E) $(generated_headers)
398
399generate_uudmap$(E) : generate_uudmap$(O) $(CRTL)
400	Link $(LINKFLAGS)/NoDebug/Trace/NoMap/NoFull/NoCross/Exe=$(MMS$TARGET) generate_uudmap$(O) $(CRTLOPTS)
401
402generate_uudmap$(O) : generate_uudmap.c mg_raw.h
403        $(CC) $(CORECFLAGS) $(MMS$SOURCE)
404
405# The following files are built in one go by gen_shrfls.pl:
406#  perlshr_attr.opt, $(DBG)perlshr_bld.opt - AXP and IA64
407# The song and dance with gen_shrfls.opt accommodates DCL's line length limit.
408$(DBG)perlshr_xtras.ts : perl.h config.h vmsish.h proto.h [.vms]gen_shrfls.pl $(MINIPERL_EXE) $(MAKEFILE) $(CRTL)
409	@ $(MINIPERL) makedef.pl "PLATFORM=vms" > makedef.lis
410	@ $(MINIPERLQ) -e "print join('|',@ARGV),'|';" "$(CC)$(CFLAGS)" >gen_shrfls.opt
411	@ $(MINIPERLQ) -e "print join('|',@ARGV);" "$(O)" "$(DBG)" "$(OLB)" "$(EXT)" "$(CRTL)" >>gen_shrfls.opt
412	$(MINIPERL) [.vms]gen_shrfls.pl -f gen_shrfls.opt
413	@ Delete/NoLog/NoConfirm gen_shrfls.opt;
414	@ If F$Search("$(DBG)perlshr_xtras.ts").nes."" Then Delete/NoLog/NoConfirm $(DBG)perlshr_xtras.ts;*
415	@ Copy _NLA0: $(DBG)perlshr_xtras.ts
416
417$(ARCHDIR)Config.pm : [.lib]Config.pm
418	Create/Directory $(ARCHDIR)
419	Copy/NoConfirm/Log $(MMS$SOURCE) $(ARCHDIR)
420
421$(ARCHDIR)Config_heavy.pl : [.lib]Config_heavy.pl
422	Create/Directory $(ARCHDIR)
423	Copy/NoConfirm/Log $(MMS$SOURCE) $(ARCHDIR)
424
425[.lib]Config.pm : config.h $(MINIPERL_EXE)
426	$(MINIPERL) ConfigPM.
427
428$(ARCHDIR)vmspipe.com : vmspipe.com
429        Copy $(MMS$SOURCE) $(ARCHDIR)
430
431unidatafiles.ts : $(MINIPERL_EXE) [.lib]Config.pm [.lib.unicore]mktables nonxsext
432	$(MINIPERL) [.lib.unicore]mktables "-C" [.lib.unicore] "-P" [.pod] "-makelist" "-maketest" "-p"
433	@ If F$Search("$(MMS$TARGET)").nes."" Then Delete/NoLog/NoConfirm $(MMS$TARGET);*
434	@ Copy/NoConfirm _NLA0: $(MMS$TARGET)
435
436DynaLoader$(O) : [.lib]buildcustomize.pl $(ARCHDIR)Config.pm $(MINIPERL_EXE)
437	$(MINIPERL) make_ext.pl "MAKE=$(MMS)" "DynaLoader"
438
439dynext : $(LIBPREREQ) $(DBG)perlshr$(E) unidatafiles.ts DynaLoader$(O) preplibrary makeppport $(MINIPERL_EXE)
440       $(MINIPERL) make_ext.pl "MAKE=$(MMS)" "--dynamic" "--static"
441
442nonxsext : $(LIBPREREQ) preplibrary $(MINIPERL_EXE) [.pod]perlfunc.pod
443       $(MINIPERL) make_ext.pl "MAKE=$(MMS)" "--nonxs"
444
445[.utils]perldoc.com : [.utils]perldoc.PL $(ARCHDIR)Config.pm
446	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
447
448[.utils]perlivp.com : [.utils]perlivp.PL $(ARCHDIR)Config.pm
449	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
450
451[.utils]cpan.com : [.utils]cpan.PL $(ARCHDIR)Config.pm
452	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
453
454[.utils]prove.com : [.utils]prove.PL $(ARCHDIR)Config.pm
455	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
456
457[.utils]ptar.com : [.utils]ptar.PL $(ARCHDIR)Config.pm
458	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
459
460[.utils]ptardiff.com : [.utils]ptardiff.PL $(ARCHDIR)Config.pm
461	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
462
463[.utils]ptargrep.com : [.utils]ptargrep.PL $(ARCHDIR)Config.pm
464	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
465
466[.utils]shasum.com : [.utils]shasum.PL $(ARCHDIR)Config.pm
467	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
468
469[.utils]corelist.com : [.utils]corelist.PL $(ARCHDIR)Config.pm
470	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
471
472[.utils]json_pp.com : [.utils]json_pp.PL $(ARCHDIR)Config.pm
473	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
474
475[.utils]enc2xs.com : [.utils]enc2xs.PL $(ARCHDIR)Config.pm
476	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
477
478[.utils]encguess.com : [.utils]encguess.PL $(ARCHDIR)Config.pm
479	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
480
481[.utils]h2ph.com : [.utils]h2ph.PL $(ARCHDIR)Config.pm
482	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
483
484[.utils]h2xs.com : [.utils]h2xs.PL $(ARCHDIR)Config.pm
485	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
486
487[.utils]instmodsh.com : [.utils]instmodsh.PL $(ARCHDIR)Config.pm
488	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
489
490[.utils]libnetcfg.com : [.utils]libnetcfg.PL $(ARCHDIR)Config.pm
491       $(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
492
493[.lib]perlbug.com : [.utils]perlbug.PL $(ARCHDIR)Config.pm
494	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
495	Copy/NoConfirm/Log [.utils]perlbug.com [.lib]
496
497[.utils]piconv.com : [.utils]piconv.PL $(ARCHDIR)Config.pm
498	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
499
500[.utils]pl2pm.com : [.utils]pl2pm.PL $(ARCHDIR)Config.pm
501	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
502
503[.lib]splain.com : [.utils]splain.PL $(ARCHDIR)Config.pm
504	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
505	Copy/NoConfirm/Log [.utils]splain.com [.lib]
506
507[.utils]xsubpp.com : [.utils]xsubpp.PL $(ARCHDIR)Config.pm nonxsext
508	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
509
510[.utils]zipdetails.com : [.utils]zipdetails.PL $(ARCHDIR)Config.pm nonxsext
511	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
512
513[.utils]streamzip.com : [.utils]streamzip.PL $(ARCHDIR)Config.pm nonxsext
514	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
515
516[.utils]pod2html.com : [.utils]pod2html.PL $(ARCHDIR)Config.pm nonxsext
517	$(MINIPERL) -"I[-.lib]" $(MMS$SOURCE)
518
519preplibrary : $(MINIPERL_EXE) $(LIBPREREQ)
520	@ $(NOOP)
521
522makeppport : $(MINIPERL_EXE) $(ARCHDIR)Config.pm nonxsext
523	$(MINIPERL) mkppport
524
525install.html : [.pod]perltoc.pod
526	@ @perl_setup.com "$(PREFIX)"
527	@ If F$Search("perl_root:[lib]html.dir").eqs."" Then Create/Directory perl_root:[lib.html]
528	$(MINIPERL) installhtml. "--podroot=. --recurse --htmldir=/perl_root/lib/html --htmlroot=.. --verbose"
529
530printconfig :
531        @ @[.vms]make_command $(MMS) $(MMSQUALIFIERS) $(MMSTARGETS)
532        @ @[.vms]myconfig "$(CC)" "$(CFLAGS)" "$(LINKFLAGS)" "$(LIBS1)" "$(FULLLIBS2)" "$(EXT)" "$(DBG)"
533
534# The following files are generated automatically
535#       embed.pl:       proto.h embed.h embedvar.h
536#       opcode.pl:      opcode.h opnames.h pp_proto.h
537#       regcomp.pl:     regnodes.h
538#       warnings.pl:    warnings.h lib/warnings.pm
539# The correct versions should be already supplied with the perl kit,
540# in case you don't have perl available.
541# To force them to be regenerated, run
542#       perl regen.pl
543# with your existing copy of perl
544# (make regen_headers is kept for backwards compatibility)
545
546regen :
547	$(INSTPERL) regen.pl
548
549regen_headers :
550	$(INSTPERL) regen.pl -v
551
552.ifdef LINK_ONLY
553.else
554perly$(O) : perly.c, perly.h, $(h)
555.endif
556
557check : test
558	@ Continue
559
560test : all
561	@ PERL_TEST_DRIVER == "TEST."
562	- @[.vms]test.com "$(E)" "$(__DEBUG__)"
563	@ $(MINIPERL) -e "print ""Ran tests"";" > [.t]rantests.
564
565test_harness : all
566	@ PERL_TEST_DRIVER == "harness."
567	- @[.vms]test.com "$(E)" "$(__DEBUG__)"
568	@ $(MINIPERL) -e "print ""Ran tests"";" > [.t]rantests.
569
570minitest : $(MINITEST_EXE) unidatafiles.ts
571	@ PERL_TEST_DRIVER == "minitest"
572	- @[.vms]test.com "$(E)" "$(__DEBUG__)"
573
574# install ought not need a source, but it doesn't work if one's not
575# there. Go figure...
576install : $(PERL_EXE)
577	@ @perl_setup.com "$(PREFIX)"
578	If F$TrnLnm("Sys") .nes. "" Then Deass SYS
579	@ define/user_mode $(DBG)PERLSHR SYS$DISK:[]$(DBG)perlshr$(E)
580	$(PERL) installperl
581
582archify : all
583	@ Write Sys$Output "Moving files to architecture-specific locations for $(ARCHNAME)"
584	archroot = "$(ARCHAUTO)" - "]" + "...]"
585	Backup/Log/Verify [.lib.auto...]*.*;/Exclude=(*.al,*.ix) 'archroot'/New_Version
586	Delete/Log/NoConfirm [.lib.auto...]*.*;*/exclude=(*.al,*.ix,*.dir)
587	Delete/Log/NoConfirm [.lib]Config.pm;*
588	Delete/Log/NoConfirm [.lib]Config_heavy.pl;*
589	Copy/Log/NoConfirm *$(E);, $(ARCHDIR)
590	Delete/Log/NoConfirm Perl*$(E);*
591	@ QUALIFIERS := $(MMSQUALIFIERS)
592	@ QUALIFIERS = QUALIFIERS - """" - """"
593	@ Write Sys$Output "Architecture-specific setup completed."
594	@ Write Sys$Output "Before building for another architecture, be sure to"
595	@ Write Sys$Output "    1. $(MMS)''QUALIFIERS' clean"
596	@ Write Sys$Output "    2. Delete Miniperl$(E)"
597
598# CORE subset for MakeMaker, so we can build Perl without sources
599
600archcore_includes.ts :
601	@ If F$Search("$(ARCHDIR)CORE.dir").eqs."" Then Create/Directory $(ARCHCORE)
602	Copy/NoConfirm/Log *.h $(ARCHCORE)
603	@ Copy _NLA0: $(MMS$TARGET)
604$(ARCHCORE)$(DBG)libperl$(OLB) : $(DBG)libperl$(OLB) $(DBG)perlshr_xtras.ts
605	@ If F$Search("$(ARCHDIR)CORE.dir").eqs."" Then Create/Directory $(ARCHCORE)
606	Copy/NoConfirm/Log $(MMS$SOURCE) $(ARCHCORE)
607$(ARCHCORE)perlshr_attr.opt : $(DBG)perlshr_xtras.ts
608	@ If F$Search("$(ARCHDIR)CORE.dir").eqs."" Then Create/Directory $(ARCHCORE)
609	Copy/NoConfirm/Log perlshr_attr.opt $(ARCHCORE)
610$(ARCHCORE)$(DBG)perlshr_bld.opt : $(DBG)perlshr_xtras.ts
611	@ If F$Search("$(ARCHDIR)CORE.dir").eqs."" Then Create/Directory $(ARCHCORE)
612	Copy/NoConfirm/Log $(DBG)perlshr_bld.opt $(ARCHCORE)
613$(ARCHAUTO)time.stamp :
614	@ If F$Search("$(ARCHDIR)auto.dir").eqs."" Then Create/Directory $(ARCHAUTO)
615	@ If F$Search("$(MMS$TARGET)").eqs."" Then Copy/NoConfirm _NLA0: $(MMS$TARGET)
616
617.ifdef LINK_ONLY
618.else
619# We need(ed?) an action line here for broken older versions of MMS which
620# otherwise conclude that they should be compiling [.x2p]utils.c :-(
621#util$(O) : util.c
622#	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
623# AUTOMATICALLY GENERATED MAKE DEPENDENCIES--PUT NOTHING BELOW THIS LINE
624av$(O) : av.c $(h)
625	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
626caretx$(O) : caretx.c $(h)
627	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
628deb$(O) : deb.c $(h)
629	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
630doio$(O) : doio.c $(h)
631	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
632doop$(O) : doop.c $(h)
633	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
634dquote$(O) : dquote.c $(h)
635	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
636dump$(O) : dump.c $(h)
637	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
638globals$(O) : globals.c $(generated_headers) $(h)
639        $(CC) $(CORECFLAGS) $(MMS$SOURCE)
640gv$(O) : gv.c $(h)
641	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
642mro_core$(O) : mro_core.c $(h)
643	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
644hv$(O) : hv.c $(h)
645	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
646keywords$(O) : keywords.c $(h)
647	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
648locale$(O) : locale.c $(h)
649	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
650malloc$(O) : malloc.c $(h)
651	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
652mathoms$(O) : mathoms.c $(h)
653	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
654mg$(O) : mg.c $(h)
655	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
656miniperlmain$(O) : miniperlmain.c $(h)
657	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
658numeric$(O) : numeric.c $(h)
659	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
660pad$(O) : pad.c $(h)
661	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
662op$(O) : op.c $(h)
663	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
664perl$(O) : perl.c git_version.h $(h)
665	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
666perlio$(O) : perlio.c config.h $(h)
667	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
668perlmain$(O) : perlmain.c $(h)
669	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
670perly$(O) : perly.c $(h)
671	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
672pp$(O) : pp.c $(h)
673	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
674pp_ctl$(O) : pp_ctl.c $(h)
675	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
676pp_hot$(O) : pp_hot.c $(h)
677	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
678pp_pack$(O) : pp_pack.c $(h)
679	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
680pp_sort$(O) : pp_sort.c $(h)
681	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
682pp_sys$(O) : pp_sys.c $(h)
683	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
684reentr$(O) : reentr.c $(h)
685	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
686regcomp$(O) : regcomp.c $(h)
687	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
688regexec$(O) : regexec.c $(h)
689	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
690run$(O) : run.c $(h)
691	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
692scope$(O) : scope.c $(h)
693	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
694sv$(O) : sv.c $(h)
695	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
696taint$(O) : taint.c $(h)
697	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
698time64$(O) : time64.c $(h)
699	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
700toke$(O) : toke.c $(h)
701	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
702universal$(O) : universal.c $(h)
703	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
704utf8$(O) : utf8.c $(h)
705	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
706util$(O) : util.c $(h)
707	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
708vms$(O) : vms.c $(h)
709	$(CC) $(CORECFLAGS) $(MMS$SOURCE)
710
711# End of automatically generated make dependencies
712.endif # !LINK_ONLY
713
714vmsish.h : [.vms]vmsish.h
715	Copy/Log/NoConfirm [.vms]vmsish.h []
716
717vms.c : [.vms]vms.c
718	Copy/Log/Noconfirm [.vms]vms.c []
719
720$(CRTL) : $(MAKEFILE)
721	@ @[.vms]genopt "$(CRTL)/Write" "|" "$(LIBS1)|$(FULLLIBS2)"
722
723ok : $(utils)
724	$(MINIPERL) lib/perlbug.com -ok -s "(UNINSTALLED)"
725
726okfile : $(utils)
727	$(MINIPERL) lib/perlbug.com -ok -s "(UNINSTALLED)" "-F" perl.ok
728
729nok : $(utils)
730	@ write sys$output " "
731	@ write sys$output " Please type the command:"
732	@ write sys$output " "
733	@ write sys$output "$(MINIPERLQ) lib/perlbug.com -nok -s ""(UNINSTALLED)"""
734
735nokfile : $(utils)
736	@ write sys$output " "
737	@ write sys$output " Please type the command:"
738	@ write sys$output " "
739	@ write sys$output "$(MINIPERLQ) lib/perlbug.com -nok -s ""(UNINSTALLED)"" ""-F"" perl.nok"
740
741cleanlis :
742	- If F$Search("*.Lis").nes."" Then Delete/NoConfirm/Log *.Lis;*
743	- If F$Search("*.CPP").nes."" Then Delete/NoConfirm/Log *.CPP;*
744	- If F$Search("*.Map").nes."" Then Delete/NoConfirm/Log *.Map;*
745
746cleantest :
747        - If F$Search("[.t]Perl$(E)").nes."" Then Delete/NoConfirm/Log [.t]Perl$(E);*
748        - If F$Search("[.t]VMSPIPE.COM").nes."" Then Delete/NoConfirm/Log [.t]VMSPIPE.COM;*
749
750tidy : cleanlis
751	- If F$Search("[...]*.Opt;-1").nes."" Then Purge/NoConfirm/Log [...]*.Opt
752	- If F$Search("[...]*$(O);-1").nes."" Then Purge/NoConfirm/Log [...]*$(O)
753	- If F$Search("[...]*$(E);-1").nes."" Then Purge/NoConfirm/Log [...]*$(E)
754	- If F$Search("config.h;-1").nes."" Then Purge/NoConfirm/Log config.h
755	- If F$Search("config.sh;-1").nes."" Then Purge/NoConfirm/Log config.sh
756	- If F$Search("vmsish.h;-1").nes."" Then Purge/NoConfirm/Log vmsish.h
757	- If F$Search("vms.c;-1")   .nes."" Then Purge/NoConfirm/Log vms.c
758	- If F$Search("perlmain.c;-1")   .nes."" Then Purge/NoConfirm/Log perlmain.c
759	- If F$Search("uudmap.h;-1")   .nes."" Then Purge/NoConfirm/Log uudmap.h
760	- If F$Search("bitcount.h;-1")   .nes."" Then Purge/NoConfirm/Log bitcount.h
761	- If F$Search("mg_data.h;-1")   .nes."" Then Purge/NoConfirm/Log mg_data.h
762	- If F$Search("Perlshr_Gbl*.Mar;-1")   .nes."" Then Purge/NoConfirm/Log Perlshr_Gbl*.Mar
763	- If F$Search("[.ext.Opcode...];-1").nes."" Then Purge/NoConfirm/Log [.ext.Opcode]
764	- If F$Search("[.lib.auto...]*.al;-1").nes."" Then Purge/NoConfirm/Log [.lib.auto...]*.al
765	- If F$Search("[.lib.auto...]autosplit.ix;-1").nes."" Then Purge/NoConfirm/Log [.lib.auto...]autosplit.ix
766	- If F$Search("[.lib]Config.pm;-1").nes."" Then Purge/NoConfirm/Log [.lib]Config.pm
767	- If F$Search("$(ARCHDIR)Config.pm;-1").nes."" Then Purge/NoConfirm/Log $(ARCHDIR)Config.pm
768	- If F$Search("[.lib]Config_heavy.pl;-1").nes."" Then Purge/NoConfirm/Log [.lib]Config_heavy.pl
769	- If F$Search("$(ARCHDIR)Config_heavy.pl;-1").nes."" Then Purge/NoConfirm/Log $(ARCHDIR)Config_heavy.pl
770	- If F$Search("[.lib.VMS]*.*;-1").nes."" Then Purge/NoConfirm/Log [.lib.VMS]*.*
771	- If F$Search("$(ARCHCORE)*.*").nes."" Then Purge/NoConfirm/Log $(ARCHCORE)*.*
772	- If F$Search("[.lib]*.com;-1").nes."" Then Purge/NoConfirm/Log [.lib]*.com
773	- If F$Search("[.pod]*.com;-1").nes."" Then Purge/NoConfirm/Log [.pod]*.com
774	- If F$Search("[.utils]*.com;-1").nes."" Then Purge/NoConfirm/Log [.utils]*.com
775	- If F$Search("[.lib]buildcustomize.pl;-1").nes."" Then Purge/NoConfirm/Log [.lib]buildcustomize.pl
776
777clean : tidy cleantest
778      	- $(MINIPERL) make_ext.pl "MAKE=$(MMS)" "--all" "--target=clean"
779	- If F$Search("*.Opt").nes."" Then Delete/NoConfirm/Log *.Opt;*/Exclude=PerlShr_*.Opt
780	- If F$Search("[...]*$(O);*") .nes."" Then Delete/NoConfirm/Log [...]*$(O);*
781	- If F$Search("vmsish.h").nes."" Then Delete/NoConfirm/Log vmsish.h;*
782	- If F$Search("vms.c")   .nes."" Then Delete/NoConfirm/Log vms.c;*
783	- If F$Search("perlmain.c")   .nes."" Then Delete/NoConfirm/Log perlmain.c;*
784	- If F$Search("perlmini.c")   .nes."" Then Delete/NoConfirm/Log perlmini.c;*
785	- If F$Search("uudmap.h")   .nes."" Then Delete/NoConfirm/Log uudmap.h;*
786	- If F$Search("bitcount.h")   .nes."" Then Delete/NoConfirm/Log bitcount.h;*
787	- If F$Search("mg_data.h")   .nes."" Then Delete/NoConfirm/Log mg_data.h;*
788	- If F$Search("Perlshr_Gbl*.Mar")   .nes."" Then Delete/NoConfirm/Log Perlshr_Gbl*.Mar;*
789	- If F$Search("*.TS").nes."" Then Delete/NoConfirm/Log *.TS;*
790	- If F$Search("[.pod]*.com").nes."" Then Delete/NoConfirm/Log [.pod]*.com;*
791	- If F$Search("[.pod]roffitall").nes."" Then Delete/NoConfirm/Log [.pod]roffitall;*
792	- If F$Search("$(PERLDELTA_CURRENT)").nes."" Then Delete/NoConfirm/Log $(PERLDELTA_CURRENT);*
793	- If F$Search("[.pod]perlapi.pod").nes."" Then Delete/NoConfirm/Log [.pod]perlapi.pod;*
794	- If F$Search("[.pod]perlintern.pod").nes."" Then Delete/NoConfirm/Log [.pod]perlintern.pod;*
795	- If F$Search("[.pod]perlmodlib.pod").nes."" Then Delete/NoConfirm/Log [.pod]perlmodlib.pod;*
796	- If F$Search("[.pod]perltoc.pod").nes."" Then Delete/NoConfirm/Log [.pod]perltoc.pod;*
797	- If F$Search("[.pod]perluniprops.pod").nes."" Then Delete/NoConfirm/Log [.pod]perluniprops.pod;*
798	- @extra_pods CLEAN
799	- If F$Search("[.lib]Config_git.pl").nes."" Then Delete/NoConfirm/Log [.lib]Config_git.pl;*
800	- If F$Search("git_version.h").nes."" Then Delete/NoConfirm/Log git_version.h;*
801
802realclean : clean
803      	- $(MINIPERL) make_ext.pl "MAKE=$(MMS)" "--all" "--target=realclean"
804	- $(MINIPERL) mkppport "--clean"
805	- If F$Search("*$(OLB)").nes."" Then Delete/NoConfirm/Log *$(OLB);*
806	- If F$Search("*.Opt").nes."" Then Delete/NoConfirm/Log *.Opt;*
807	- If F$Search("config.h").nes."" Then Delete/NoConfirm/Log config.h;*
808	- If F$Search("config.sh").nes."" Then Delete/NoConfirm/Log config.sh;*
809	- $(MINIPERL) -e "use File::Path; rmtree(\@ARGV,1,0);" config
810	- $(MINIPERL) -e "use File::Path; rmtree(\@ARGV,1,0);" $(unidatafiles)
811	- $(MINIPERL) -e "use File::Path; rmtree(\@ARGV,1,0);" $(unidatadirs)
812	- If F$Search("Descrip.MMS").nes."" Then Delete/NoConfirm/Log Descrip.MMS;*
813	- If F$Search("extra_pods.Com").nes."" Then Delete/NoConfirm/Log extra_pods.Com;*
814	- If F$Search("extra.pods").nes."" Then Delete/NoConfirm/Log extra.pods;*
815	- $(MINIPERL) -e "use File::Path; rmtree(['[.CXX_REPOSITORY]', 'lib/auto','lib/VMS','lib/$(ARCHNAME)'],1,0);"
816	- If F$Search("*.TS").nes."" Then Delete/NoConfirm/Log *.TS;*
817	- If F$Search("[.lib]Config.pm").nes."" Then Delete/NoConfirm/Log [.lib]Config.pm;*
818	- If F$Search("[.lib]Config_heavy.pl").nes."" Then Delete/NoConfirm/Log [.lib]Config_heavy.pl;*
819	- If F$Search("[.lib]*.com").nes."" Then Delete/NoConfirm/Log [.lib]*.com;*
820	- If F$Search("[.lib...].exists").nes."" Then Delete/NoConfirm/Log [.lib...].exists;*
821	- If F$Search("[.pod]*.com").nes."" Then Delete/NoConfirm/Log [.pod]*.com;*
822	- If F$Search("[.utils]*.com").nes."" Then Delete/NoConfirm/Log [.utils]*.com;*
823	- If F$Search("$(ARCHDIR)Config.pm").nes."" Then Delete/NoConfirm/Log $(ARCHDIR)Config.pm;*
824	- If F$Search("$(ARCHDIR)Config_heavy.pl").nes."" Then Delete/NoConfirm/Log $(ARCHDIR)Config_heavy.pl;*
825	- If F$Search("[.utils]perldoc.com").nes."" Then Delete/NoConfirm/Log [.utils]perldoc.com;*
826	- If F$Search("[.utils]perlivp.com").nes."" Then Delete/NoConfirm/Log [.utils]perlivp.com;*
827	- If F$Search("[...]*$(E)").nes."" Then Delete/NoConfirm/Log [...]*$(E);*
828	- If F$Search("Perl_Setup.Com").nes."" Then Delete/NoConfirm/Log Perl_Setup.Com;*
829	- If F$Search("[.t]rantests.").nes."" Then Delete/NoConfirm/Log [.t]rantests.;*
830	- If F$Search("[.t]test_state.").nes."" Then Delete/NoConfirm/Log [.t]test_state.;*
831	- If F$Search("vmspipe.com").nes."" Then Delete/NoConfirm/Log vmspipe.com;*
832	- If F$Search("[.lib]buildcustomize.pl").nes."" Then Delete/NoConfirm/Log [.lib]buildcustomize.pl;*
833	- If F$Search("[.lib]config.pod").nes."" Then Delete/NoConfirm/Log [.lib]config.pod;*
834
835cleansrc : clean
836	- If F$Search("*.c;-1").nes."" Then Purge/NoConfirm/Log *.c
837	- If F$Search("*.h;-1").nes."" Then Purge/NoConfirm/Log *.h
838	- If F$Search("*.vms;-1").nes."" Then Purge/NoConfirm/Log *.vms
839	- If F$Search("[.vms]$(MAKEFILE);-1").nes."" Then Purge/NoConfirm/Log [.vms]$(MAKEFILE)
840	- If F$Search("[.vms]*.c;-1").nes."" Then Purge/NoConfirm/Log [.vms]*.c
841	- If F$Search("[.vms]*.h;-1").nes."" Then Purge/NoConfirm/Log [.vms]*.h
842	- If F$Search("[.vms]*.pl;-1").nes."" Then Purge/NoConfirm/Log [.vms]*.pl
843	- If F$Search("[.vms]*.vms;-1").nes."" Then Purge/NoConfirm/Log [.vms]*.vms
844	- If F$Search("[.vms...]*.pm;-1").nes."" Then Purge/NoConfirm/Log [.vms...]*.pm
845	- If F$Search("[.vms...]*.xs;-1").nes."" Then Purge/NoConfirm/Log [.vms...]*.xs
846!GROK!THIS!
847