aboutsummaryrefslogtreecommitdiff
path: root/Tools/CodeGen
diff options
context:
space:
mode:
authorIan Hinder <ian.hinder@aei.mpg.de>2013-09-06 12:24:53 +0200
committerIan Hinder <ian.hinder@aei.mpg.de>2013-09-06 12:24:53 +0200
commit235aabbdbc568e810eaae707e64d6eb1870f588a (patch)
treeab8a20e47874ea9b87c2c3e00a560cca6c691061 /Tools/CodeGen
parent1c5f2bd09c5b7d35949277fdf7126beeb859f6a7 (diff)
Vectorisation.m: Make several functions private
These are no longer used externally
Diffstat (limited to 'Tools/CodeGen')
-rw-r--r--Tools/CodeGen/Vectorisation.m10
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[]}];