]> git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/am33/fpu/feupdateenv.c
Replace FSF snail mail address by URL.
[thirdparty/glibc.git] / sysdeps / am33 / fpu / feupdateenv.c
1 /* Install given floating-point environment and raise exceptions.
2 Copyright (C) 1998, 1999, 2000, 2002, 2004 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Alexandre Oliva <aoliva@redhat.com>
5 based on corresponding file in the MIPS port.
6
7 The GNU C Library is free software; you can redistribute it and/or
8 modify it under the terms of the GNU Lesser General Public
9 License as published by the Free Software Foundation; either
10 version 2.1 of the License, or (at your option) any later version.
11
12 The GNU C Library is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 Lesser General Public License for more details.
16
17 You should have received a copy of the GNU Lesser General Public
18 License along with the GNU C Library. If not, see
19 <http://www.gnu.org/licenses/>. */
20
21 #include <fenv.h>
22 #include <fpu_control.h>
23 #include <shlib-compat.h>
24
25 int
26 __feupdateenv (const fenv_t *envp)
27 {
28 int temp;
29
30 /* Save current exceptions. */
31 _FPU_GETCW (temp);
32 temp &= FE_ALL_EXCEPT;
33
34 /* Install new environment. */
35 fesetenv (envp);
36
37 /* Raise the safed exception. Incidently for us the implementation
38 defined format of the values in objects of type fexcept_t is the
39 same as the ones specified using the FE_* constants. */
40 feraiseexcept (temp);
41
42 /* Success. */
43 return 0;
44 }
45
46 versioned_symbol (libm, __feupdateenv, feupdateenv, GLIBC_2_2);