1 /* Copyright (C) 1996 DJ Delorie, see COPYING.DJ for details */
2 /* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */
4 #include <msvcrt/stdlib.h>
8 strtod(const char *s, char **sret)
10 long double r; /* result */
12 long double d; /* scale */
13 int sign; /* +- 1.0 */
23 while ((*s == ' ') || (*s == '\t'))
34 while ((*s >= '0') && (*s <= '9'))
46 while ((*s >= '0') && (*s <= '9'))
62 if ((*s == 'e') || (*s == 'E'))
72 if ((*s < '0') || (*s > '9'))
79 while ((*s >= '0') && (*s <= '9'))
88 for (i = 1; i <= e; i++)
91 for (i = 1; i <= e; i++)