gcc/testsuite/gcc.target/powerpc/p9-minmax-2.c

   1 /* { dg-do compile { target { powerpc*-*-* } } } */
   2 /* { dg-skip-if "do not override -mcpu" { powerpc*-*-* } { "-mcpu=*" } { "-mcpu=power9" } } */
   3 /* { dg-require-effective-target powerpc_p9vector_ok } */
   4 /* { dg-options "-mcpu=power9 -O2 -mpower9-minmax" } */
   5 /* { dg-final { scan-assembler-not "fsel"      } } */
   6 /* { dg-final { scan-assembler     "xscmpeqdp" } } */
   7 /* { dg-final { scan-assembler     "xscmpgtdp" } } */
   8 /* { dg-final { scan-assembler-not "xscmpodp"  } } */
   9 /* { dg-final { scan-assembler-not "xscmpudp"  } } */
  10 /* { dg-final { scan-assembler     "xsmaxcdp"  } } */
  11 /* { dg-final { scan-assembler-not "xsmaxdp"   } } */
  12 /* { dg-final { scan-assembler     "xsmincdp"  } } */
  13 /* { dg-final { scan-assembler-not "xsmindp"   } } */
  14 /* { dg-final { scan-assembler     "xxsel"     } } */
  15
  16 /* Due to NaN support, <= and >= are not handled presently unless -ffast-math
  17    is used.  At some point this will be fixed and the xscmpgedp instruction can
  18    be generated normally. The <= and >= tests are bracketed with
  19    #ifdef DO_GE_LE.  */
  20
  21 #ifdef DO_GE_LE
  22 double
  23 dbl_max1 (double a, double b)
  24 {
  25   return (a >= b) ? a : b;
  26 }
  27 #endif
  28
  29 double
  30 dbl_max2 (double a, double b)
  31 {
  32   return (a > b) ? a : b;
  33 }
  34
  35 double
  36 dbl_min1 (double a, double b)
  37 {
  38   return (a < b) ? a : b;
  39 }
  40
  41 #ifdef DO_GE_LE
  42 double
  43 dbl_min2 (double a, double b)
  44 {
  45   return (a <= b) ? a : b;
  46 }
  47 #endif
  48
  49 double
  50 dbl_cmp_eq (double a, double b, double c, double d)
  51 {
  52   return (a == b) ? c : d;
  53 }
  54
  55 double
  56 dbl_cmp_ne (double a, double b, double c, double d)
  57 {
  58   return (a != b) ? c : d;
  59 }
  60
  61 double
  62 dbl_cmp_gt (double a, double b, double c, double d)
  63 {
  64   return (a > b) ? c : d;
  65 }
  66
  67 #ifdef DO_GE_LE
  68 double
  69 dbl_cmp_ge (double a, double b, double c, double d)
  70 {
  71   return (a >= b) ? c : d;
  72 }
  73 #endif
  74
  75 double
  76 dbl_cmp_lt (double a, double b, double c, double d)
  77 {
  78   return (a < b) ? c : d;
  79 }
  80
  81 #ifdef DO_GE_LE
  82 double
  83 dbl_cmp_le (double a, double b, double c, double d)
  84 {
  85   return (a <= b) ? c : d;
  86 }
  87 #endif
  88
  89 #ifdef DO_GE_LE
  90 float
  91 flt_max1 (float a, float b)
  92 {
  93   return (a >= b) ? a : b;
  94 }
  95 #endif
  96
  97 float
  98 flt_max2 (float a, float b)
  99 {
 100   return (a > b) ? a : b;
 101 }
 102
 103 float
 104 flt_min1 (float a, float b)
 105 {
 106   return (a < b) ? a : b;
 107 }
 108
 109 #ifdef DO_GE_LE
 110 float
 111 flt_min2 (float a, float b)
 112 {
 113   return (a <= b) ? a : b;
 114 }
 115 #endif
 116
 117 float
 118 flt_cmp_eq (float a, float b, float c, float d)
 119 {
 120   return (a == b) ? c : d;
 121 }
 122
 123 float
 124 flt_cmp_ne (float a, float b, float c, float d)
 125 {
 126   return (a != b) ? c : d;
 127 }
 128
 129 float
 130 flt_cmp_gt (float a, float b, float c, float d)
 131 {
 132   return (a > b) ? c : d;
 133 }
 134
 135 #ifdef DO_GE_LE
 136 float
 137 flt_cmp_ge (float a, float b, float c, float d)
 138 {
 139   return (a >= b) ? c : d;
 140 }
 141 #endif
 142
 143 float
 144 flt_cmp_lt (float a, float b, float c, float d)
 145 {
 146   return (a < b) ? c : d;
 147 }
 148
 149 #ifdef DO_GE_LE
 150 float
 151 flt_cmp_le (float a, float b, float c, float d)
 152 {
 153   return (a <= b) ? c : d;
 154 }
 155 #endif
 156
 157 double
 158 dbl_flt_max1 (float a, float b)
 159 {
 160   return (a > b) ? a : b;
 161 }
 162
 163 double
 164 dbl_flt_max2 (double a, float b)
 165 {
 166   return (a > b) ? a : b;
 167 }
 168
 169 double
 170 dbl_flt_max3 (float a, double b)
 171 {
 172   return (a > b) ? a : b;
 173 }
 174
 175 double
 176 dbl_flt_min1 (float a, float b)
 177 {
 178   return (a < b) ? a : b;
 179 }
 180
 181 double
 182 dbl_flt_min2 (double a, float b)
 183 {
 184   return (a < b) ? a : b;
 185 }
 186
 187 double
 188 dbl_flt_min3 (float a, double b)
 189 {
 190   return (a < b) ? a : b;
 191 }