1/* { dg-do compile } */
2/* { dg-options "-O2 -mavx512f" } */
3
4typedef double __m512d __attribute__ ((__vector_size__ (64)));
5
6extern __m512d _ZGVeN8v_func (__m512d);
7
8double
9func_vlen8 (double x)
10{
11  __m512d mx, mr;
12
13  mx[0] = mx[1] = mx[2] = mx[3] = mx[4] = mx[5] = mx[6] = mx[7] = x;
14  mr = _ZGVeN8v_func (mx);
15
16  return (double) mr[0];
17}
18