diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2016-10-17 08:29:35 -0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2016-10-17 19:29:29 -0400 |
commit | 6e6b38aecfbcb229c8568366e3566d7fe7c8bbc5 (patch) | |
tree | 38c979cabf9cb04a3b09c959efc1095c80113744 /config_h.SH | |
parent | 4eadd82f8c152034818f42956737102f674f9118 (diff) | |
download | perl-6e6b38aecfbcb229c8568366e3566d7fe7c8bbc5.tar.gz |
Add scan for IBM and Cray mainframe fp formats.
For completeness: it's quite unlikely Perl would build in those
environments.
Though with Cray it's less impossible: Perl used to build in C90
UNICOS, in 5.8-ish timeframe.
With IBM, highly unlikely, because there probably never was a UNIXy
enough environment where the IBM Floating Point Architecture was used.
Diffstat (limited to 'config_h.SH')
-rwxr-xr-x | config_h.SH | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/config_h.SH b/config_h.SH index 099f92ab02..fbf6d327cd 100755 --- a/config_h.SH +++ b/config_h.SH @@ -3982,6 +3982,9 @@ sed <<!GROK!THIS! >$CONFIG_H -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un * DOUBLE_IS_VAX_F_FLOAT * DOUBLE_IS_VAX_D_FLOAT * DOUBLE_IS_VAX_G_FLOAT + * DOUBLE_IS_IBM_SINGLE_32_BIT + * DOUBLE_IS_IBM_DOUBLE_64_BIT + * DOUBLE_IS_CRAY_SINGLE_64_BIT * DOUBLE_IS_UNKNOWN_FORMAT */ #define DOUBLEKIND $doublekind /**/ @@ -3996,6 +3999,9 @@ sed <<!GROK!THIS! >$CONFIG_H -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un #define DOUBLE_IS_VAX_F_FLOAT 9 #define DOUBLE_IS_VAX_D_FLOAT 10 #define DOUBLE_IS_VAX_G_FLOAT 11 +#define DOUBLE_IS_IBM_SINGLE_32_BIT 12 +#define DOUBLE_IS_IBM_DOUBLE_64_BIT 13 +#define DOUBLE_IS_CRAY_SINGLE_64_BIT 14 #define DOUBLE_IS_UNKNOWN_FORMAT -1 #$d_PRIfldbl PERL_PRIfldbl $sPRIfldbl /**/ #$d_PRIgldbl PERL_PRIgldbl $sPRIgldbl /**/ |