In perl.git, the branch blead has been updated
<https://perl5.git.perl.org/perl.git/commitdiff/c6981b9a20742358c4af17bc46ba8d20a1c46d07?hp=f6c49686d30d066bfb0eb583cbbfeb243f65a727>
- Log -----------------------------------------------------------------
commit c6981b9a20742358c4af17bc46ba8d20a1c46d07
Author: Craig A. Berry <craigbe...@mac.com>
Date: Sat Jun 22 22:09:04 2019 -0500
Make -Duse64bitint the default on VMS.
The capability came along with Alpha more than two decades ago, so
maybe the third decade of the twenty-first century should see it
become the default.
commit d15ced938aff1817491860b6951c872db4899402
Author: Craig A. Berry <craigbe...@mac.com>
Date: Sat Jun 22 22:00:10 2019 -0500
Begin restore of case sensitive symbols on VMS
There is a long-unmaintained option to build with case sensitive
symbols, which is needed by some extensions that have symbols
that differ only by case and need the Perl core to be built with
the same option.
There will be additional steps necessary, but getting "perl" and
"globals" in the correct case is a start. We no longer need to
explicitly specify globals for the linker, so don't do that and
thus avoid having to guess which case it wants.
commit 6bdd6a87aee9aec7d961f9942697ad6594042290
Author: Craig A. Berry <craigbe...@mac.com>
Date: Sat Jun 22 21:26:51 2019 -0500
Fix Unix-format path in Devel::PPPort's Makefile.PL
Post-editing the output of MakeMaker means owning all of its many
platform-specific abstractions, in this case the fact that
t/01_test.t might actually be [.t]01_test.t, t\01_test.t, etc.,
constructed for the parsing pleasure of the native make utility.
So when scanning make rules for this test make a regex that
should match on most platforms, at least if they preserve
filename case. And delete the redundant dependency on pure_all
because, except for the hard-coded Unix-format path, it's already
been correctly inserted by MakeMaker.
No version bump for now as e01077d94eaee34f1361857373 seems to
think we shouldn't, though I'm not sure I follow its rationale.
-----------------------------------------------------------------------
Summary of changes:
configure.com | 2 +-
dist/Devel-PPPort/Makefile.PL | 12 ++----------
pod/perldelta.pod | 4 ++--
vms/descrip_mms.template | 4 ++--
vms/gen_shrfls.pl | 2 +-
5 files changed, 8 insertions(+), 16 deletions(-)
diff --git a/configure.com b/configure.com
index 1f3e73c681..dc251dfe04 100644
--- a/configure.com
+++ b/configure.com
@@ -49,7 +49,7 @@ $ unlink_all_versions = "n"
$ builder = "MMK"
$ use_vmsdebug_perl = "n"
$ use64bitall = "n"
-$ use64bitint = "n"
+$ use64bitint = "y"
$ uselongdouble = "n"
$ uselargefiles = "y"
$ usestdstat = "n"
diff --git a/dist/Devel-PPPort/Makefile.PL b/dist/Devel-PPPort/Makefile.PL
index b96af5fc07..6eac8c82b0 100644
--- a/dist/Devel-PPPort/Makefile.PL
+++ b/dist/Devel-PPPort/Makefile.PL
@@ -169,21 +169,13 @@ sub MY::processPL
} elsif ( $rule =~ m{^\s*^RealPPPort\.xs\s+:}m ) {
$rule =~ s{^(\s*^RealPPPort\.xs\s+:.*)}{$1 ppport.h}m; # RealPPPort.xs
depends on ppport.h
$rule =~ s{pm_to_blib}{}m; # RealPPPort.xs is used to build PPPort
binary, so it cannot depend on it
- } elsif ( $rule =~ m{^\s*^t/01_test\.t\s+:}m ) {
- $rule =~ s{^(\s*^t/01_test\.t\s+:.*)}{$1 $includes}m; # all tests in t/
depends on all files from parts/inc
+ } elsif ( $rule =~ m{^\s*\S+\b01_test\.t\s+:}m ) {
+ $rule =~ s{^(\s*^\S+\b01_test\.t\s+:.*)}{$1 $includes}m; # all tests in
t/ depends on all files from parts/inc
$rule =~ s{pm_to_blib}{}m; # Generating test files does not depend on
built PPPort in blib/
}
$updated .= $rule;
}
- # All test targets depends on pure_all target, so ensure that t/01_test.t
generated by mktests.PL is up-to-date
- $updated .= <<'TESTS_IN_T';
-
-pure_all :: t/01_test.t
- $(NOECHO) $(NOOP)
-
-TESTS_IN_T
-
return $updated;
}
diff --git a/pod/perldelta.pod b/pod/perldelta.pod
index 2fa34c783d..e1122ca681 100644
--- a/pod/perldelta.pod
+++ b/pod/perldelta.pod
@@ -330,9 +330,9 @@ L</Modules and Pragmata> section.
=over 4
-=item XXX-some-platform
+=item VMS
-XXX
+C<-Duse64bitint> is now the default on VMS.
=back
diff --git a/vms/descrip_mms.template b/vms/descrip_mms.template
index b41fd19802..3484866836 100644
--- a/vms/descrip_mms.template
+++ b/vms/descrip_mms.template
@@ -345,11 +345,11 @@ miniperl : $(DBG)miniperl$(E) vmspipe.com
@ Continue
[.lib]buildcustomize.pl : miniperlmain$(O), $(DBG)libperlmini$(OLB) $(CRTL)
write_buildcustomize.pl
- Link
$(LINKFLAGS)/NoDebug/Trace/NoMap/NoFull/NoCross/Exe=$(MINIPERL_EXE)
miniperlmain$(O), $(DBG)libperlmini$(OLB)/Library/Include=globals $(CRTLOPTS)
+ Link
$(LINKFLAGS)/NoDebug/Trace/NoMap/NoFull/NoCross/Exe=$(MINIPERL_EXE)
miniperlmain$(O),$(DBG)libperlmini$(OLB)/Library $(CRTLOPTS)
$(MINIPERL) "-f" write_buildcustomize.pl
$(DBG)miniperl$(E) : miniperlmain$(O), $(DBG)libperlmini$(OLB) $(CRTL)
- Link $(LINKFLAGS)/Trace/Exe=$(MMS$TARGET) miniperlmain$(O),
$(DBG)libperlmini$(OLB)/Library/Include=globals $(CRTLOPTS)
+ Link $(LINKFLAGS)/Trace/Exe=$(MMS$TARGET) miniperlmain$(O),
$(DBG)libperlmini$(OLB)/Library $(CRTLOPTS)
$(DBG)libperl$(OLB) : $(obj)
@ If F$Search("$(MMS$TARGET)").eqs."" Then Library/Object/Create
$(MMS$TARGET)
diff --git a/vms/gen_shrfls.pl b/vms/gen_shrfls.pl
index 6ed7eca9d9..c3842c03d9 100644
--- a/vms/gen_shrfls.pl
+++ b/vms/gen_shrfls.pl
@@ -172,7 +172,7 @@ else {
}
close OPTATTR;
-my $incstr = 'PERL,GLOBALS';
+my $incstr = 'perl,globals';
my (@symfiles, $drvrname);
# Initial hack to permit building of compatible shareable images for a
--
Perl5 Master Repository
