1*5af32e75SAxel Dörfler /* Copyright (C) 1996, 1997 Free Software Foundation, Inc. 2*5af32e75SAxel Dörfler This file is part of the GNU C Library. 3*5af32e75SAxel Dörfler Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, 1996. 4*5af32e75SAxel Dörfler 5*5af32e75SAxel Dörfler The GNU C Library is free software; you can redistribute it and/or 6*5af32e75SAxel Dörfler modify it under the terms of the GNU Lesser General Public 7*5af32e75SAxel Dörfler License as published by the Free Software Foundation; either 8*5af32e75SAxel Dörfler version 2.1 of the License, or (at your option) any later version. 9*5af32e75SAxel Dörfler 10*5af32e75SAxel Dörfler The GNU C Library is distributed in the hope that it will be useful, 11*5af32e75SAxel Dörfler but WITHOUT ANY WARRANTY; without even the implied warranty of 12*5af32e75SAxel Dörfler MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 13*5af32e75SAxel Dörfler Lesser General Public License for more details. 14*5af32e75SAxel Dörfler 15*5af32e75SAxel Dörfler You should have received a copy of the GNU Lesser General Public 16*5af32e75SAxel Dörfler License along with the GNU C Library; if not, write to the Free 17*5af32e75SAxel Dörfler Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 18*5af32e75SAxel Dörfler 02111-1307 USA. */ 19*5af32e75SAxel Dörfler 20*5af32e75SAxel Dörfler 21*5af32e75SAxel Dörfler /* The actual implementation for all floating point sizes is in strtod.c. 22*5af32e75SAxel Dörfler These macros tell it to produce the `float' version, `wcstof'. */ 23*5af32e75SAxel Dörfler 24*5af32e75SAxel Dörfler #define FLOAT float 25*5af32e75SAxel Dörfler #define FLT FLT 26*5af32e75SAxel Dörfler #ifdef USE_IN_EXTENDED_LOCALE_MODEL 27*5af32e75SAxel Dörfler # define STRTOF __wcstof_l 28*5af32e75SAxel Dörfler #else 29*5af32e75SAxel Dörfler # define STRTOF wcstof 30*5af32e75SAxel Dörfler #endif 31*5af32e75SAxel Dörfler #define MPN2FLOAT __mpn_construct_float 32*5af32e75SAxel Dörfler #define FLOAT_HUGE_VAL HUGE_VALF 33*5af32e75SAxel Dörfler #define USE_WIDE_CHAR 1 34*5af32e75SAxel Dörfler #define SET_MANTISSA(flt, mant) \ 35*5af32e75SAxel Dörfler do { union ieee754_float u; \ 36*5af32e75SAxel Dörfler u.f = (flt); \ 37*5af32e75SAxel Dörfler if ((mant & 0x7fffff) == 0) \ 38*5af32e75SAxel Dörfler mant = 0x400000; \ 39*5af32e75SAxel Dörfler u.ieee.mantissa = (mant) & 0x7fffff; \ 40*5af32e75SAxel Dörfler (flt) = u.f; \ 41*5af32e75SAxel Dörfler } while (0) 42*5af32e75SAxel Dörfler 43*5af32e75SAxel Dörfler #include <stdlib/strtod.c> 44