diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-06 20:56:04 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-06 20:56:04 +0000 |
| commit | bef5f0791f598e360cf5fd6b8d073db19bd2955c (patch) | |
| tree | bcdf82903e510ecf22eefa0b5ce08d4210c2cf4c /hints/dec_osf.sh | |
| parent | 1cade9fc1d0c37f2aeb360371fd40bf341ddc9db (diff) | |
| download | perl-bef5f0791f598e360cf5fd6b8d073db19bd2955c.tar.gz | |
Disable long doubles from pre-5.0 Tru64s.
p4raw-id: //depot/perl@10458
Diffstat (limited to 'hints/dec_osf.sh')
| -rw-r--r-- | hints/dec_osf.sh | 19 |
1 files changed, 17 insertions, 2 deletions
diff --git a/hints/dec_osf.sh b/hints/dec_osf.sh index 9275932659..71bc05f4c1 100644 --- a/hints/dec_osf.sh +++ b/hints/dec_osf.sh @@ -281,12 +281,27 @@ cat > UU/uselongdouble.cbu <<'EOCBU' # This script UU/uselongdouble.cbu will get 'called-back' by Configure # after it has prompted the user for whether to use long doubles. case "$uselongdouble" in -$define|true|[yY]*) d_Gconvert='sprintf((b),"%.*Lg",(n),(x))' ;; +$define|true|[yY]*) + case "`/usr/sbin/sizer -v`" in + *[1-4].0*) cat >&4 <<EOF + +*** +*** Sorry, you cannot use long doubles in pre-V5.0 releases of Tru64. +*** + +Cannot continue, aborting. + +EOF + exit 1 + ;; + esac + d_Gconvert='sprintf((b),"%.*Lg",(n),(x))' + ;; esac EOCBU case "`/usr/sbin/sizer -v`" in -*4.0*) d_modfl=undef ;; # must wait till 5.0 +*[1-4].0*) d_modfl=undef ;; # must wait till 5.0 esac # |