diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-02 11:42:14 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-02 11:42:14 +0000 |
| commit | 464650678f8afe6a6286059864c15b9455f90a42 (patch) | |
| tree | e5b2fa64d53ca6f81885161f51195ee9e6640b6b /pod/perlfunc.pod | |
| parent | 29fe7a80153b6d2e749a8f652a3275fb1d6538a5 (diff) | |
| download | perl-464650678f8afe6a6286059864c15b9455f90a42.tar.gz | |
Enhance the description of how to detect quad support.
p4raw-id: //depot/cfgperl@3883
Diffstat (limited to 'pod/perlfunc.pod')
| -rw-r--r-- | pod/perlfunc.pod | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index 253466529d..aa55e3e48b 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -4128,10 +4128,11 @@ For example %lld %16LX %qo -You can find out whether your Perl supports long doubles via L<Config>: +You can find out whether your Perl supports quads via L<Config>: use Config; - $Config{use64bits} and print "quads\n"; + ($Config{use64bits} eq 'define' || $Config{longsize} == 8) && + print "quads\n"; If Perl understands "long doubles" (this requires that the platform supports long doubles), the flags @@ -4149,7 +4150,7 @@ For example You can find out whether your Perl supports long doubles via L<Config>: use Config; - $Config{d_longdbl} and print "long doubles\n"; + $Config{d_longdbl} eq 'define' && print "long doubles\n"; =item sqrt EXPR |