gnulib: lib/log10f.c annotate

annotate lib/log10f.c @ 40231:9b3c79fdfe0b

strtod: fix clash with strtold Problem reported for RHEL 5 by Jesse Caldwell (Bug#34817). * lib/strtod.c (compute_minus_zero, minus_zero): Simplify by remving the macro / external variable, and having just a function. User changed. This avoids the need for an external variable that might clash.

author	Paul Eggert <eggert@cs.ucla.edu>
date	Mon, 11 Mar 2019 16:40:29 -0700
parents	b06060465f09
children

rev	line source
15866 215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	1 /* Base 10 logarithmic function.
40057 b06060465f09 maint: Run 'make update-copyright' Paul Eggert <eggert@cs.ucla.edu> parents: 19484 diff changeset	2 Copyright (C) 2011-2019 Free Software Foundation, Inc.
15866 215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	3
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	4 This program is free software: you can redistribute it and/or modify
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	5 it under the terms of the GNU General Public License as published by
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	6 the Free Software Foundation; either version 3 of the License, or
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	7 (at your option) any later version.
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	8
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	9 This program is distributed in the hope that it will be useful,
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	10 but WITHOUT ANY WARRANTY; without even the implied warranty of
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	12 GNU General Public License for more details.
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	13
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	14 You should have received a copy of the GNU General Public License
19190 9759915b2aca all: prefer https: URLs Paul Eggert <eggert@cs.ucla.edu> parents: 18626 diff changeset	15 along with this program. If not, see <https://www.gnu.org/licenses/>. */
15866 215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	16
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	17 #include <config.h>
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	18
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	19 /* Specification. */
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	20 #include <math.h>
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	21
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	22 float
215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	23 log10f (float x)
16737 6828b991e3b9 log10f: Work around OSF/1 5.1 bug. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	24 #undef log10f
15866 215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	25 {
16737 6828b991e3b9 log10f: Work around OSF/1 5.1 bug. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	26 #if HAVE_LOG10F
16747 676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	27 if (x <= 0.0f)
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	28 {
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	29 /* Work around the OSF/1 5.1 bug. */
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	30 if (x == 0.0f)
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	31 /* Return -Infinity. */
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	32 return -1.0f / 0.0f;
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	33 /* Work around the NetBSD 5.1 bug. */
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	34 else /* x < 0.0 */
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	35 /* Return NaN. */
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	36 return 0.0f / 0.0f;
676471a1cb33 log10f-ieee: Work around test failure on NetBSD 5.1. Bruno Haible <bruno@clisp.org> parents: 16737 diff changeset	37 }
16737 6828b991e3b9 log10f: Work around OSF/1 5.1 bug. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	38 return log10f (x);
6828b991e3b9 log10f: Work around OSF/1 5.1 bug. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	39 #else
15866 215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	40 return (float) log10 ((double) x);
16737 6828b991e3b9 log10f: Work around OSF/1 5.1 bug. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	41 #endif
15866 215da3b412e0 New module 'log10f'. Bruno Haible <bruno@clisp.org> parents: diff changeset	42 }

Mercurial > gnulib

annotate lib/log10f.c @ 40231:9b3c79fdfe0b