1 /* { dg-do compile } */
2 /* { dg-options "-O2 -mavx512f" } */
3 
4 typedef double __m512d __attribute__ ((__vector_size__ (64)));
5 
6 extern __m512d _ZGVeN8v_func (__m512d);
7 
8 double
func_vlen8(double x)9 func_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