diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-11-21 15:49:38 +0100 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-11-21 15:49:38 +0100 |
commit | 540adbc183c84385c78cd8337c08b1a437362a5e (patch) | |
tree | 2368a4c1ae7eabb04425671b42fc09245422b013 /Tools/CodeGen | |
parent | 92386da2119859fffae3bddc2f59a24a4df082a5 (diff) |
Thorn.m: Remove unused params argument from groupStorage function
Diffstat (limited to 'Tools/CodeGen')
-rw-r--r-- | Tools/CodeGen/Thorn.m | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Tools/CodeGen/Thorn.m b/Tools/CodeGen/Thorn.m index 47c50eb..3eb2bad 100644 --- a/Tools/CodeGen/Thorn.m +++ b/Tools/CodeGen/Thorn.m @@ -363,7 +363,7 @@ CreateInterface[implementation_, inheritedImplementations_, includeFiles_, (* Given a storage group structure defined above, return a CodeGen structure for inclusion in the schedule.ccl file to allocate storage for this group. *) -groupStorage[spec_, params_] := +groupStorage[spec_] := If[mapContains[spec, MaxTimelevels], Flatten[Table[{"if (", lookup[spec, MaxTimelevels], " == ", i, ")\n", "{\n", @@ -501,7 +501,7 @@ scheduleGroup[spec_,params_] := return a CodeGen block representing a schedule.ccl file. *) CreateSchedule[globalStorageGroups_, scheduledGroups_, scheduledFunctions_, params_] := {whoWhen["CCL"], - Map[SeparatedBlock[groupStorage[#,params]] &, globalStorageGroups], + Map[SeparatedBlock[groupStorage[#]] &, globalStorageGroups], Map[SeparatedBlock[scheduleFunction[#,params]] &, scheduledFunctions], Map[SeparatedBlock[scheduleGroup[#,params]] &, scheduledGroups]}; |