(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.target/
s390/
vector/
long-double-wfsxb-1.c
       1  /* { dg-do compile } */
       2  /* { dg-options "-O3 -march=z14 -mzarch" } */
       3  /* { dg-do run { target { s390_z14_hw } } } */
       4  #include <assert.h>
       5  
       6  typedef float tf __attribute__ ((mode (TF)));
       7  static tf x;
       8  static tf y;
       9  
      10  __attribute__ ((noipa)) static tf
      11  sub (void)
      12  {
      13    return x - y;
      14  }
      15  
      16  int
      17  main (void)
      18  {
      19    x = 1.5L;
      20    y = 2.5L;
      21    assert (sub () == -1.0L);
      22  }