* precision of 128 bits. */
#define MAX_NV_BYTES (128/8)
-static const char nan_payload_error[] = "NaN payload error";
+static const char invalid_nan_payload[] = "Invalid NaN payload";
/*
*hibyte &= ~mask;
}
if (error) {
- Perl_ck_warner_d(aTHX_ packWARN(WARN_OVERFLOW),
- nan_payload_error);
+ Perl_ck_warner(aTHX_ packWARN(WARN_OVERFLOW),
+ invalid_nan_payload);
}
nan_signaling_set(nvp, signaling);
}
}
if (error) {
- Perl_ck_warner_d(aTHX_ packWARN(WARN_OVERFLOW),
- nan_payload_error);
+ Perl_ck_warner(aTHX_ packWARN(WARN_OVERFLOW),
+ invalid_nan_payload);
}
if (s == send) {
the only valid ones supported are C<dfs> and C<c3>, unless you have loaded
a module that is a MRO plugin. See L<mro> and L<perlmroapi>.
+=item Invalid NaN payload
+
+(W overflow) C<Nan> (not-a-number) floating point values can carry
+payload information in addition to just being NaN. The amount of
+information is limited, and dependent on the platform.
+Either the payload overflowed, or simply could not be parsed.
+See L<perldata/Special floating point>.
+
=item Invalid negative number (%s) in chr
(W utf8) You passed a negative number to C<chr>. Negative numbers are