зеркало из https://github.com/github/ruby.git
20 строки
389 B
C
20 строки
389 B
C
#include <limits.h>
|
|
#include "ruby.h"
|
|
|
|
int
|
|
signbit(double x)
|
|
{
|
|
enum {double_per_long = sizeof(double) / sizeof(long)};
|
|
enum {long_msb = sizeof(long) * CHAR_BIT - 1};
|
|
union {double d; unsigned long i[double_per_long];} u;
|
|
unsigned long l;
|
|
|
|
u.d = x;
|
|
#ifdef WORDS_BIGENDIAN
|
|
l = u.i[0];
|
|
#else
|
|
l = u.i[double_per_long - 1];
|
|
#endif
|
|
return (int)(l >> long_msb);
|
|
}
|