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