diff options
| author | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-13 17:28:03 +0200 |
|---|---|---|
| committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-13 17:28:03 +0200 |
| commit | 4ef8cd2bd3d7189f6a3469985dfed108e78279b9 (patch) | |
| tree | 805e715ee38bd4f921808ff551ffeefab8c03d57 | |
| parent | 4d0bde5e5f5bf7a3246f4d4a49ae7e77d0410dd3 (diff) | |
Move Boundary inherited implementations into CactusBoundary.m
| -rw-r--r-- | Tools/CodeGen/CactusBoundary.m | 3 | ||||
| -rw-r--r-- | Tools/CodeGen/KrancThorn.m | 16 |
2 files changed, 10 insertions, 9 deletions
diff --git a/Tools/CodeGen/CactusBoundary.m b/Tools/CodeGen/CactusBoundary.m index 733abb9..7dee96d 100644 --- a/Tools/CodeGen/CactusBoundary.m +++ b/Tools/CodeGen/CactusBoundary.m @@ -197,6 +197,9 @@ DefFn[ Sequence@@ (GetObjectField[c,#]& /@ {"DeclaredGroups", "Groups", "Implementation", "Name"})]]; + + c = JoinObjectField[c, "InheritedImplementations", + CactusBoundary`GetInheritedImplementations[]]; c]]; End[]; diff --git a/Tools/CodeGen/KrancThorn.m b/Tools/CodeGen/KrancThorn.m index 5b83fa9..e4a0478 100644 --- a/Tools/CodeGen/KrancThorn.m +++ b/Tools/CodeGen/KrancThorn.m @@ -178,9 +178,7 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ Inherited implementations ------------------------------------------------------------------------ *) - c = JoinObjectField[c, "InheritedImplementations", - Join[{"GenericFD"}, - CactusBoundary`GetInheritedImplementations[]]]; + c = AppendObjectField[c, "InheritedImplementations", "GenericFD"]; (* ------------------------------------------------------------------------ Check input parameters @@ -257,6 +255,12 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ OptionValue[ReflectionSymmetries], False]}]; (* ------------------------------------------------------------------------ + Boundary thorn + ------------------------------------------------------------------------ *) + + c = CactusBoundaryProcessCode[c, opts]; + + (* ------------------------------------------------------------------------ Startup source file ------------------------------------------------------------------------ *) @@ -304,12 +308,6 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ ]; (* ------------------------------------------------------------------------ - Create Boundary source files - ------------------------------------------------------------------------ *) - - c = CactusBoundaryProcessCode[c, opts]; - - (* ------------------------------------------------------------------------ Add parameter check source file ------------------------------------------------------------------------ *) |