1  /* Check calling convention in the vector ABI.  */
       2  
       3  /* { dg-do compile { target { s390*-*-* } } } */
       4  /* { dg-options "-O3 -mzarch -march=z13" } */
       5  
       6  /* { dg-final { scan-assembler "gnu_attribute 8, 2" } } */
       7  
       8  typedef double v4df __attribute__((vector_size(32)));
       9  typedef struct { v4df a; } s;
      10  
      11  s
      12  add (v4df a, v4df b, v4df c, v4df d,
      13       v4df e, v4df f, v4df g, v4df h, v4df i)
      14  {
      15    s t;
      16    t.a = a + b + c + d + e + f + g + h + i;
      17    return t;
      18  }