diff options
| author | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-06 12:31:39 +0200 |
|---|---|---|
| committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-06 12:31:39 +0200 |
| commit | f2330b6c5b2a3a91f253700f0a4883740b98f909 (patch) | |
| tree | 0c9bcb72936be6dc7a9d3dc103c982fb701481cd /Tools/CodeGen | |
| parent | 235aabbdbc568e810eaae707e64d6eb1870f588a (diff) | |
Vectorisation.m: Rename functions
Diffstat (limited to 'Tools/CodeGen')
| -rw-r--r-- | Tools/CodeGen/Vectorisation.m | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/Tools/CodeGen/Vectorisation.m b/Tools/CodeGen/Vectorisation.m index 34be90e..842282b 100644 --- a/Tools/CodeGen/Vectorisation.m +++ b/Tools/CodeGen/Vectorisation.m @@ -246,37 +246,37 @@ DefFn[ (* Return a block of code that assigns 'src' to 'dest' *) DefFn[ - StoreVariableInLoop[dest:(_String|_Symbol), src:(_String|_Symbol)] := + 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), + 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)] := + storePartialVariableInLoop[dest:(_String|_Symbol), src:(_String|_Symbol)] := {"vec_store_nta_partial(", dest, ",", src, ")", EOL[]}]; DefFn[ VectorisationLocalsToGridFunctions[gridNames_List, localNames_List] := - {PrepareStorePartialVariableInLoop["i", "vecimin", "vecimax"], - MapThread[StorePartialVariableInLoop, {gridNames, localNames}]}]; + {prepareStorePartialVariableInLoop["i", "vecimin", "vecimax"], + MapThread[storePartialVariableInLoop, {gridNames, localNames}]}]; (* TODO: This should be in OpenCL.m *) DefFn[ OpenCLLocalsToGridFunctions[gridNames_List, localNames_List] := - {PrepareStorePartialVariableInLoop["i", "lc_imin", "lc_imax"], - MapThread[StorePartialVariableInLoop, {gridNames, localNames}]}]; + {prepareStorePartialVariableInLoop["i", "lc_imin", "lc_imax"], + MapThread[storePartialVariableInLoop, {gridNames, localNames}]}]; DefFn[ VectorisationSimpleAssignEquationList[lhss_List, rhss_List] := - {PrepareStorePartialVariableInLoop["i", "vecimin", "vecimax"], - MapThread[StorePartialVariableInLoop, {lhss, rhss}]}]; + {prepareStorePartialVariableInLoop["i", "vecimin", "vecimax"], + MapThread[storePartialVariableInLoop, {lhss, rhss}]}]; End[]; |