libclc/clc/lib/generic/relational/clc_isnormal.cl

   1 #include <clc/internal/clc.h>
   2 #include <clc/relational/relational.h>
   3
   4 _CLC_DEFINE_RELATIONAL_UNARY(int, __clc_isnormal, __builtin_isnormal, float)
   5
   6 #ifdef cl_khr_fp64
   7
   8 #pragma OPENCL EXTENSION cl_khr_fp64 : enable
   9
  10 // The scalar version of __clc_isnormal(double) returns an int, but the vector
  11 // versions return long.
  12 _CLC_DEF _CLC_OVERLOAD int __clc_isnormal(double x) {
  13   return __builtin_isnormal(x);
  14 }
  15
  16 _CLC_DEFINE_RELATIONAL_UNARY_VEC_ALL(long, __clc_isnormal, double)
  17
  18 #endif
  19 #ifdef cl_khr_fp16
  20
  21 #pragma OPENCL EXTENSION cl_khr_fp16 : enable
  22
  23 // The scalar version of __clc_isnormal(half) returns an int, but the vector
  24 // versions return short.
  25 _CLC_DEF _CLC_OVERLOAD int __clc_isnormal(half x) {
  26   return __builtin_isnormal(x);
  27 }
  28
  29 _CLC_DEFINE_RELATIONAL_UNARY_VEC_ALL(short, __clc_isnormal, half)
  30
  31 #endif