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
14int feholdexcept(fenv_t *env)
15{
16    fegetenv(env);
17    return feclearexcept(FE_ALL_EXCEPT);
18}