diff options
Diffstat (limited to 'lib/c-strtod.c')
-rw-r--r-- | lib/c-strtod.c | 81 |
1 files changed, 0 insertions, 81 deletions
diff --git a/lib/c-strtod.c b/lib/c-strtod.c deleted file mode 100644 index 031f5f8..0000000 --- a/lib/c-strtod.c +++ /dev/null | |||
@@ -1,81 +0,0 @@ | |||
1 | /* Convert string to double, using the C locale. | ||
2 | |||
3 | Copyright (C) 2003, 2004 Free Software Foundation, Inc. | ||
4 | |||
5 | This program is free software; you can redistribute it and/or modify | ||
6 | it under the terms of the GNU General Public License as published by | ||
7 | the Free Software Foundation; either version 2, or (at your option) | ||
8 | any later version. | ||
9 | |||
10 | This program is distributed in the hope that it will be useful, | ||
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
13 | GNU General Public License for more details. | ||
14 | |||
15 | You should have received a copy of the GNU General Public License | ||
16 | along with this program; if not, write to the Free Software Foundation, | ||
17 | Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ | ||
18 | |||
19 | /* Written by Paul Eggert. */ | ||
20 | |||
21 | #ifdef HAVE_CONFIG_H | ||
22 | # include <config.h> | ||
23 | #endif | ||
24 | |||
25 | #include "c-strtod.h" | ||
26 | |||
27 | #include <locale.h> | ||
28 | #include <stdlib.h> | ||
29 | |||
30 | #include "xalloc.h" | ||
31 | |||
32 | #if LONG | ||
33 | # define C_STRTOD c_strtold | ||
34 | # define DOUBLE long double | ||
35 | # define STRTOD_L strtold_l | ||
36 | #else | ||
37 | # define C_STRTOD c_strtod | ||
38 | # define DOUBLE double | ||
39 | # define STRTOD_L strtod_l | ||
40 | #endif | ||
41 | |||
42 | /* c_strtold falls back on strtod if strtold doesn't conform to C99. */ | ||
43 | #if LONG && HAVE_C99_STRTOLD | ||
44 | # define STRTOD strtold | ||
45 | #else | ||
46 | # define STRTOD strtod | ||
47 | #endif | ||
48 | |||
49 | DOUBLE | ||
50 | C_STRTOD (char const *nptr, char **endptr) | ||
51 | { | ||
52 | DOUBLE r; | ||
53 | |||
54 | #ifdef LC_ALL_MASK | ||
55 | |||
56 | locale_t c_locale = newlocale (LC_ALL_MASK, "C", 0); | ||
57 | r = STRTOD_L (nptr, endptr, c_locale); | ||
58 | freelocale (c_locale); | ||
59 | |||
60 | #else | ||
61 | |||
62 | char *saved_locale = setlocale (LC_NUMERIC, NULL); | ||
63 | |||
64 | if (saved_locale) | ||
65 | { | ||
66 | saved_locale = xstrdup (saved_locale); | ||
67 | setlocale (LC_NUMERIC, "C"); | ||
68 | } | ||
69 | |||
70 | r = STRTOD (nptr, endptr); | ||
71 | |||
72 | if (saved_locale) | ||
73 | { | ||
74 | setlocale (LC_NUMERIC, saved_locale); | ||
75 | free (saved_locale); | ||
76 | } | ||
77 | |||
78 | #endif | ||
79 | |||
80 | return r; | ||
81 | } | ||