Change 11584 by jhi@alpha on 2001/08/05 16:42:50
Subject: warning in sv.c: double format, NV arg
From: "Philip Newton" <[EMAIL PROTECTED]>
Date: Sun, 5 Aug 2001 19:41:07 +0200
Message-Id: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/sv.c#454 edit
Differences ...
==== //depot/perl/sv.c#454 (text) ====
Index: perl/sv.c
--- perl/sv.c.~1~ Sun Aug 5 10:45:05 2001
+++ perl/sv.c Sun Aug 5 10:45:05 2001
@@ -2054,7 +2054,7 @@
) {
SvIOK_on(sv); /* Can this go wrong with rounding? NWC */
DEBUG_c(PerlIO_printf(Perl_debug_log,
- "0x%"UVxf" iv(%g => %"IVdf") (precise)\n",
+ "0x%"UVxf" iv(%"NVgf" => %"IVdf") (precise)\n",
PTR2UV(sv),
SvNVX(sv),
SvIVX(sv)));
@@ -2065,7 +2065,7 @@
that PV->IV would be better than PV->NV->IV
flags already correct - don't set public IOK. */
DEBUG_c(PerlIO_printf(Perl_debug_log,
- "0x%"UVxf" iv(%g => %"IVdf") (imprecise)\n",
+ "0x%"UVxf" iv(%"NVgf" => %"IVdf") (imprecise)\n",
PTR2UV(sv),
SvNVX(sv),
SvIVX(sv)));
@@ -2348,7 +2348,7 @@
) {
SvIOK_on(sv); /* Can this go wrong with rounding? NWC */
DEBUG_c(PerlIO_printf(Perl_debug_log,
- "0x%"UVxf" uv(%g => %"IVdf") (precise)\n",
+ "0x%"UVxf" uv(%"NVgf" => %"IVdf") (precise)\n",
PTR2UV(sv),
SvNVX(sv),
SvIVX(sv)));
@@ -2359,7 +2359,7 @@
that PV->IV would be better than PV->NV->IV
flags already correct - don't set public IOK. */
DEBUG_c(PerlIO_printf(Perl_debug_log,
- "0x%"UVxf" uv(%g => %"IVdf") (imprecise)\n",
+ "0x%"UVxf" uv(%"NVgf" => %"IVdf") (imprecise)\n",
PTR2UV(sv),
SvNVX(sv),
SvIVX(sv)));
End of Patch.
