Mercurial > gnulib
view tests/test-copysignl.c @ 17363:5a51fb7777a9
sys_select, sys_time: port 2013-01-30 Solaris 2.6 fix to Cygwin
Problem reported by Marco Atzeri in
<http://lists.gnu.org/archive/html/bug-gnulib/2013-03/msg00000.html>.
* lib/sys_select.in.h [HAVE_SYS_SELECT_H && _CYGWIN_SYS_TIME_H]:
Simply delegate to the system <sys/select.h> in this case too.
Also, pay attention to _GL_SYS_SELECT_H_REDIRECT_FROM_SYS_TIME_H only
if OSF/1, since otherwise Cygwin breaks, and it doesn't seem to
be needed on Solaris either.
* lib/sys_time.in.h [_CYGWIN_SYS_TIME_H]:
Simply delgate to the system <sys/time.h> in this case.
author | Paul Eggert <eggert@cs.ucla.edu> |
---|---|
date | Tue, 19 Mar 2013 09:08:47 -0700 |
parents | e542fd46ad6f |
children | 344018b6e5d7 |
line wrap: on
line source
/* Test of copysignl() function. Copyright (C) 2010-2013 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 <http://www.gnu.org/licenses/>. */ /* Written by Bruno Haible <bruno@clisp.org>, 2010-2011. */ #include <config.h> #include <math.h> #include "signature.h" SIGNATURE_CHECK (copysignl, long double, (long double, long double)); #include "macros.h" #include "minus-zero.h" #include <string.h> volatile long double x; volatile long double y; long double z; long double zero = 0.0L; int main () { /* A particular value in the first quadrant. */ x = 0.6L; y = 0.8L; z = copysignl (x, y); ASSERT (z == 0.6L); /* A particular value in the second quadrant. */ x = -0.6L; y = 0.8L; z = copysignl (x, y); ASSERT (z == 0.6L); /* A particular value in the third quadrant. */ x = -0.6L; y = -0.8L; z = copysignl (x, y); ASSERT (z == -0.6L); /* A particular value in the fourth quadrant. */ x = 0.6L; y = -0.8L; z = copysignl (x, y); ASSERT (z == -0.6L); /* From signed zero. */ x = 1.0L; y = 0.0L; z = copysignl (x, y); ASSERT (z == 1.0L); x = 1.0L; y = minus_zerol; z = copysignl (x, y); /* Assume all gnulib targets support -0.0L, until proven otherwise. */ ASSERT (z == -1.0L); x = -1.0L; y = 0.0L; z = copysignl (x, y); ASSERT (z == 1.0L); x = -1.0L; y = minus_zerol; z = copysignl (x, y); ASSERT (z == -1.0L); /* To signed zero. */ x = 0.0L; y = 1.0L; z = copysignl (x, y); ASSERT (z == 0.0L); ASSERT (memcmp (&z, &zero, sizeof z) == 0); x = 0.0L; y = -1.0L; z = copysignl (x, y); ASSERT (z == 0.0L); ASSERT (memcmp (&z, &zero, sizeof z) != 0); x = minus_zerol; y = 1.0L; z = copysignl (x, y); ASSERT (z == 0.0L); ASSERT (memcmp (&z, &zero, sizeof z) == 0); x = minus_zerol; y = -1.0L; z = copysignl (x, y); ASSERT (z == 0.0L); ASSERT (memcmp (&z, &zero, sizeof z) != 0); return 0; }