URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [libm/] [common/] [s_signbit.c] - Diff between revs 148 and 158

Rev 148	Rev 158
`/* Copyright (C) 2002 by Red Hat, Incorporated. All rights reserved.`	`/* Copyright (C) 2002 by Red Hat, Incorporated. All rights reserved.`
`*`	`*`
`* Permission to use, copy, modify, and distribute this software`	`* Permission to use, copy, modify, and distribute this software`
`* is freely granted, provided that this notice is preserved.`	`* is freely granted, provided that this notice is preserved.`
`*/`	`*/`

`#include "fdlibm.h"`	`#include "fdlibm.h"`

`int __signbitf (float x);`	`int __signbitf (float x);`
`int __signbitd (double x);`	`int __signbitd (double x);`

`int`	`int`
`__signbitf (float x)`	`__signbitf (float x)`
`{`	`{`
`unsigned int w;`	`unsigned int w;`

`GET_FLOAT_WORD(w,x);`	`GET_FLOAT_WORD(w,x);`

`return (w & 0x80000000);`	`return (w & 0x80000000);`
`}`	`}`

`int`	`int`
`__signbitd (double x)`	`__signbitd (double x)`
`{`	`{`
`unsigned int msw;`	`unsigned int msw;`

`GET_HIGH_WORD(msw, x);`	`GET_HIGH_WORD(msw, x);`

`return (msw & 0x80000000);`	`return (msw & 0x80000000);`
`}`	`}`