Change 14212 by ams@lustre on 2002/01/12 06:10:52
Subject: [PATCH] More fixes for Stratus VOS
From: "Green, Paul" <[EMAIL PROTECTED]>
Date: Fri, 11 Jan 2002 17:30:37 -0500
Message-Id: <[EMAIL PROTECTED]>
Affected files ...
.... //depot/perl/hints/vos.sh#6 edit
.... //depot/perl/lib/ExtUtils/MM_Unix.pm#137 edit
Differences ...
==== //depot/perl/hints/vos.sh#6 (text) ====
Index: perl/hints/vos.sh
--- perl/hints/vos.sh.~1~ Fri Jan 11 23:15:05 2002
+++ perl/hints/vos.sh Fri Jan 11 23:15:05 2002
@@ -71,3 +71,6 @@
# VOS has a bug that causes _exit() to flush all files.
# This confuses the tests. Make 'em happy here.
fflushNULL=define
+
+# VOS has a link() function but it is a dummy.
+d_link="undef"
==== //depot/perl/lib/ExtUtils/MM_Unix.pm#137 (text) ====
Index: perl/lib/ExtUtils/MM_Unix.pm
--- perl/lib/ExtUtils/MM_Unix.pm.~1~ Fri Jan 11 23:15:05 2002
+++ perl/lib/ExtUtils/MM_Unix.pm Fri Jan 11 23:15:05 2002
@@ -11,7 +11,7 @@
our ($Is_Mac,$Is_OS2,$Is_VMS,$Is_Win32,$Is_Dos,
$Verbose,%pm,%static,$Xsubpp_Version);
-our $VERSION = '1.12604';
+our $VERSION = '1.12605';
require ExtUtils::MakeMaker;
ExtUtils::MakeMaker->import(qw($Verbose &neatvalue));
@@ -1613,10 +1613,11 @@
=item init_main
-Initializes NAME, FULLEXT, BASEEXT, PARENT_NAME, DLBASE, PERL_SRC,
-PERL_LIB, PERL_ARCHLIB, PERL_INC, INSTALLDIRS, INST_*, INSTALL*,
-PREFIX, CONFIG, AR, AR_STATIC_ARGS, LD, OBJ_EXT, LIB_EXT, EXE_EXT, MAP_TARGET,
-LIBPERL_A, VERSION_FROM, VERSION, DISTNAME, VERSION_SYM.
+Initializes AR, AR_STATIC_ARGS, BASEEXT, CONFIG, DISTNAME, DLBASE,
+EXE_EXT, FULLEXT, FULLPERL, INST_*, INSTALL*, INSTALLDIRS, LD,
+LIB_EXT, LIBPERL_A, MAP_TARGET, NAME, OBJ_EXT, PARENT_NAME, PERL,
+PERL_ARCHLIB, PERL_INC, PERL_LIB, PERL_SRC, PERLRUN, PERLRUNINST,
+PREFIX, TEST_LIBS, VERSION, VERSION_FROM, VERSION_SYM, XS_VERSION.
=cut
@@ -2037,6 +2038,11 @@
push @perls, 'miniperl';
}
+ # Build up a set of file names (not command names).
+ foreach $element (@perls) {
+ $element .= "$Config{exe_ext}";
+ }
+
$self->{PERL} ||=
$self->find_perl(5.0, \@perls, \@defpath, $Verbose );
# don't check if perl is executable, maybe they have decided to
End of Patch.
