URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.target/] [i386/] [avx-vblendpd-256-1.c] - Blame information for rev 318

Line No.	Rev	Author	Line
1	318	jeremybenn	`/* { dg-do run } */`
2			`/* { dg-require-effective-target avx } */`
3			`/* { dg-options "-O2 -mavx" } */`
4
5			`#include "avx-check.h"`
6
7			`#ifndef MASK`
8			`#define MASK 12`
9			`#endif`
10
11			`void static`
12			`avx_test (void)`
13			`{`
14			`int i;`
15			`union256d u, s1, s2;`
16			`double e [4];`
17
18			`s1.x = _mm256_set_pd (34545, 95567, 23443, 5675);`
19			`s2.x = _mm256_set_pd (674, 57897, 93459, 45624);`
20			`u.x = _mm256_blend_pd (s1.x, s2.x, MASK);`
21
22			`for (i = 0; i < 4; i++)`
23			`e[i] = (MASK & (0x01 << i)) ? s2.a[i] : s1.a[i];`
24
25			`if (check_union256d (u, e))`
26			`abort ();`
27			`}`