From 02e75e52e271c046df890b5089c2cb1953332c0d Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Sat, 31 Jan 2015 19:02:22 -0500 Subject: [PATCH 1/1] Add NV_MANT_REAL_DIG. --- perl.h | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/perl.h b/perl.h index 13bb7ff..f5c64d4 100644 --- a/perl.h +++ b/perl.h @@ -6482,6 +6482,15 @@ extern void moncontrol(int); # endif #endif +/* The implicit bit platforms include the implicit bit + * in the NV_MANT_DIG. The bit isn't really there, however, + * so the real count of mantissa bits is one less. */ +#ifdef NV_IMPLICIT_BIT +# define NV_MANT_REAL_DIG (NV_MANT_DIG - 1) +#else +# define NV_MANT_REAL_DIG +#endif + /* (KEEP THIS LAST IN perl.h!) -- 1.8.3.1