diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2015-01-11 22:58:35 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2015-01-12 06:45:13 -0500 |
| commit | 415b66b2c58add39fa4cb119f7eafa5164f33298 (patch) | |
| tree | 4c1a04b2f74a062a9a70ac91058bcd2db41d5911 /pp_ctl.c | |
| parent | eaa9f768d686671c8a8e374a757a584b67c62fd4 (diff) | |
| download | perl-415b66b2c58add39fa4cb119f7eafa5164f33298.tar.gz | |
Detect infnan range ends.
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -2095,6 +2095,8 @@ S_outside_integer(pTHX_ SV *sv) { if (SvOK(sv)) { const NV nv = SvNV_nomg(sv); + if (Perl_isinfnan(nv)) + return TRUE; #ifdef NV_PRESERVES_UV if (nv < (NV)IV_MIN || nv > (NV)IV_MAX) return TRUE; |