diff options
| author | Erik Schnetter <schnetter@gmail.com> | 2013-01-19 21:36:53 -0500 |
|---|---|---|
| committer | Erik Schnetter <schnetter@gmail.com> | 2013-01-19 22:24:34 -0500 |
| commit | 90982fcea8f8c87c7e2f6121df418b4765f5edbf (patch) | |
| tree | b092967d905111ebb73af5954b437f8f850a3f27 /Tools | |
| parent | a48fcb1377932920988d39422dce92a6733962b9 (diff) | |
Correct variables names for loop bounds
Diffstat (limited to 'Tools')
| -rw-r--r-- | Tools/CodeGen/CalculationFunction.m | 6 | ||||
| -rw-r--r-- | Tools/CodeGen/CodeGenCactus.m | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/Tools/CodeGen/CalculationFunction.m b/Tools/CodeGen/CalculationFunction.m index e0b3598..3f44ff0 100644 --- a/Tools/CodeGen/CalculationFunction.m +++ b/Tools/CodeGen/CalculationFunction.m @@ -759,7 +759,7 @@ DefFn[ "char const *const sources[] = {differencing, source, NULL};\n", "OpenCLRunTime_CallKernel(cctkGH, CCTK_THORNSTRING, \"" <> functionName <> "\",\n", " sources, groups, NULL, NULL, NULL, -1,\n", - " imin, imax, &kernel);\n\n" + " kimin, kimax, &kernel);\n\n" }, { }] @@ -1001,7 +1001,7 @@ DefFn[ If[OptionValue[UseVectors] || OptionValue[UseOpenCL], CommentedBlock["Copy local copies back to grid functions", - { PrepareStorePartialVariableInLoop["i", "lc_imin", "lc_imax"], + { PrepareStorePartialVariableInLoop["i", "kimin", "kimax"], Map[StorePartialVariableInLoop[gridName[#], localName[#]] &, gfsInLHS] }], CommentedBlock["Copy local copies back to grid functions", @@ -1028,7 +1028,7 @@ DefFn[ "Calculate temporaries and grid functions", If[OptionValue[UseVectors], { - PrepareStorePartialVariableInLoop["i", "lc_imin", "lc_imax"], + PrepareStorePartialVariableInLoop["i", "kimin", "kimax"], Map[StorePartialVariableInLoop[FlattenBlock@gridName[#[[1]]], #[[2]]] &, eqs2] }, Map[ diff --git a/Tools/CodeGen/CodeGenCactus.m b/Tools/CodeGen/CodeGenCactus.m index 6088e6c..f3b1b7a 100644 --- a/Tools/CodeGen/CodeGenCactus.m +++ b/Tools/CodeGen/CodeGenCactus.m @@ -389,7 +389,7 @@ DefFn[ "(", functionName, ",\n", " i,j,k, imin[0],imin[1],imin[2], imax[0],imax[1],imax[2],\n", " cctk_ash[0],cctk_ash[1],cctk_ash[2]", - If[vectorise, {",\n", " imin,imax, CCTK_REAL_VEC_SIZE"}, ""], + If[vectorise, {",\n", " kimin,kimax, CCTK_REAL_VEC_SIZE"}, ""], ")\n", "{\n", IndentBlock[ |