diff options
| author | Craig A. Berry <craigberry@mac.com> | 2019-06-22 22:00:10 -0500 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2019-06-22 22:00:10 -0500 |
| commit | d15ced938aff1817491860b6951c872db4899402 (patch) | |
| tree | 0b15b9a552ad941b459e3d39a3ddce87a4738dc9 /vms | |
| parent | 6bdd6a87aee9aec7d961f9942697ad6594042290 (diff) | |
| download | perl-d15ced938aff1817491860b6951c872db4899402.tar.gz | |
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.
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/descrip_mms.template | 4 | ||||
| -rw-r--r-- | vms/gen_shrfls.pl | 2 |
2 files changed, 3 insertions, 3 deletions
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 |