diff options
author | Nicholas Clark <nick@ccl4.org> | 2007-05-29 19:57:34 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2007-05-29 19:57:34 +0000 |
commit | 2da69e3251f35ba724310352213c9f1aa37d4d1d (patch) | |
tree | 238397dcaf0f21cb870c5d5694b66a6884c21795 /ext/POSIX | |
parent | 6ead8143a52fa6f941a4e41a7802d43ef4363b70 (diff) | |
download | perl-2da69e3251f35ba724310352213c9f1aa37d4d1d.tar.gz |
DBL_EPSILON DBL_MIN FLT_EPSILON FLT_MIN are not C constant expressions
on z/OS, so move them to the list of non const constants.
p4raw-id: //depot/perl@31308
Diffstat (limited to 'ext/POSIX')
-rw-r--r-- | ext/POSIX/Makefile.PL | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/ext/POSIX/Makefile.PL b/ext/POSIX/Makefile.PL index 74e7d194e5..0c5bc8c550 100644 --- a/ext/POSIX/Makefile.PL +++ b/ext/POSIX/Makefile.PL @@ -94,15 +94,14 @@ push @names, {name=>$_, type=>"UV"} foreach (qw(SA_NOCLDSTOP SA_NOCLDWAIT SA_NODEFER SA_ONSTACK SA_RESETHAND SA_RESTART SA_SIGINFO UCHAR_MAX UINT_MAX ULONG_MAX USHRT_MAX)); push @names, {name=>$_, type=>"NV", not_constant=>1} - foreach (qw(DBL_MAX FLT_MAX LDBL_MAX LDBL_MIN LDBL_EPSILON)); + foreach (qw(DBL_MAX FLT_MAX LDBL_MAX LDBL_MIN LDBL_EPSILON + DBL_EPSILON DBL_MIN FLT_EPSILON FLT_MIN)); push @names, {name=>$_, type=>"NV"} - foreach (qw(DBL_DIG DBL_EPSILON DBL_MANT_DIG DBL_MAX_10_EXP - DBL_MAX_EXP DBL_MIN DBL_MIN_10_EXP DBL_MIN_EXP - FLT_DIG FLT_EPSILON FLT_MANT_DIG FLT_MAX_10_EXP - FLT_MAX_EXP FLT_MIN FLT_MIN_10_EXP FLT_MIN_EXP FLT_RADIX - LDBL_DIG LDBL_MANT_DIG LDBL_MAX_10_EXP - LDBL_MAX_EXP LDBL_MIN_10_EXP LDBL_MIN_EXP)); + foreach (qw(DBL_DIG DBL_MANT_DIG DBL_MAX_10_EXP DBL_MAX_EXP DBL_MIN_10_EXP + DBL_MIN_EXP FLT_DIG FLT_MANT_DIG FLT_MAX_10_EXP FLT_MAX_EXP + FLT_MIN_10_EXP FLT_MIN_EXP FLT_RADIX LDBL_DIG LDBL_MANT_DIG + LDBL_MAX_10_EXP LDBL_MAX_EXP LDBL_MIN_10_EXP LDBL_MIN_EXP)); push @names, {name=>$_, type=>"IV", default=>["IV", "0"]} foreach (qw(_POSIX_ARG_MAX _POSIX_CHILD_MAX _POSIX_CHOWN_RESTRICTED |