1*03a78d15Sespie /* Return nonzero value if number is negative. */
2*03a78d15Sespie
3*03a78d15Sespie /* Copyright (C) 1997, 1998, 1999 Free Software Foundation, Inc.
4*03a78d15Sespie
5*03a78d15Sespie This file is part of the GNU ISO C++ Library. This library is free
6*03a78d15Sespie software; you can redistribute it and/or modify it under the
7*03a78d15Sespie terms of the GNU General Public License as published by the
8*03a78d15Sespie Free Software Foundation; either version 2, or (at your option)
9*03a78d15Sespie any later version.
10*03a78d15Sespie
11*03a78d15Sespie This library is distributed in the hope that it will be useful,
12*03a78d15Sespie but WITHOUT ANY WARRANTY; without even the implied warranty of
13*03a78d15Sespie MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14*03a78d15Sespie GNU General Public License for more details.
15*03a78d15Sespie
16*03a78d15Sespie You should have received a copy of the GNU General Public License along
17*03a78d15Sespie with this library; see the file COPYING. If not, write to the Free
18*03a78d15Sespie Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
19*03a78d15Sespie USA.
20*03a78d15Sespie
21*03a78d15Sespie As a special exception, you may use this file as part of a free software
22*03a78d15Sespie library without restriction. Specifically, if other files instantiate
23*03a78d15Sespie templates or use macros or inline functions from this file, or you compile
24*03a78d15Sespie this file and link it with other files to produce an executable, this
25*03a78d15Sespie file does not by itself cause the resulting executable to be covered by
26*03a78d15Sespie the GNU General Public License. This exception does not however
27*03a78d15Sespie invalidate any other reasons why the executable file might be covered by
28*03a78d15Sespie the GNU General Public License. */
29*03a78d15Sespie
30*03a78d15Sespie
31*03a78d15Sespie #include <math.h>
32*03a78d15Sespie #include "mathconf.h"
33*03a78d15Sespie
34*03a78d15Sespie int
__signbit(double x)35*03a78d15Sespie __signbit (double x)
36*03a78d15Sespie {
37*03a78d15Sespie Int32_t hx;
38*03a78d15Sespie
39*03a78d15Sespie GET_HIGH_WORD (hx, x);
40*03a78d15Sespie return hx & 0x80000000;
41*03a78d15Sespie }
42