diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-02 20:30:29 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-02 20:30:29 +0000 |
commit | 17dba11114e76689984d3af7bcccc9c9707bfeb4 (patch) | |
tree | 36f04f33ccc69059a1500f76ee0f5afc44129007 | |
parent | fe6f1558c7f680030b5f50795459bce8c0b94ba1 (diff) | |
parent | 1e56dfa41f52cacb98c6609af53f1317a43aaa17 (diff) | |
download | perl-17dba11114e76689984d3af7bcccc9c9707bfeb4.tar.gz |
integrate cfgperl changes into mainline
p4raw-id: //depot/perl@5451
-rwxr-xr-x | Configure | 4 | ||||
-rw-r--r-- | hints/irix_6.sh | 4 | ||||
-rw-r--r-- | pp.c | 15 |
3 files changed, 21 insertions, 2 deletions
@@ -20,7 +20,7 @@ # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $ # -# Generated on Thu Mar 2 19:38:01 EET 2000 [metaconfig 3.0 PL70] +# Generated on Thu Mar 2 21:42:14 EET 2000 [metaconfig 3.0 PL70] # (with additional metaconfig patches by perlbug@perl.com) cat >/tmp/c1$$ <<EOF @@ -4817,7 +4817,7 @@ case "$installstyle" in *) dflt='lib/perl5' ;; esac ;; -*) dflt='lib/perl5' ;; +*) dflt="$installstyle" ;; esac : Probably not worth prompting for this since we prompt for all : the directories individually, and the prompt would be too long and diff --git a/hints/irix_6.sh b/hints/irix_6.sh index d14ac93af6..09c5ee1d59 100644 --- a/hints/irix_6.sh +++ b/hints/irix_6.sh @@ -206,6 +206,10 @@ esac # Don't groan about unused libraries. ldflags="$ldflags -Wl,-woff,84" +case "`$cc -version 2>&1`" in +*7.2.*) op_cflags='optimize=-O1' ;; # workaround for an optimizer bug +esac + # We don't want these libraries. # Socket networking is in libc, these are not installed by default, # and just slow perl down. (scotth@sgi.com) @@ -1199,7 +1199,21 @@ PP(pp_ncmp) { dPOPTOPnnrl; I32 value; +#ifdef __osf__ /* XXX fix in 5.6.1 --jhi */ +#if defined(USE_LONG_DOUBLE) && defined(HAS_LONG_DOUBLE) +#define Perl_isnan isnanl +#else +#define Perl_isnan isnan +#endif +#endif +#ifdef __osf__ /* XXX fix in 5.6.1 --jhi */ + if (Perl_isnan(left) || Perl_isnan(right)) { + SETs(&PL_sv_undef); + RETURN; + } + value = (left > right) - (left < right); +#else if (left == right) value = 0; else if (left < right) @@ -1210,6 +1224,7 @@ PP(pp_ncmp) SETs(&PL_sv_undef); RETURN; } +#endif SETi(value); RETURN; } |