l4/pkg/uclibc/lib/contrib/uclibc/libc/sysdeps/linux/x86_64/bits/mathinline.h

   1 /* Inline math functions for x86-64.
   2    Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4    Contributed by Andreas Jaeger <aj@suse.de>, 2002.
   5
   6    The GNU C Library is free software; you can redistribute it and/or
   7    modify it under the terms of the GNU Lesser General Public
   8    License as published by the Free Software Foundation; either
   9    version 2.1 of the License, or (at your option) any later version.
  10
  11    The GNU C Library is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14    Lesser General Public License for more details.
  15
  16    You should have received a copy of the GNU Lesser General Public
  17    License along with the GNU C Library; if not, see
  18    <http://www.gnu.org/licenses/>.  */
  19
  20 #ifndef _MATH_H
  21 # error "Never use <bits/mathinline.h> directly; include <math.h> instead."
  22 #endif
  23
  24 #ifdef __cplusplus
  25 # define __MATH_INLINE __inline
  26 #else
  27 # define __MATH_INLINE extern __inline
  28 #endif
  29
  30
  31 #if defined __USE_ISOC99 && defined __GNUC__ && __GNUC__ >= 2
  32
  33 /* Test for negative number.  Used in the signbit() macro.  */
  34 __MATH_INLINE int
  35 __NTH (__signbitf (float __x))
  36 {
  37   __extension__ union { float __f; int __i; } __u = { __f: __x };
  38   return __u.__i < 0;
  39 }
  40 __MATH_INLINE int
  41 __NTH (__signbit (double __x))
  42 {
  43   __extension__ union { double __d; int __i[2]; } __u = { __d: __x };
  44   return __u.__i[1] < 0;
  45 }
  46 __MATH_INLINE int
  47 __NTH (__signbitl (long double __x))
  48 {
  49   __extension__ union { long double __l; int __i[3]; } __u = { __l: __x };
  50   return (__u.__i[2] & 0x8000) != 0;
  51 }
  52 #endif