diff options
| author | Charles Bailey <bailey@newman.upenn.edu> | 1998-01-02 22:54:29 -0500 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-01-08 12:56:31 +0000 |
| commit | fc1ce8cc0aa3c1d2926edfb2f302ea8c60b40168 (patch) | |
| tree | d739c6f7d0538e687f6a8a3be61793919216e4f7 /vms/gen_shrfls.pl | |
| parent | 0151c6efc77004eadcc86505e0e29b10208d3f66 (diff) | |
| download | perl-fc1ce8cc0aa3c1d2926edfb2f302ea8c60b40168.tar.gz | |
Assorted VMS patches (mostly VMS makefile update for new headers):
Subject: [PATCH] VMS update for 5.004_56
p4raw-id: //depot/perl@403
Diffstat (limited to 'vms/gen_shrfls.pl')
| -rw-r--r-- | vms/gen_shrfls.pl | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/vms/gen_shrfls.pl b/vms/gen_shrfls.pl index 807ce59a90..0a8d7e60dc 100644 --- a/vms/gen_shrfls.pl +++ b/vms/gen_shrfls.pl @@ -39,7 +39,7 @@ require 5.000; $debug = $ENV{'GEN_SHRFLS_DEBUG'}; -print "gen_shrfls.pl Rev. 03-Nov-1997\n" if $debug; +print "gen_shrfls.pl Rev. 14-Dec-1997\n" if $debug; if ($ARGV[0] eq '-f') { open(INP,$ARGV[1]) or die "Can't read input file $ARGV[1]: $!\n"; @@ -399,8 +399,6 @@ __END__ # Oddball cases, so we can keep the perl.h scan above simple rcsid=vars # declared in perl.c -regarglen=vars # declared in regcomp.h -regdummy=vars # declared in regcomp.h regkind=vars # declared in regcomp.h simple=vars # declared in regcomp.h varies=vars # declared in regcomp.h |