stdlib/strtod.c

   1 /* Read decimal floating point numbers.
   2    This file is part of the GNU C Library.
   3    Copyright (C) 1995-2002, 2003, 2004 Free Software Foundation, Inc.
   4    Contributed by Ulrich Drepper <drepper@gnu.org>, 1995.
   5
   6    The GNU C Library is free software; you can redistribute it and/or
   7    modify it under the terms of the GNU Lesser General Public
   8    License as published by the Free Software Foundation; either
   9    version 2.1 of the License, or (at your option) any later version.
  10
  11    The GNU C Library is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14    Lesser General Public License for more details.
  15
  16    You should have received a copy of the GNU Lesser General Public
  17    License along with the GNU C Library; if not, write to the Free
  18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  19    02111-1307 USA.  */
  20
  21 #include <stdlib.h>
  22 #include <wchar.h>
  23 #include <locale/localeinfo.h>
  24
  25
  26 #ifndef FLOAT
  27 # define FLOAT double
  28 # ifdef USE_WIDE_CHAR
  29 #  define STRTOF wcstod
  30 #  define STRTOF_L __wcstod_l
  31 # else
  32 #  define STRTOF strtod
  33 #  define STRTOF_L __strtod_l
  34 # endif
  35 #endif
  36
  37 #ifdef USE_WIDE_CHAR
  38 # include <wctype.h>
  39 # define STRING_TYPE wchar_t
  40 #else
  41 # define STRING_TYPE char
  42 #endif
  43
  44 #define INTERNAL(x) INTERNAL1(x)
  45 #define INTERNAL1(x) __##x##_internal
  46
  47
  48 FLOAT
  49 INTERNAL (STRTOF) (nptr, endptr, group)
  50      const STRING_TYPE *nptr;
  51      STRING_TYPE **endptr;
  52      int group;
  53 {
  54   return INTERNAL(STRTOF_L) (nptr, endptr, group, _NL_CURRENT_LOCALE);
  55 }
  56 #if defined _LIBC
  57 libc_hidden_def (INTERNAL (STRTOF))
  58 #endif
  59
  60
  61 FLOAT
  62 #ifdef weak_function
  63 weak_function
  64 #endif
  65 STRTOF (nptr, endptr)
  66      const STRING_TYPE *nptr;
  67      STRING_TYPE **endptr;
  68 {
  69   return INTERNAL(STRTOF_L) (nptr, endptr, 0, _NL_CURRENT_LOCALE);
  70 }