diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-01-25 16:12:33 -0600 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-01-25 16:12:33 -0600 |
commit | 47936d3bdc7c0e6bf6c97c0ee00476b1f7723988 (patch) | |
tree | ff780816703696e197f61cd6bd6ed717c28dd952 /Tools/CodeGen | |
parent | 60c27226cd0b6d561f1ee9cec1ac3f518a117ea2 (diff) |
CaKernel.m: Include Kranc headers and define CCTK_GFINDEX3D macro
Diffstat (limited to 'Tools/CodeGen')
-rw-r--r-- | Tools/CodeGen/CaKernel.m | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Tools/CodeGen/CaKernel.m b/Tools/CodeGen/CaKernel.m index 3b2e159..7350009 100644 --- a/Tools/CodeGen/CaKernel.m +++ b/Tools/CodeGen/CaKernel.m @@ -19,7 +19,7 @@ *) BeginPackage["CaKernel`", {"Errors`", "Helpers`", "Kranc`", "CodeGenCactus`", "MapLookup`", - "Calculation`", "CodeGen`", "CalculationFunction`"}]; + "Calculation`", "CodeGen`", "CalculationFunction`", "CodeGenC`"}]; CaKernelCCL; CaKernelCode; @@ -80,7 +80,8 @@ DefFn[CaKernelCode[calc_List,opts___] := LoopFunction -> (codeBlock[kernel<>"_Computations", #] &), GFAccessFunction -> ({"I3D(",Riffle[{#,0,0,0},","],")"} &)}]; - CreateCalculationFunction[calc2,opts]]]; + {Map[IncludeFile, {"GenericFD.h", "Differencing.h"}], + "\n#define CCTK_GFINDEX3D(u,i,j,k) I3D(u,i,j,k)\n\n", CreateCalculationFunction[calc2,opts]}]]; DefFn[CaKernelEpilogue[] := |