backend: refine batch file for double

refined batch file to generate vector2,3,4,16 of math function
with double typed parameters

Signed-off-by: rander <rander.wang@intel.com>
Tested-by: Yang Rong <rong.r.yang@intel.com>

4 files changed, 11 insertions, 39 deletions

diff --git a/backend/src/libocl/script/gen_vector.py b/backend/src/libocl/script/gen_vector.py
index 1bc8e592..cc852089 100755
--- a/backend/src/libocl/script/gen_vector.py
+++ b/backend/src/libocl/script/gen_vector.py
@@ -269,9 +269,8 @@ class builtinProto():
             vtype = fixup_type(vtypeSeq, ptypeSeqs[n], i);
             # XXX FIXME now skip all double vector, as we don't
             # defined those scalar version's prototype.
-            if ptype[0].find('double') != -1 or \
-               vtype[0].find('double') != -1:
-                return
+            if ptype[0].find('double') != -1 and self.functionName.find('native') != -1 :
+              return;
 
             if (n == 0):
                 formatStr = 'OVERLOADABLE {0}{1} {2} ('.format(vtype[0], vtype[1], self.functionName)
diff --git a/backend/src/libocl/script/ocl_math.def b/backend/src/libocl/script/ocl_math.def
index b5c1e475..ea4ae8ae 100644
--- a/backend/src/libocl/script/ocl_math.def
+++ b/backend/src/libocl/script/ocl_math.def
@@ -62,7 +62,6 @@ intn ilogb (floatn x)
 int ilogb (float x)
 shortn ilogb (halfn x)
 short ilogb (half x)
-intn ilogb (doublen x)
 int ilogb (double x)
 floatn ldexp (floatn x, intn k)
 floatn ldexp (floatn x, int k)
@@ -70,8 +69,6 @@ float ldexp (float x, int k)
 halfn ldexp (halfn x, intn k)
 halfn ldexp (halfn x, int k)
 half ldexp (half x, int k)
-doublen ldexp (doublen x, intn k)
-doublen ldexp (doublen x, int k)
 double ldexp (double x, int k)
 gentype lgamma (gentype x)
 floatn lgamma_r (floatn x, __global intn *signp)
@@ -86,12 +83,12 @@ halfn lgamma_r (halfn x, __private intn *signp)
 half lgamma_r (half x, __global int *signp)
 half lgamma_r (half x, __local int *signp)
 half lgamma_r (half x,   __private int *signp)
-#doublen lgamma_r (doublen x, __global intn *signp)
-#doublen lgamma_r (doublen x, __local intn *signp)
-#doublen lgamma_r (doublen x, __private intn *signp)
-#double lgamma_r (double x, __global int *signp)
-#double lgamma_r (double x, __local int *signp)
-#double lgamma_r (double x, __private int *signp)
+doublen lgamma_r (doublen x, __global intn *signp)
+doublen lgamma_r (doublen x, __local intn *signp)
+doublen lgamma_r (doublen x, __private intn *signp)
+double lgamma_r (double x, __global int *signp)
+double lgamma_r (double x, __local int *signp)
+double lgamma_r (double x, __private int *signp)
 gentype log (gentype)
 gentype log2 (gentype)
 gentype log10 (gentype)
@@ -107,7 +104,6 @@ floatn nan (uintn nancode)
 float nan (uint nancode)
 halfn nan (ushortn nancode)
 half nan (ushort nancode)
-doublen nan (ulongn nancode)
 double nan (ulong nancode)
 gentype nextafter (gentype x, gentype y)
 gentype pow (gentype x, gentype y)
@@ -115,7 +111,6 @@ floatn pown (floatn x, intn y)
 float pown (float x, int y)
 halfn pown (halfn x, intn y)
 half pown (half x, int y)
-doublen pown (doublen x, intn y)
 double pown (double x, int y)
 gentype powr (gentype x, gentype y)
 gentype remainder (gentype x, gentype y)
@@ -140,8 +135,6 @@ double remquo (double x, double y, __private int *quo)
 gentype rint (gentype)
 floatn rootn (floatn x, intn y)
 halfn rootn (halfn x, intn y)
-doublen rootn (doublen x, intn y)
-doublen rootn (double x, int y)
 gentype round (gentype x)
 gentype rsqrt (gentype)
 gentype sin (gentype)
diff --git a/backend/src/libocl/script/ocl_math_20.def b/backend/src/libocl/script/ocl_math_20.def
index 73921086..b0e9d890 100644
--- a/backend/src/libocl/script/ocl_math_20.def
+++ b/backend/src/libocl/script/ocl_math_20.def
@@ -30,11 +30,9 @@ gentype fma (gentype a, gentype b, gentype c)
 gentype fmax (gentype x, gentype y)
 gentypef fmax (gentypef x, float y)
 gentypeh fmax (gentypeh x, half y)
-gentyped fmax (gentyped x, double y)
 gentype fmin (gentype x, gentype y)
 gentypef fmin (gentypef x, float y)
 gentypeh fmin (gentypeh x, half y)
-gentyped fmin (gentyped x, double y)
 gentype fmod (gentype x, gentype y)
 gentype fract (gentype x, __generic gentype *iptr)
 floatn frexp (floatn x, __generic intn *exp)
@@ -48,24 +46,19 @@ intn ilogb (floatn x)
 int ilogb (float x)
 shortn ilogb (halfn x)
 short ilogb (half x)
-intn ilogb (doublen x)
-int ilogb (double x)
 floatn ldexp (floatn x, intn k)
 floatn ldexp (floatn x, int k)
 float ldexp (float x, int k)
 halfn ldexp (halfn x, intn k)
 halfn ldexp (halfn x, int k)
 half ldexp (half x, int k)
-doublen ldexp (doublen x, intn k)
-doublen ldexp (doublen x, int k)
-double ldexp (double x, int k)
 gentype lgamma (gentype x)
 floatn lgamma_r (floatn x, __generic intn *signp)
 float lgamma_r (float x, __generic int *signp)
 halfn lgamma_r (halfn x, __generic intn *signp)
 half lgamma_r (half x, __generic int *signp)
-#doublen lgamma_r (doublen x, __generic intn *signp)
-#double lgamma_r (double x, __generic int *signp)
+doublen lgamma_r (doublen x, __generic intn *signp)
+double lgamma_r (double x, __generic int *signp)
 gentype log (gentype)
 gentype log2 (gentype)
 gentype log10 (gentype)
@@ -79,16 +72,12 @@ floatn nan (uintn nancode)
 float nan (uint nancode)
 halfn nan (ushortn nancode)
 half nan (ushort nancode)
-doublen nan (ulongn nancode)
-double nan (ulong nancode)
 gentype nextafter (gentype x, gentype y)
 gentype pow (gentype x, gentype y)
 floatn pown (floatn x, intn y)
 float pown (float x, int y)
 halfn pown (halfn x, intn y)
 half pown (half x, int y)
-doublen pown (doublen x, intn y)
-double pown (double x, int y)
 gentype powr (gentype x, gentype y)
 gentype remainder (gentype x, gentype y)
 floatn remquo (floatn x, floatn y, __generic intn *quo)
@@ -100,8 +89,6 @@ double remquo (double x, double y, __generic int *quo)
 gentype rint (gentype)
 floatn rootn (floatn x, intn y)
 halfn rootn (halfn x, intn y)
-doublen rootn (doublen x, intn y)
-doublen rootn (double x, int y)
 gentype round (gentype x)
 gentype rsqrt (gentype)
 gentype sin (gentype)
diff --git a/backend/src/libocl/script/ocl_math_common.def b/backend/src/libocl/script/ocl_math_common.def
index 16dd1a7a..b28f8af4 100644
--- a/backend/src/libocl/script/ocl_math_common.def
+++ b/backend/src/libocl/script/ocl_math_common.def
@@ -31,9 +31,6 @@ double fmax (double x, double y)
 double fmin (double x, double y)
 double fmin (double x, double y)
 double fmod (double x, double y)
-double fract (double x,  double *iptr)
-doublen frexp (doublen x,  intn *exp)
-double frexp (double x,  int *exp)
 double hypot (double x, double y)
 intn ilogb (doublen x)
 int ilogb (double x)
@@ -41,8 +38,6 @@ doublen ldexp (doublen x, intn k)
 doublen ldexp (doublen x, int k)
 double ldexp (double x, int k)
 double lgamma (double x)
-doublen lgamma_r (doublen x,  intn *signp)
-double lgamma_r (double x,  int *signp)
 double log (double)
 double log2 (double)
 double log10 (double)
@@ -60,11 +55,9 @@ doublen pown (doublen x, intn y)
 double pown (double x, int y)
 double powr (double x, double y)
 double remainder (double x, double y)
-doublen remquo (doublen x, doublen y,  intn *quo)
-double remquo (double x, double y,  int *quo)
 double rint (double)
 doublen rootn (doublen x, intn y)
-doublen rootn (double x, int y)
+double rootn (double x, int y)
 double round (double x)
 double rsqrt (double)
 double sin (double)