| /* Inline floating-point environment handling functions for powerpc. |
| Copyright (C) 1995-2018 Free Software Foundation, Inc. |
| This file is part of the GNU C Library. |
| |
| The GNU C Library is free software; you can redistribute it and/or |
| modify it under the terms of the GNU Lesser General Public |
| License as published by the Free Software Foundation; either |
| version 2.1 of the License, or (at your option) any later version. |
| |
| The GNU C Library is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| Lesser General Public License for more details. |
| |
| You should have received a copy of the GNU Lesser General Public |
| License along with the GNU C Library; if not, see |
| <http://www.gnu.org/licenses/>. */ |
| |
| #if defined __GNUC__ && !defined _SOFT_FLOAT && !defined __NO_FPRS__ |
| |
| /* Inline definition for fegetround. */ |
| # define __fegetround() \ |
| (__extension__ ({ int __fegetround_result; \ |
| __asm__ __volatile__ \ |
| ("mcrfs 7,7 ; mfcr %0" \ |
| : "=r"(__fegetround_result) : : "cr7"); \ |
| __fegetround_result & 3; })) |
| # define fegetround() __fegetround () |
| |
| # ifndef __NO_MATH_INLINES |
| /* The weird 'i#*X' constraints on the following suppress a gcc |
| warning when __excepts is not a constant. Otherwise, they mean the |
| same as just plain 'i'. */ |
| |
| # if __GNUC_PREREQ(3, 4) |
| |
| /* Inline definition for feraiseexcept. */ |
| # define feraiseexcept(__excepts) \ |
| (__extension__ ({ \ |
| int __e = __excepts; \ |
| int __ret; \ |
| if (__builtin_constant_p (__e) \ |
| && (__e & (__e - 1)) == 0 \ |
| && __e != FE_INVALID) \ |
| { \ |
| if (__e != 0) \ |
| __asm__ __volatile__ ("mtfsb1 %0" \ |
| : : "i#*X" (__builtin_clz (__e))); \ |
| __ret = 0; \ |
| } \ |
| else \ |
| __ret = feraiseexcept (__e); \ |
| __ret; \ |
| })) |
| |
| /* Inline definition for feclearexcept. */ |
| # define feclearexcept(__excepts) \ |
| (__extension__ ({ \ |
| int __e = __excepts; \ |
| int __ret; \ |
| if (__builtin_constant_p (__e) \ |
| && (__e & (__e - 1)) == 0 \ |
| && __e != FE_INVALID) \ |
| { \ |
| if (__e != 0) \ |
| __asm__ __volatile__ ("mtfsb0 %0" \ |
| : : "i#*X" (__builtin_clz (__e))); \ |
| __ret = 0; \ |
| } \ |
| else \ |
| __ret = feclearexcept (__e); \ |
| __ret; \ |
| })) |
| |
| # endif /* __GNUC_PREREQ(3, 4). */ |
| |
| # endif /* !__NO_MATH_INLINES. */ |
| |
| #endif /* __GNUC__ && !_SOFT_FLOAT && !__NO_FPRS__ */ |