summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorDaniel Dragan <bulk88@hotmail.com>2014-12-26 00:34:03 -0500
committerFather Chrysostomos <sprout@cpan.org>2014-12-26 06:58:42 -0800
commit2b9215fdb83c97496b82d0c73d4903097a8ed66b (patch)
treebf4fb126c9136bf2c2f368e82e2dcdd8635ff61e /pp_sys.c
parent05623e6a9556ae730ad6e1961a9b0e4d675e7a9a (diff)
downloadperl-2b9215fdb83c97496b82d0c73d4903097a8ed66b.tar.gz
[perl #123502] isnan identifier can't be used as a var
cl -c -nologo -GF -W3 -I..\lib\CORE -I.\include -I. -I.. -DWIN32 -D_CONS OLE -DNO_STRICT -DPERLDLL -DPERL_CORE -O1 -MD -Zi -DNDEBUG -G7 -GL -DPERL_EXTE RNAL_GLOB -DPERL_IS_MINIPERL -Fo.\mini\pp_sys.obj ..\pp_sys.c pp_sys.c ..\pp_sys.c(4610) : error C2063: '_isnan' : not a function NMAKE : fatal error U1077: 'cl' : return code '0x2' See RT ticket for details.
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/pp_sys.c b/pp_sys.c
index da69cb0d32..aa006e6d30 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -4607,13 +4607,13 @@ PP(pp_gmtime)
}
else {
NV input = Perl_floor(POPn);
- const bool isnan = Perl_isnan(input);
+ const bool pl_isnan = Perl_isnan(input);
when = (Time64_T)input;
- if (UNLIKELY(isnan || when != input)) {
+ if (UNLIKELY(pl_isnan || when != input)) {
/* diag_listed_as: gmtime(%f) too large */
Perl_ck_warner(aTHX_ packWARN(WARN_OVERFLOW),
"%s(%.0" NVff ") too large", opname, input);
- if (isnan) {
+ if (pl_isnan) {
err = NULL;
goto failed;
}