diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-04 17:57:40 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-04 17:57:40 +0000 |
commit | 34d861e4184d034166c726cda26ad14cdebb232e (patch) | |
tree | 068008da4048aaf198d3d2fdab4efd9711a51eac | |
parent | 05f13f530523fe7692b63a464a05e0fa1242462b (diff) | |
download | perl-34d861e4184d034166c726cda26ad14cdebb232e.tar.gz |
Warn about numconvert.t in case somebody
wants to make sv_2pv more 64-bit aware.
p4raw-id: //depot/cfgperl@4074
-rw-r--r-- | sv.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -1796,6 +1796,9 @@ Perl_sv_2pv(pTHX_ register SV *sv, STRLEN *lp) } if (SvNOKp(sv)) { /* See note in sv_2uv() */ /* XXXX 64-bit? IV may have better precision... */ + /* I tried changing this for to be 64-bit-aware and + * the t/op/numconvert.t became very, very, angry. + * --jhi Sep 1999 */ if (SvTYPE(sv) < SVt_PVNV) sv_upgrade(sv, SVt_PVNV); SvGROW(sv, 28); |