#include /* 7.6.4.3 The fesetenv function establishes the floating-point environment represented by the object pointed to by envp. The argument envp points to an object set by a call to fegetenv or feholdexcept, or equal the macro FE_DFL_ENV or an implementation-defined environment macro. Note that fesetenv merely installs the state of the exception flags represented through its argument, and does not raise these exceptions. */ extern void (*_imp___fpreset)( void ) ; int fesetenv (const fenv_t * envp) { if (envp == FE_PC64_ENV) /* * fninit initializes the control register to 0x37f, * the status register to zero and the tag word to 0FFFFh. * The other registers are unaffected. */ __asm__ ("fninit"); else if (envp == FE_PC53_ENV) /* * MS _fpreset() does same *except* it sets control word * to 0x27f (53-bit precison). * We force calling _fpreset in msvcrt.dll */ (*_imp___fpreset)(); else if (envp == FE_DFL_ENV) /* Use the choice made at app startup */ _fpreset(); else __asm__ ("fldenv %0;" : : "m" (*envp)); return 0; }