Mercurial > hg > octave-nkf > gnulib-hg

annotate lib/expf.c @ 16040:b8acd8099b25

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New module 'fmaf'. * lib/math.in.h (fmaf): New declaration. * lib/fmaf.c: New file. * m4/fmaf.m4: New file. * m4/math_h.m4 (gl_MATH_H): Test whethern fmaf is declared. (gl_MATH_H_DEFAULTS): Initialize GNULIB_FMAF, HAVE_FMAF, REPLACE_FMAF. * modules/math (Makefile.am): Substitute GNULIB_FMAF, HAVE_FMAF, REPLACE_FMAF. * modules/fmaf: New file. * doc/posix-functions/fmaf.texi: Mention the new module and the various bugs.
author Bruno Haible <bruno@clisp.org>
date Mon, 17 Oct 2011 23:51:21 +0200
parents e6ff40a73d85
children 8250f2777afc
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
15860
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
1 /* Exponential function.
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
2 Copyright (C) 2011 Free Software Foundation, Inc.
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
3
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
4 This program is free software: you can redistribute it and/or modify
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
5 it under the terms of the GNU General Public License as published by
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
6 the Free Software Foundation; either version 3 of the License, or
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
7 (at your option) any later version.
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
8
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
9 This program is distributed in the hope that it will be useful,
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
12 GNU General Public License for more details.
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
13
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
14 You should have received a copy of the GNU General Public License
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
16
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
17 #include <config.h>
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
18
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
19 /* Specification. */
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
20 #include <math.h>
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
21
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
22 float
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
23 expf (float x)
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
24 {
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
25 return (float) exp ((double) x);
e6ff40a73d85 New module 'expf'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
26 }