1/* { dg-do run } */
2/* { dg-require-effective-target avx } */
3/* { dg-options "-O2 -mavx" } */
4
5#include "avx-check.h"
6
7#ifndef CTRL
8#define CTRL 233
9#endif
10
11#define mask_v(pos) ((CTRL & (0x3 << (pos))) >> (pos))
12
13void static
14avx_test ()
15{
16    union128 u, s;
17    union128i_q ctl;
18    int m[4] = {mask_v(0), mask_v(1), mask_v(2), mask_v(3)};
19    float e[4];
20
21    s.x = _mm_set_ps (1, 2, 3, 4);
22    ctl.x = _mm_loadu_si128((__m128i*) m);
23    u.x = _mm_permutevar_ps(s.x, ctl.x);
24
25    e[0] = s.a[0 + (m[0] & 0x03)];
26    e[1] = s.a[0 + (m[1] & 0x03)];
27    e[2] = s.a[0 + (m[2] & 0x03)];
28    e[3] = s.a[0 + (m[3] & 0x03)];
29
30    if (check_union128 (u, e))
31      abort ();
32}
33
34