| 1 | /** |
| 2 | * This file has no copyright assigned and is placed in the Public Domain. |
| 3 | * This file is part of the mingw-w64 runtime package. |
| 4 | * No warranty is given; refer to the file DISCLAIMER.PD within this package. |
| 5 | */ |
| 6 | #include <fenv.h> |
| 7 | |
| 8 | /* 7.6.4.2 |
| 9 | The feholdexcept function saves the current floating-point |
| 10 | environment in the object pointed to by envp, clears the exception |
| 11 | flags, and then installs a non-stop (continue on exceptions) mode, |
| 12 | if available, for all exceptions. */ |
| 13 | |
| 14 | int feholdexcept(fenv_t *env) |
| 15 | { |
| 16 | fegetenv(env); |
| 17 | return feclearexcept(FE_ALL_EXCEPT); |
| 18 | } |