#include /* Dummy functions for archs lacking fenv implementation */ int feclearexcept(int mask) { return 0; } int feraiseexcept(int mask) { return 0; } int fetestexcept(int mask) { return 0; } int fegetround(void) { return FE_TONEAREST; } int __fesetround(int r) { return 0; } int fegetenv(fenv_t *envp) { return 0; } int fesetenv(const fenv_t *envp) { return 0; } int fesetround(int r) { if (r != FE_TONEAREST #ifdef FE_DOWNWARD && r != FE_DOWNWARD #endif #ifdef FE_UPWARD && r != FE_UPWARD #endif #ifdef FE_TOWARDZERO && r != FE_TOWARDZERO #endif ) return -1; return __fesetround(r); }