diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-06 12:24:53 +0200 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-06 12:24:53 +0200 |
commit | 235aabbdbc568e810eaae707e64d6eb1870f588a (patch) | |
tree | ab8a20e47874ea9b87c2c3e00a560cca6c691061 /Tools/CodeGen | |
parent | 1c5f2bd09c5b7d35949277fdf7126beeb859f6a7 (diff) |
Vectorisation.m: Make several functions private
These are no longer used externally
Diffstat (limited to 'Tools/CodeGen')
-rw-r--r-- | Tools/CodeGen/Vectorisation.m | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/Tools/CodeGen/Vectorisation.m b/Tools/CodeGen/Vectorisation.m index 784f64f..34be90e 100644 --- a/Tools/CodeGen/Vectorisation.m +++ b/Tools/CodeGen/Vectorisation.m @@ -24,12 +24,6 @@ VectoriseExpression; VectorisationLocalsToGridFunctions; OpenCLLocalsToGridFunctions; VectorisationSimpleAssignEquationList; -StoreVariableInLoop::usage = "StoreVariableInLoop[dest_, src_] returns a block of code " <> - "that assigns 'src' to 'dest'."; -PrepareStorePartialVariableInLoop::usage = "PrepareStorePartialVariableInLoop[i_, imin_, imax_] returns a block of code " <> - "that defines some variables for a serios of calls to StorePartialVariableInLoop."; -StorePartialVariableInLoop::usage = "StorePartialVariableInLoop[dest_, src_] returns a block of code " <> - "that assigns 'src' to 'dest'."; Begin["`Private`"]; @@ -250,16 +244,20 @@ DefFn[ (* Code generation: The following functions are called when vectorising. *) +(* Return a block of code that assigns 'src' to 'dest' *) DefFn[ StoreVariableInLoop[dest:(_String|_Symbol), src:(_String|_Symbol)] := {"vec_store_nta(", dest, ",", src, ")", EOL[]}]; +(* Return a block of code that defines some variables for a series of + calls to StorePartialVariableInLoop *) DefFn[ PrepareStorePartialVariableInLoop[i:(_String|_Symbol), ilo:(_String|_Symbol), ihi:(_String|_Symbol)] := {"vec_store_partial_prepare(", i, ",", ilo, ",", ihi, ")", EOL[]}]; +(* Return a block of code that assigns 'src' to 'dest' *) DefFn[ StorePartialVariableInLoop[dest:(_String|_Symbol), src:(_String|_Symbol)] := {"vec_store_nta_partial(", dest, ",", src, ")", EOL[]}]; |