(root)/
glibc-2.38/
math/
test-fpucw.c
       1  /* Copyright (C) 2000-2023 Free Software Foundation, Inc.
       2     This file is part of the GNU C Library.
       3  
       4     The GNU C Library is free software; you can redistribute it and/or
       5     modify it under the terms of the GNU Lesser General Public
       6     License as published by the Free Software Foundation; either
       7     version 2.1 of the License, or (at your option) any later version.
       8  
       9     The GNU C Library 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 GNU
      12     Lesser General Public License for more details.
      13  
      14     You should have received a copy of the GNU Lesser General Public
      15     License along with the GNU C Library; if not, see
      16     <https://www.gnu.org/licenses/>.  */
      17  
      18  #include <fpu_control.h>
      19  #include <stdio.h>
      20  
      21  #ifndef FPU_CONTROL
      22  # define FPU_CONTROL _FPU_DEFAULT
      23  #endif
      24  
      25  static int
      26  do_test (void)
      27  {
      28  #ifdef _FPU_GETCW
      29  /* Some architectures don't have _FPU_GETCW (e.g. Linux/Alpha).  */
      30    fpu_control_t cw;
      31  
      32    _FPU_GETCW (cw);
      33  
      34    cw &= ~_FPU_RESERVED;
      35  
      36    if (cw != (FPU_CONTROL & ~_FPU_RESERVED))
      37      printf ("control word is 0x%lx but should be 0x%lx.\n",
      38  	    (long int) cw, (long int) (FPU_CONTROL & ~_FPU_RESERVED));
      39  
      40    return cw != (FPU_CONTROL & ~_FPU_RESERVED);
      41  
      42  #else
      43    return 0;
      44  #endif
      45  }
      46  
      47  #define TEST_FUNCTION do_test ()
      48  #include "../test-skeleton.c"