diff options
| author | Craig A. Berry <craigberry@mac.com> | 2001-12-11 10:39:13 -0600 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-11 21:49:58 +0000 |
| commit | 79f41ce5e5e3ebe21c57d69b39c2a3b2634ae32e (patch) | |
| tree | 4aed90f9af1404f61fdca3f5b5ddc4f45da89e76 /configure.com | |
| parent | 5e20a8caf01365118243ba3d44ce3f93ddc42f27 (diff) | |
| download | perl-79f41ce5e5e3ebe21c57d69b39c2a3b2634ae32e.tar.gz | |
Gconvert for VMS again
Message-Id: <5.1.0.14.2.20011211162600.02a4b008@exchi01>
p4raw-id: //depot/perl@13634
Diffstat (limited to 'configure.com')
| -rw-r--r-- | configure.com | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/configure.com b/configure.com index d58093d4f9..d1abb3a433 100644 --- a/configure.com +++ b/configure.com @@ -5083,7 +5083,13 @@ $ WC "cpplast='" + cpplast + "'" $ WC "cppminus='" + cppminus + "'" $ WC "cpprun='" + cpprun + "'" $ WC "cppstdin='" + cppstdin + "'" +$ IF use64bitint .OR. use64bitint .EQS. "define" +$ THEN +$! gcvt() does not work for > 16 decimal places; fallback to sprintf +$ WC "d_Gconvert='sprintf((b),""%.*" + (nvgformat-"""") + ",(n),(x))'" +$ ELSE $ WC "d_Gconvert='my_gconvert(x,n,t,b)'" +$ ENDIF $ WC "d_PRIEldbl='" + d_PRIEUldbl + "'" $ WC "d_PRIFldbl='" + d_PRIFUldbl + "'" $ WC "d_PRIGldbl='" + d_PRIGUldbl + "'" |