URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 149 |
Rev 154 |
/* Test that the initializer of a compound literal is properly walked
|
/* Test that the initializer of a compound literal is properly walked
|
when tree inlining. */
|
when tree inlining. */
|
/* Origin: glibc (as reported in PR c/5105) from <aj@suse.de>. */
|
/* Origin: glibc (as reported in PR c/5105) from <aj@suse.de>. */
|
|
|
inline int
|
inline int
|
finite (double __x)
|
finite (double __x)
|
{
|
{
|
return (__extension__
|
return (__extension__
|
(((((union { double __d; int __i[2]; }) {__d: __x}).__i[1]
|
(((((union { double __d; int __i[2]; }) {__d: __x}).__i[1]
|
| 0x800fffffu) + 1) >> 31));
|
| 0x800fffffu) + 1) >> 31));
|
}
|
}
|
|
|
int
|
int
|
main (void)
|
main (void)
|
{
|
{
|
double x = 1.0;
|
double x = 1.0;
|
|
|
return finite (x);
|
return finite (x);
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.