diff options
author | David Mitchell <davem@iabyn.com> | 2010-12-15 19:38:17 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2010-12-15 19:41:46 +0000 |
commit | a42d02426c51c2ef1bdefac84284a828de703cda (patch) | |
tree | ff6b50dda007214dc0ed829f064c3db7723071c7 /pp_hot.c | |
parent | c2f8ff19c9ed44116de94b8779bfd09751377cd8 (diff) | |
download | perl-a42d02426c51c2ef1bdefac84284a828de703cda.tar.gz |
don't upgrade overload IV return values to NV
(if we can avoid it).
Fix for RT #77456. Basically it extends the usage of the AMGf_numeric flag
to the remaining overloadable numeric ops that behave differently with IV
and NV.
Diffstat (limited to 'pp_hot.c')
-rw-r--r-- | pp_hot.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -334,7 +334,7 @@ PP(pp_readline) PP(pp_eq) { dVAR; dSP; - tryAMAGICbin_MG(eq_amg, AMGf_set); + tryAMAGICbin_MG(eq_amg, AMGf_set|AMGf_numeric); #ifndef NV_PRESERVES_UV if (SvROK(TOPs) && !SvAMAGIC(TOPs) && SvROK(TOPm1s) && !SvAMAGIC(TOPm1s)) { SP--; |