23 lines
792 B
C
23 lines
792 B
C
|
#include <fenv.h>
|
||
|
|
|
||
|
|
/* 7.6.2.4
|
||
|
|
The fesetexceptflag function sets the complete status for those
|
||
|
|
exception flags indicated by the argument excepts, according to the
|
||
|
|
representation in the object pointed to by flagp. The value of
|
||
|
|
*flagp shall have been set by a previous call to fegetexceptflag
|
||
|
|
whose second argument represented at least those exceptions
|
||
|
|
represented by the argument excepts. This function does not raise
|
||
|
|
exceptions, but only sets the state of the flags. */
|
||
|
|
|
||
|
|
int fesetexceptflag (const fexcept_t * flagp, int excepts)
|
||
|
|
{
|
||
|
|
fenv_t _env;
|
||
|
|
|
||
|
|
excepts &= FE_ALL_EXCEPT;
|
||
|
|
__asm__ volatile ("fnstenv %0;" : "=m" (_env));
|
||
|
|
_env.__status_word &= ~excepts;
|
||
|
|
_env.__status_word |= (*flagp & excepts);
|
||
|
|
__asm__ volatile ("fldenv %0;" : : "m" (_env));
|
||
|
|
return 0;
|
||
|
|
}
|