From: Bruno Haible Date: Sat, 8 Oct 2011 21:17:02 +0000 (+0200) Subject: Tests for module 'tanf'. X-Git-Tag: v0.1~1647 X-Git-Url: http://erislabs.org.uk/gitweb/?a=commitdiff_plain;h=3a26f6a2c6ec11b42f02aa8040fe56f4637cb5a5;p=gnulib.git Tests for module 'tanf'. * modules/tanf-tests: New file. * tests/test-tanf.c: New file. --- diff --git a/ChangeLog b/ChangeLog index 38d0245fa..a9728c3bb 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,9 @@ 2011-10-08 Bruno Haible + Tests for module 'tanf'. + * modules/tanf-tests: New file. + * tests/test-tanf.c: New file. + New module 'tanf'. * lib/math.in.h (tanf): New declaration. * lib/tanf.c: New file. diff --git a/modules/tanf-tests b/modules/tanf-tests new file mode 100644 index 000000000..f65fb2b4e --- /dev/null +++ b/modules/tanf-tests @@ -0,0 +1,13 @@ +Files: +tests/test-tanf.c +tests/signature.h +tests/macros.h + +Depends-on: + +configure.ac: + +Makefile.am: +TESTS += test-tanf +check_PROGRAMS += test-tanf +test_tanf_LDADD = $(LDADD) @TANF_LIBM@ diff --git a/tests/test-tanf.c b/tests/test-tanf.c new file mode 100644 index 000000000..4539fb54c --- /dev/null +++ b/tests/test-tanf.c @@ -0,0 +1,40 @@ +/* Test of tanf() function. + Copyright (C) 2010-2011 Free Software Foundation, Inc. + + This program is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program. If not, see . */ + +/* Written by Bruno Haible , 2010-2011. */ + +#include + +#include + +#include "signature.h" +SIGNATURE_CHECK (tanf, float, (float)); + +#include "macros.h" + +volatile float x; +float y; + +int +main () +{ + /* A particular value. */ + x = 0.6f; + y = tanf (x); + ASSERT (y >= 0.6841368f && y <= 0.6841369f); + + return 0; +}