Mercurial > hg > CbC > CbC_gcc

annotate gcc/testsuite/gcc.dg/vmx/insert-vsx.c @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* { dg-skip-if "" { powerpc*-*-darwin* } } */
kono
parents:
diff changeset
2 /* { dg-require-effective-target powerpc_vsx_ok } */
kono
parents:
diff changeset
3 /* { dg-options "-maltivec -mabi=altivec -std=gnu99 -mvsx" } */
kono
parents:
diff changeset
4
kono
parents:
diff changeset
5 #include "harness.h"
kono
parents:
diff changeset
6
kono
parents:
diff changeset
7 static int vec_long_long_eq (vector long long x, vector long long y)
kono
parents:
diff changeset
8 {
kono
parents:
diff changeset
9 return (x[0] == y[0] && x[1] == y[1]);
kono
parents:
diff changeset
10 }
kono
parents:
diff changeset
11
kono
parents:
diff changeset
12 static int vec_dbl_eq (vector double x, vector double y)
kono
parents:
diff changeset
13 {
kono
parents:
diff changeset
14 return (x[0] == y[0] && x[1] == y[1]);
kono
parents:
diff changeset
15 }
kono
parents:
diff changeset
16
kono
parents:
diff changeset
17 static void test()
kono
parents:
diff changeset
18 {
kono
parents:
diff changeset
19 vector long long vl = {0, 1};
kono
parents:
diff changeset
20 vector double vd = {0.0, 1.0};
kono
parents:
diff changeset
21 vector long long vlr = vec_insert (2, vl, 0);
kono
parents:
diff changeset
22 vector double vdr = vec_insert (2.0, vd, 1);
kono
parents:
diff changeset
23 vector long long vler = {2, 1};
kono
parents:
diff changeset
24 vector double vder = {0.0, 2.0};
kono
parents:
diff changeset
25
kono
parents:
diff changeset
26 check (vec_long_long_eq (vlr, vler), "vl");
kono
parents:
diff changeset
27 check (vec_dbl_eq (vdr, vder), "vd");
kono
parents:
diff changeset
28 }