lib/fenv-except-state-test.c

   1 /* Functions for saving the floating-point exception status flags.
   2    Copyright (C) 1997-2024 Free Software Foundation, Inc.
   3
   4    This file is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU Lesser General Public License as
   6    published by the Free Software Foundation; either version 2.1 of the
   7    License, or (at your option) any later version.
   8
   9    This file is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public License
  15    along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
  16
  17 /* Based on glibc/math/fetestexceptflag.c
  18    together with glibc/sysdeps/<cpu>/{fpu_control.h,fenv_private.h,fenv_libc.h}.  */
  19
  20 #include <config.h>
  21
  22 /* Specification.  */
  23 #include <fenv.h>
  24
  25 #if (defined __x86_64__ || defined _M_X64) || (defined __i386 || defined _M_IX86)
  26
  27 int
  28 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
  29 {
  30   unsigned int flags = (unsigned int) *saved_flags;
  31   return flags & FE_ALL_EXCEPT & exceptions;
  32 }
  33
  34 #elif defined __aarch64__ /* arm64 */
  35
  36 int
  37 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
  38 {
  39   unsigned long flags = (unsigned long) *saved_flags;
  40   return flags & FE_ALL_EXCEPT & exceptions;
  41 }
  42
  43 #elif defined __arm__
  44
  45 int
  46 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
  47 {
  48   unsigned int flags = (unsigned int) *saved_flags;
  49   return flags & FE_ALL_EXCEPT & exceptions;
  50 }
  51
  52 #elif defined __alpha
  53
  54 int
  55 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
  56 {
  57   unsigned long flags = (unsigned long) *saved_flags;
  58   return flags & FE_ALL_EXCEPT & exceptions;
  59 }
  60
  61 #elif defined __hppa
  62
  63 int
  64 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
  65 {
  66   unsigned int flags = (unsigned int) *saved_flags;
  67   return flags & FE_ALL_EXCEPT & exceptions;
  68 }
  69
  70 #elif defined __ia64__
  71
  72 int
  73 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
  74 {
  75   unsigned long flags = (unsigned long) *saved_flags;
  76   return flags & FE_ALL_EXCEPT & exceptions;
  77 }
  78
  79 #elif defined __m68k__
  80
  81 int
  82 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
  83 {
  84   unsigned int flags = (unsigned int) *saved_flags;
  85   return flags & FE_ALL_EXCEPT & exceptions;
  86 }
  87
  88 #elif defined __mips__
  89
  90 int
  91 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
  92 {
  93   unsigned int flags = (unsigned int) *saved_flags;
  94   return flags & FE_ALL_EXCEPT & exceptions;
  95 }
  96
  97 #elif defined __loongarch__
  98
  99 int
 100 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
 101 {
 102   unsigned int flags = (unsigned int) *saved_flags;
 103   return flags & FE_ALL_EXCEPT & exceptions;
 104 }
 105
 106 #elif defined __powerpc__
 107
 108 int
 109 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
 110 {
 111   unsigned int flags = (unsigned int) *saved_flags;
 112   return flags & FE_ALL_EXCEPT & exceptions;
 113 }
 114
 115 #elif defined __riscv
 116
 117 int
 118 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
 119 {
 120   unsigned int flags = (unsigned int) *saved_flags;
 121   return flags & FE_ALL_EXCEPT & exceptions;
 122 }
 123
 124 #elif defined __s390__ || defined __s390x__
 125
 126 int
 127 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
 128 {
 129   unsigned int flags = (unsigned int) *saved_flags;
 130   return flags & FE_ALL_EXCEPT & exceptions;
 131 }
 132
 133 #elif defined __sh__
 134
 135 int
 136 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
 137 {
 138   unsigned int flags = (unsigned int) *saved_flags;
 139   return flags & FE_ALL_EXCEPT & exceptions;
 140 }
 141
 142 #elif defined __sparc
 143
 144 int
 145 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
 146 {
 147   unsigned long flags = (unsigned long) *saved_flags;
 148   return flags & FE_ALL_EXCEPT & exceptions;
 149 }
 150
 151 #else
 152
 153 # if defined __GNUC__ || defined __clang__
 154 #   warning "Unknown CPU / architecture. Please report your platform and compiler to <bug-gnulib@gnu.org>."
 155 #  endif
 156 # define NEED_FALLBACK 1
 157
 158 #endif
 159
 160 #if NEED_FALLBACK
 161
 162 /* A dummy fallback.  */
 163
 164 int
 165 fetestexceptflag (fexcept_t const *saved_flags, int exceptions)
 166 {
 167   return 0;
 168 }
 169
 170 #endif