Merge fe27844 into c712ff8

Perl · Aug 3, 2021 · 0e793c5 · 0e793c5
2 parents c712ff8 + fe27844
commit 0e793c5
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
@@ -3549,7 +3549,7 @@ strtol(str, base = 0)
             num = strtol(str, &unparsed, base);
 #if IVSIZE < LONGSIZE
             if (num < IV_MIN || num > IV_MAX)
-                PUSHs(sv_2mortal(newSVnv((double)num)));
+                PUSHs(sv_2mortal(newSVnv((NV)num)));
             else
 #endif
                 PUSHs(sv_2mortal(newSViv((IV)num)));
@@ -3583,7 +3583,7 @@ strtoul(str, base = 0)
             num = strtoul(str, &unparsed, base);
 #if UVSIZE < LONGSIZE
             if (num > UV_MAX)
-                PUSHs(sv_2mortal(newSVnv((double)num)));
+                PUSHs(sv_2mortal(newSVnv((NV)num)));
             else
 #endif
                 PUSHs(sv_2mortal(newSVuv((UV)num)));