12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879 |
- #include <fenv.h>
- #include <assert.h>
- libm_hidden_proto(fesetenv)
- int
- fesetenv (const fenv_t *envp)
- {
- fenv_t temp;
-
- assert (sizeof (fenv_t) == 28);
-
- __asm__ ("fnstenv %0" : "=m" (*&temp));
- if (envp == FE_DFL_ENV)
- {
- temp.__control_word |= FE_ALL_EXCEPT;
- temp.__control_word &= ~FE_TOWARDZERO;
- temp.__status_word &= ~FE_ALL_EXCEPT;
- temp.__eip = 0;
- temp.__cs_selector = 0;
- temp.__opcode = 0;
- temp.__data_offset = 0;
- temp.__data_selector = 0;
- }
- else if (envp == FE_NOMASK_ENV)
- {
- temp.__control_word &= ~(FE_ALL_EXCEPT | FE_TOWARDZERO);
- temp.__status_word &= ~FE_ALL_EXCEPT;
- temp.__eip = 0;
- temp.__cs_selector = 0;
- temp.__opcode = 0;
- temp.__data_offset = 0;
- temp.__data_selector = 0;
- }
- else
- {
- temp.__control_word &= ~(FE_ALL_EXCEPT | FE_TOWARDZERO);
- temp.__control_word |= (envp->__control_word
- & (FE_ALL_EXCEPT | FE_TOWARDZERO));
- temp.__status_word &= ~FE_ALL_EXCEPT;
- temp.__status_word |= envp->__status_word & FE_ALL_EXCEPT;
- temp.__eip = envp->__eip;
- temp.__cs_selector = envp->__cs_selector;
- temp.__opcode = envp->__opcode;
- temp.__data_offset = envp->__data_offset;
- temp.__data_selector = envp->__data_selector;
- }
- __asm__ ("fldenv %0" : : "m" (temp));
-
- return 0;
- }
- libm_hidden_def(fesetenv)
|