1  /* Convert string representing a number to float value, using given locale.
       2     Copyright (C) 1997-2023 Free Software Foundation, Inc.
       3     This file is part of the GNU C Library.
       4  
       5     The GNU C Library is free software; you can redistribute it and/or
       6     modify it under the terms of the GNU Lesser General Public
       7     License as published by the Free Software Foundation; either
       8     version 2.1 of the License, or (at your option) any later version.
       9  
      10     The GNU C Library 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 GNU
      13     Lesser General Public License for more details.
      14  
      15     You should have received a copy of the GNU Lesser General Public
      16     License along with the GNU C Library; if not, see
      17     <https://www.gnu.org/licenses/>.  */
      18  
      19  #include <bits/floatn.h>
      20  
      21  #if __HAVE_FLOAT32 && !__HAVE_DISTINCT_FLOAT32
      22  # define strtof32_l __hide_strtof32_l
      23  # define wcstof32_l __hide_wcstof32_l
      24  #endif
      25  
      26  #include <locale.h>
      27  
      28  extern float ____strtof_l_internal (const char *, char **, int, locale_t);
      29  
      30  #define	FLOAT		float
      31  #define	FLT		FLT
      32  #ifdef USE_WIDE_CHAR
      33  # define STRTOF		wcstof_l
      34  # define __STRTOF	__wcstof_l
      35  # define STRTOF_NAN	__wcstof_nan
      36  #else
      37  # define STRTOF		strtof_l
      38  # define __STRTOF	__strtof_l
      39  # define STRTOF_NAN	__strtof_nan
      40  #endif
      41  #define	MPN2FLOAT	__mpn_construct_float
      42  #define	FLOAT_HUGE_VAL	HUGE_VALF
      43  
      44  #include "strtod_l.c"
      45  
      46  #if __HAVE_FLOAT32 && !__HAVE_DISTINCT_FLOAT32
      47  # undef strtof32_l
      48  # undef wcstof32_l
      49  # ifdef USE_WIDE_CHAR
      50  weak_alias (wcstof_l, wcstof32_l)
      51  # else
      52  weak_alias (strtof_l, strtof32_l)
      53  # endif
      54  #endif