1 /* Install given floating-point environment and raise exceptions.
2 Copyright (C) 1997,99,2000,01,07,2010,2012 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
23 #include <dl-procinfo.h>
27 __feupdateenv (const fenv_t
*envp
)
30 unsigned int xtemp
= 0;
32 /* Save current exceptions. */
33 __asm__ ("fnstsw %0" : "=m" (*&temp
));
35 /* If the CPU supports SSE we test the MXCSR as well. */
36 if ((GLRO(dl_hwcap
) & HWCAP_I386_XMM
) != 0)
37 __asm__ ("stmxcsr %0" : "=m" (*&xtemp
));
39 temp
= (temp
| xtemp
) & FE_ALL_EXCEPT
;
41 /* Install new environment. */
44 /* Raise the saved exception. Incidently for us the implementation
45 defined format of the values in objects of type fexcept_t is the
46 same as the ones specified using the FE_* constants. */
47 __feraiseexcept ((int) temp
);
53 #include <shlib-compat.h>
54 #if SHLIB_COMPAT (libm, GLIBC_2_1, GLIBC_2_2)
55 strong_alias (__feupdateenv
, __old_feupdateenv
)
56 compat_symbol (libm
, BP_SYM (__old_feupdateenv
), BP_SYM (feupdateenv
), GLIBC_2_1
);
59 libm_hidden_ver (__feupdateenv
, feupdateenv
)
60 versioned_symbol (libm
, BP_SYM (__feupdateenv
), BP_SYM (feupdateenv
), GLIBC_2_2
);