{
switch (r) {
case RN: return "RN";
+#ifdef FE_TOWARDZERO
case RZ: return "RZ";
+#endif
+#ifdef FE_UPWARD
case RU: return "RU";
+#endif
+#ifdef FE_DOWNWARD
case RD: return "RD";
+#endif
}
return "R?";
}
-
-void setupfenv(int r)
-{
- fesetround(r);
- feclearexcept(FE_ALL_EXCEPT);
-}
-
-int getexcept(void)
-{
- return fetestexcept(INEXACT|INVALID|DIVBYZERO|UNDERFLOW|OVERFLOW);
-}
-