Re: [ID 20010426.003] Not OK: perl v5.7.1 +DEVEL9849 on i686-linux-thread-multi-64int...

Message-ID: <Pine.LNX.4.33.0104261529300.13049-100000@lapaki.jach.hawaii.edu>

p4raw-id: //depot/perl@9878

diff --git a/t/lib/xs-typemap.t b/t/lib/xs-typemap.t
index eaf83cc..0cf1ab3 100644 (file)
--- a/t/lib/xs-typemap.t
+++ b/t/lib/xs-typemap.t
@@ -162,7 +162,7 @@ ok( T_U_CHAR(300) != 300);
 print "# T_FLOAT\n";
 
 # limited precision
-ok( sprintf("%6.3f",T_FLOAT(52.345)), 52.345);
+ok( sprintf("%6.3f",T_FLOAT(52.345)), sprintf("%6.3f",52.345));
 
 # T_NV
 print "# T_NV\n";
@@ -172,7 +172,7 @@ ok( T_NV(52.345), 52.345);
 # T_DOUBLE
 print "# T_DOUBLE\n";
 
-ok( T_DOUBLE(52.345), 52.345);
+ok( sprintf("%6.3f",T_DOUBLE(52.345)), sprintf("%6.3f",52.345));
 
 # T_PV
 print "# T_PV\n";