1  /* Check calling convention in the vector ABI.  */
       2  
       3  /* { dg-do compile { target { s390*-*-* } } } */
       4  /* { dg-options "-O3 -mzarch -march=z13 -mno-vx" } */
       5  
       6  /* The function passes arguments whose calling conventions change with
       7     -mvx/-mno-vx.  In that case GCC has to emit the ABI attribute to
       8     allow GDB and Binutils to detect this.  */
       9  /* { dg-final { scan-assembler "gnu_attribute 8, 1" } } */
      10  
      11  typedef double v2df __attribute__((vector_size(16)));
      12  
      13  v2df
      14  add (v2df a, v2df b, v2df c, v2df d,
      15       v2df e, v2df f, v2df g, v2df h, v2df i)
      16  {
      17    return a + b + c + d + e + f + g + h + i;
      18  }