1 /* { dg-skip-if "" { powerpc*-*-darwin* } } */
2 /* { dg-require-effective-target powerpc_vsx_ok } */
3 /* { dg-options "-maltivec -mabi=altivec -std=gnu99 -mvsx" } */
4
5 #include "harness.h"
6
vec_long_long_eq(vector long long x,vector long long y)7 static int vec_long_long_eq (vector long long x, vector long long y)
8 {
9 return (x[0] == y[0] && x[1] == y[1]);
10 }
11
vec_dbl_eq(vector double x,vector double y)12 static int vec_dbl_eq (vector double x, vector double y)
13 {
14 return (x[0] == y[0] && x[1] == y[1]);
15 }
16
test()17 static void test()
18 {
19 vector long long vl = {0, 1};
20 vector double vd = {0.0, 1.0};
21 vector long long vlr = vec_insert (2, vl, 0);
22 vector double vdr = vec_insert (2.0, vd, 1);
23 vector long long vler = {2, 1};
24 vector double vder = {0.0, 2.0};
25
26 check (vec_long_long_eq (vlr, vler), "vl");
27 check (vec_dbl_eq (vdr, vder), "vd");
28 }
29