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
7#include <internal.h>
8
9/* 7.6.2.1
10 The feclearexcept function clears the supported exceptions
11 represented by its argument. */
12
13int feclearexcept(int flags)
14{
15 fenv_t env;
16
17 fegetenv(&env);
18 flags &= FE_ALL_EXCEPT;
19 env._Fe_stat &= ~fenv_encode(flags, flags);
20 return fesetenv(&env);
21}