Test for atof (Bug 4337)

[Uwe Bonnes]

Changelog:
	dlls/msvcrt/tests/strings.c
	Add a test for atof 

This shows that not atof() is the cause for Bug 4337 but printf
-- 
Uwe Bonnes                bon at elektron.ikp.physik.tu-darmstadt.de

Institut fuer Kernphysik  Schlossgartenstrasse 9  64289 Darmstadt
--------- Tel. 06151 162516 -------- Fax. 06151 164321 ----------
Index: wine/dlls/msvcrt/tests/string.c
===================================================================
RCS file: /home/wine/wine/dlls/msvcrt/tests/string.c,v
retrieving revision 1.6
diff -u -r1.6 string.c
--- wine/dlls/msvcrt/tests/string.c	21 Nov 2005 12:03:18 -0000	1.6
+++ wine/dlls/msvcrt/tests/string.c	21 Jan 2006 14:08:15 -0000
@@ -99,6 +99,28 @@
     ok( ret==0, "_mbsspn returns %d should be 0\n", ret);
 }
 
+static void test_atof( void)
+{
+    char s1[]="  -2309.12E-15";
+    char s2[]="7.8912654773d210";
+    char s3[]="  -9885 pigs";
+    char s4[]="98854 dollars";
+    double x;
+
+    x = atof( s1 );
+    ok(x==-2.309120e-012, "atof(%s) returnrd  %e\n", s1, x );
+
+    x = atof( s2 );
+    ok(x==7.8912654773, "atof(%s) returnrd  %e\n", s2, x );
+    
+    x = atof( s3 );
+    ok(x==-9.885000e+003, "atof(%s) returnrd  %e\n", s3, x );
+    
+    x = atof( s4 );
+    ok(x==9.885400e+004, "atof(%s) returnrd  %e\n", s4, x );
+    
+}
+    
 START_TEST(string)
 {
     void *mem;
@@ -125,4 +147,5 @@
     test_ismbblead();
    /* test _mbsspn */
     test_mbsspn();
+    test_atof();
 }