From: Craig A. Berry <craigberry@mac.com>
Date: Tue, 10 Aug 2004 22:28:04 +0000 (-0500)
Subject: running mktables on VMS
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=23b626098a68e700b17c473fd951347d6ff93572;p=p5sagit%2Fp5-mst-13.2.git

running mktables on VMS
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <41199244.9020706@mac.com>

p4raw-id: //depot/perl@23219
---

diff --git a/vms/descrip_mms.template b/vms/descrip_mms.template
index d0949d6..ebb59f2 100644
--- a/vms/descrip_mms.template
+++ b/vms/descrip_mms.template
@@ -329,17 +329,11 @@ CRTLOPTS =,$(CRTL)/Options
 	$(CC) $(CFLAGS) $(MMS$SOURCE_NAME).c
 .endif
 
-unidatafiles1 = [.lib.unicore]Canonical.pl [.lib.unicore]Exact.pl
-unidatafiles2 = [.lib.unicore]Properties [.lib.unicore]Decomposition.pl
-unidatafiles3 = [.lib.unicore]CombiningClass.pl [.lib.unicore]Name.pl
-unidatafiles4 = [.lib.unicore]PVA.pl
-unidatafiles = $(unidatafiles1) $(unidatafiles2) $(unidatafiles3) $(unidatafiles4)
-
 # Directories of Unicode data files generated by mktables
 unidatadirs = lib/unicore/To lib/unicore/lib
 
 # Modules which must be installed before we can build extensions
-LIBPREREQ = $(ARCHDIR)Config.pm [.lib.VMS]Filespec.pm [.lib]DynaLoader.pm [.lib]XSLoader.pm [.lib]lib.pm [.lib.ExtUtils]XSSymSet.pm $(ARCHDIR)vmspipe.com [.lib]re.pm $(unidatafiles)
+LIBPREREQ = $(ARCHDIR)Config.pm [.lib.VMS]Filespec.pm [.lib]DynaLoader.pm [.lib]XSLoader.pm [.lib]lib.pm [.lib.ExtUtils]XSSymSet.pm $(ARCHDIR)vmspipe.com [.lib]re.pm unidatafiles.ts
 
 utils1 = [.lib.pod]perldoc.com [.lib.ExtUtils]Miniperl.pm [.utils]c2ph.com [.utils]h2ph.com 
 utils2 = [.utils]h2xs.com [.utils]libnetcfg.com [.lib]perlbug.com [.lib]perlcc.com [.utils]dprofpp.com 
@@ -487,10 +481,10 @@ $(ARCHDIR)Config.pm : [.lib]Config.pm
 $(ARCHDIR)vmspipe.com : vmspipe.com
         Copy $(MMS$SOURCE) $(ARCHDIR)
 
-# Aargh. I don't know how (if) it's possible to change directory
-# So make the perl script do it
-$(unidatafiles) : $(MINIPERL_EXE) [.lib]Config.pm [.lib.unicore]mktables
-	$(MINIPERL) [.lib.unicore]mktables "-C" lib "-C" unicore
+unidatafiles.ts : $(MINIPERL_EXE) [.lib]Config.pm [.lib.unicore]mktables
+	$(MINIPERL) [.lib.unicore]mktables "-C" [.lib.unicore] 
+	@ If F$Search("$(MMS$TARGET)").nes."" Then Delete/NoLog/NoConfirm $(MMS$TARGET);*
+	@ Copy/NoConfirm _NLA0: $(MMS$TARGET)
  
 [.ext.dynaloader]dl_vms.c : [.ext.dynaloader]dl_vms.xs $(ARCHDIR)Config.pm [.lib.ExtUtils]XSSymSet.pm $(MINIPERL_EXE)
 	$(XSUBPP) $(MMS$SOURCE) >$(MMS$TARGET)
@@ -1673,7 +1667,8 @@ realclean : clean
 	- If F$Search("Config.H").nes."" Then Delete/NoConfirm/Log Config.H;*
 	- If F$Search("Config.SH").nes."" Then Delete/NoConfirm/Log Config.SH;*
 	- $(MINIPERL) -e "use File::Path; rmtree(\@ARGV,1,0);" config
-	- $(MINIPERL) -e "foreach (@ARGV) {unlink qq{$_;*} or warn qq{unlink $_: $!}}" $(unidatafiles)
+	- If F$Search("[.lib.unicore]*.pl").nes."" Then Delete/NoConfirm/Log [.lib.unicore]*.pl;*
+	- If F$Search("[.lib.unicore]Properties.").nes."" Then Delete/NoConfirm/Log [.lib.unicore]Properties.;*
 	- $(MINIPERL) -e "use File::Path; rmtree(\@ARGV,1,0);" $(unidatadirs)
 	- If F$Search("Descrip.MMS").nes."" Then Delete/NoConfirm/Log Descrip.MMS;*
 	- If F$Search("make_ext.Com").nes."" Then Delete/NoConfirm/Log make_ext.Com;*