File: isnan_fp64.cl

package info (click to toggle)
pocl 6.0-6
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 25,304 kB
  • sloc: lisp: 149,513; ansic: 103,778; cpp: 54,947; python: 1,513; sh: 949; ruby: 255; pascal: 226; tcl: 180; makefile: 173; java: 72; xml: 49
file content (13 lines) | stat: -rw-r--r-- 255 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
#ifdef SINGLEVEC
_CL_OVERLOADABLE inttype isnan(vtype i)
#else
_CL_OVERLOADABLE itype isnan(vtype i)
#endif
{
  itype res = ((as_utype(i) << 1) > (utype)((ulong)EXPBITS_DP64 << 1));
#ifdef SINGLEVEC
  return convert_int(res);
#else
  return res;
#endif
}