This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
sv.h: Make BmUSEFUL the same type on debug/non-debug builds
[perl5.git] / numeric.c
index eda05d9..e96252a 100644 (file)
--- a/numeric.c
+++ b/numeric.c
@@ -803,7 +803,7 @@ S_mulexp10(NV value, I32 exponent)
      * a hammer.  Therefore we need to catch potential overflows before
      * it's too late. */
 
-#if ((defined(VMS) && !defined(__IEEE_FP)) || defined(_UNICOS)) && defined(NV_MAX_10_EXP)
+#if ((defined(VMS) && !defined(_IEEE_FP)) || defined(_UNICOS)) && defined(NV_MAX_10_EXP)
     STMT_START {
        const NV exp_v = log10(value);
        if (exponent >= NV_MAX_10_EXP || exponent + exp_v >= NV_MAX_10_EXP)