gcc/testsuite/gcc.target/powerpc/builtins-3-p8.c

   1 /* { dg-do compile } */
   2 /* { dg-require-effective-target powerpc_p8vector_ok } */
   3 /* { dg-options "-mcpu=power8" } */
   4
   5 #include <altivec.h>
   6
   7 vector bool long long
   8 test_eq_long_long (vector bool long long x, vector bool long long y)
   9 {
  10         return vec_cmpeq (x, y);
  11 }
  12
  13 vector float
  14 test_pack_float (vector double x, vector double y)
  15 {
  16   return vec_pack (x, y);
  17 }
  18
  19 vector signed int
  20 test_vsi_packs_vsll_vsll (vector signed long long x,
  21                           vector signed long long y)
  22 {
  23   return vec_packs (x, y);
  24 }
  25
  26 vector unsigned int
  27 test_vui_packs_vull_vull (vector unsigned long long x,
  28                           vector unsigned long long y)
  29 {
  30   return vec_packs (x, y);
  31 }
  32
  33 vector unsigned char
  34 test_unsigned_char_popcnt_signed_char (vector signed char x)
  35 {
  36         return vec_popcnt (x);
  37 }
  38
  39 vector unsigned char
  40 test_unsigned_char_popcnt_unsigned_char (vector unsigned char x)
  41 {
  42         return vec_popcnt (x);
  43 }
  44
  45 vector unsigned short
  46 test_unsigned_short_popcnt_signed_short (vector short x)
  47 {
  48         return vec_popcnt (x);
  49 }
  50
  51 vector unsigned short
  52 test_unsigned_short_popcnt_unsigned_short (vector unsigned short x)
  53 {
  54         return vec_popcnt (x);
  55 }
  56
  57 vector unsigned int
  58 test_unsigned_int_popcnt_signed_int (vector int x)
  59 {
  60         return vec_popcnt (x);
  61 }
  62
  63 vector unsigned int
  64 test_unsigned_int_popcnt_unsigned_int (vector unsigned x)
  65 {
  66    return vec_popcnt (x);
  67 }
  68
  69 vector unsigned long long
  70 test_unsigned_long_lont_popcnt_signed_long (vector long long x)
  71 {
  72         return vec_popcnt (x);
  73 }
  74
  75 vector unsigned long long
  76 test_unsigned_long_long_popcnt_unsigned_long (vector unsigned long long x)
  77 {
  78         return vec_popcnt (x);
  79 }
  80
  81 vector signed short
  82 test_vss_mradds_vss_vss (vector signed short x, vector signed short y,
  83                          vector signed short z)
  84 {
  85         return vec_mradds (x, y, z);
  86 }
  87
  88 vector signed long long
  89 test_vsll_mule_vsi_vsi (vector signed int x, vector signed int y)
  90 {
  91         return vec_mule (x, y);
  92 }
  93
  94 vector unsigned long long
  95 test_vull_mule_vui_vui (vector unsigned int x, vector unsigned int y)
  96 {
  97         return vec_mule (x, y);
  98 }
  99
 100 vector signed long long
 101 test_vsll_mulo_vsi_vsi (vector signed int x, vector signed int y)
 102 {
 103         return vec_mulo (x, y);
 104 }
 105
 106 vector unsigned long long
 107 test_vull_mulo_vui_vui (vector unsigned int x, vector unsigned int y)
 108 {
 109         return vec_mulo (x, y);
 110 }
 111
 112 /* Expected test results:
 113
 114      test_eq_long_long                         1 vcmpequd inst
 115      test_pack_float                           1 vpkudum inst
 116      test_vsi_packs_vsll_vsll                  1 vpksdss
 117      test_vui_packs_vull_vull                  1 vpkudus
 118      test_unsigned_char_popcnt_signed_char     1 vpopcntb
 119      test_unsigned_char_popcnt_unsigned_char   1 vpopcntb
 120      test_unsigned_short_popcnt_signed_short   1 vpopcnth
 121      test_unsigned_short_popcnt_unsigned_short 1 vpopcnth
 122      test_unsigned_int_popcnt_signed_int       2 vpopcntw
 123      test_unsigned_int_popcnt_unsigned_int     1 vpopcntd
 124      test_unsigned_long_long_popcnt_unsigned_long 1 vpopcntd
 125      test_vss_mradds_vss_vsss                  1 vmhraddshs
 126      test_vsll_mulo_vsi_vsi                    1 vmulosw
 127      test_vull_mulo_vui_vui                    1 vmulouw
 128      test_vsll_mule_vsi_vsi                    1 vmulesw
 129      test_vull_mule_vui_vui                    1 vmuleuw
 130  */
 131
 132 /* { dg-final { scan-assembler-times "vcmpequd" 1 } } */
 133 /* { dg-final { scan-assembler-times "vpkudum"  1 } } */
 134 /* { dg-final { scan-assembler-times "vpksdss"  1 } } */
 135 /* { dg-final { scan-assembler-times "vpkudus"  1 } } */
 136 /* { dg-final { scan-assembler-times "vpopcntb" 2 } } */
 137 /* { dg-final { scan-assembler-times "vpopcnth" 2 } } */
 138 /* { dg-final { scan-assembler-times "vpopcntw" 2 } } */
 139 /* { dg-final { scan-assembler-times "vpopcntd" 2 } } */
 140 /* { dg-final { scan-assembler-times "vmhraddshs"  1 } } */
 141 /* { dg-final { scan-assembler-times "vmulosw"  1 } } */
 142 /* { dg-final { scan-assembler-times "vmulouw"  1 } } */
 143 /* { dg-final { scan-assembler-times "vmulesw"  1 } } */
 144 /* { dg-final { scan-assembler-times "vmuleuw"  1 } } */