2002-06-13 18:20:48 +08:00
|
|
|
#include <fenv.h>
|
|
|
|
|
|
|
|
/* 7.6.2.3
|
|
|
|
The feraiseexcept function raises the supported exceptions
|
|
|
|
represented by its argument The order in which these exceptions
|
|
|
|
are raised is unspecified, except as stated in F.7.6.
|
|
|
|
Whether the feraiseexcept function additionally raises
|
|
|
|
the inexact exception whenever it raises the overflow
|
|
|
|
or underflow exception is implementation-defined. */
|
|
|
|
|
2005-08-25 10:35:34 +08:00
|
|
|
void feraiseexcept (int excepts)
|
2002-06-13 18:20:48 +08:00
|
|
|
{
|
|
|
|
fenv_t _env;
|
|
|
|
__asm__ volatile ("fnstenv %0;" : "=m" (_env));
|
|
|
|
_env.__status_word |= excepts & FE_ALL_EXCEPT;
|
|
|
|
__asm__ volatile ("fldenv %0;"
|
|
|
|
"fwait;" : : "m" (_env));
|
|
|
|
}
|