diff options
author | Manuel A. Fernandez Montecelo <manuel.montezelo@gmail.com> | 2016-05-27 14:35:16 +0100 |
---|---|---|
committer | Manuel A. Fernandez Montecelo <manuel.montezelo@gmail.com> | 2016-05-27 14:35:16 +0100 |
commit | 3590c846d4c2febbc05b4ad6b14a06edc549e453 (patch) | |
tree | e5d38581c2f36e1cca02efedd2d85044d77f76f9 /lib/frexpl.c | |
parent | a9a31b1de5776a3b08a82101a4fa711294f0dd1d (diff) |
Imported Upstream version 0.9.6+really0.9.6upstream/0.9.6+really0.9.6
Diffstat (limited to 'lib/frexpl.c')
-rw-r--r-- | lib/frexpl.c | 23 |
1 files changed, 20 insertions, 3 deletions
diff --git a/lib/frexpl.c b/lib/frexpl.c index 9cf9bf6c..88b0dfa7 100644 --- a/lib/frexpl.c +++ b/lib/frexpl.c @@ -1,5 +1,5 @@ /* Split a 'long double' into fraction and mantissa. - Copyright (C) 2007, 2009, 2010 Free Software Foundation, Inc. + Copyright (C) 2007, 2009-2015 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by @@ -14,5 +14,22 @@ You should have received a copy of the GNU Lesser General Public License along with this program. If not, see <http://www.gnu.org/licenses/>. */ -#define USE_LONG_DOUBLE -#include "frexp.c" +#include <config.h> + +#if HAVE_SAME_LONG_DOUBLE_AS_DOUBLE + +/* Specification. */ +# include <math.h> + +long double +frexpl (long double x, int *expptr) +{ + return frexp (x, expptr); +} + +#else + +# define USE_LONG_DOUBLE +# include "frexp.c" + +#endif |