From: Jarkko Hietaniemi Date: Sun, 1 Feb 2015 17:17:41 +0000 (-0500) Subject: infnan: define NV_NAN (and NV_QNAN, NV_SNAN) if sunmath X-Git-Tag: v5.21.9~210 X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/498b0fa9b0b73af65d2cf95771a5a46515b62d34?hp=02e75e52e271c046df890b5089c2cb1953332c0d infnan: define NV_NAN (and NV_QNAN, NV_SNAN) if sunmath --- diff --git a/perl.h b/perl.h index f5c64d4..d4f7f52 100644 --- a/perl.h +++ b/perl.h @@ -4346,6 +4346,11 @@ static const union { unsigned int __i; float __f; } __PL_inf_u = #if !defined(NV_NAN) && defined(SNAN) # define NV_NAN (NV)SNAN #endif +#if !defined(NV_NAN) && defined(I_SUNMATH) +# define NV_NAN (NV)quiet_nan() +# define NV_QNAN (NV)quiet_nan() +# define NV_SNAN (NV)signaling_nan() +#endif #if !defined(NV_NAN) # if INTSIZE == 4 /* See the discussion near __PL_inf_u. */