summaryrefslogtreecommitdiff
path: root/numeric.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2017-03-25 14:01:58 -0600
committerKarl Williamson <khw@cpan.org>2017-10-24 08:14:08 -0600
commitf720c878cb3248e9e723e67cb95dab8b304b2650 (patch)
tree1368693cebd919c5f7468e8346cd12744e0bd60c /numeric.c
parenta15aa957e30616c059f73afcce11c7610ddc8d3a (diff)
downloadperl-f720c878cb3248e9e723e67cb95dab8b304b2650.tar.gz
numeric.c: Add comment
Diffstat (limited to 'numeric.c')
-rw-r--r--numeric.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/numeric.c b/numeric.c
index 9d5982a871..6821114f70 100644
--- a/numeric.c
+++ b/numeric.c
@@ -1209,6 +1209,8 @@ S_mulexp10(NV value, I32 exponent)
NV
Perl_my_atof(pTHX_ const char* s)
{
+ /* 's' must be NUL terminated */
+
NV x = 0.0;
#ifdef USE_QUADMATH
Perl_my_atof2(aTHX_ s, &x);