/* { dg-do run } */
/* { dg-require-effective-target p8vector_hw } */
/* { dg-options "-mdejagnu-cpu=power8 " } */

#include <altivec.h>

#ifdef DEBUG 
#include <stdio.h>
#endif

void abort (void);

int main ()
{
  vector int inta = {27, -1, 4, 9};
  vector unsigned int uinta = {9, 0, 7, 222};

  vector long long sa = {27L, -14L};
  vector long long sb = {-9L, -2L};

  vector unsigned long long ua = {27L, 14L};
  vector unsigned long long ub = {9L, 2L};

  vector long long sc = vec_div (sa, sb);
  vector unsigned long long uc = vec_div (ua, ub);

  if (sc[0] != -3L || sc[1] != 7L || uc[0] != 3L || uc[1] != 7L)
    abort ();

  vector long long sd = vec_mul (sa, sb);
  vector unsigned long long ud = vec_mul (ua, ub);

  if (sd[0] != -243L || sd[1] != 28L || ud[0] != 243L || ud[1] != 28L)
    abort ();

  vector long long se = vec_splat (sa, 0);
  vector long long sf = vec_splat (sa, 1);
  vector unsigned long long ue = vec_splat (ua, 0);
  vector unsigned long long uf = vec_splat (ua, 1);

  if (se[0] != 27L || se[1] != 27L || sf[0] != -14L || sf[1] != -14L
      || ue[0] != 27L || ue[1] != 27L || uf[0] != 14L || uf[1] != 14L)
    abort ();

  vector double da = vec_ctf (sa, 2);
  vector double db = vec_ctf (ua, 2);
  vector long long sg = vec_cts (da, 2);
  vector unsigned long long ug = vec_ctu (db, 2);

  if (da[0] != 6.75 || da[1] != -3.5 || db[0] != 6.75 || db[1] != 3.5
      || sg[0] != 27L || sg[1] != -14L || ug[0] != 27L || ug[1] != 14L)
    abort ();

  vector float fa = vec_ctf (inta, 5);
  if (fa[0] != 0.843750 || fa[1] != -0.031250 || fa[2] != 0.125000 || fa[3] != 0.281250)
#ifdef DEBUG
    printf("fa[0] = %f, fa[1] = %f, fa[2] = %f, fa[3] = %f\n",
           fa[0], fa[1], fa[2], fa[3]);
#else  
    abort ();
#endif

  vector int sa2 = vec_cts (fa, 5);
  if (sa2[0] != 27 || sa2[1] != -1 || sa2[2] != 4 || sa2[3] != 9)
#ifdef DEBUG
    printf("sa2[0] = %d, sa2[1] = %d, sa2[2] = %d, sa2[3] = %d\n",
           sa2[0], sa2[1], sa2[2], sa2[3]);
#else  
    abort ();
#endif
     
  vector float fb = vec_ctf (uinta, 2);

  if (fb[0] != 2.250000 || fb[1] != 0.0 || fb[2] != 1.750000 || fb[3] != 55.500000)
#ifdef DEBUG
    printf("fb[0] = %f, fb[1] = %f, fb[2] = %f, fb[3] = %f\n",
		 fb[0], fb[1], fb[2], fb[3]);
#else  
    abort ();
#endif

  vector unsigned int ua2 = vec_ctu (fb, 2);
  if (ua2[0] != 9 || ua2[1] != 0 || ua2[2] != 7 || ua2[3] != 222)
#ifdef DEBUG
    printf("ua2[0] = %d, ua2[1] = %d, ua2[2] = %d, ua2[3] = %d\n",
           ua2[0], ua2[1], ua2[2], ua2[3]);
#else  
    abort ();
#endif
     
  return 0;
}