diff options
author | Ian Hinder <ian@vaio.(none)> | 2008-02-01 23:27:53 -0500 |
---|---|---|
committer | Ian Hinder <ian@vaio.(none)> | 2008-02-02 01:40:11 -0500 |
commit | b370466f4e3f8757b70a67d07c90e542b87783b0 (patch) | |
tree | 1b621c16cb20ffb6d417efd7ba53c642b360594c /Tools | |
parent | 284c4f1e0de9dbde08a01e27fe93005c869ede63 (diff) |
Erik: Add triggered groups option
Diffstat (limited to 'Tools')
-rw-r--r-- | Tools/CodeGen/KrancThorn.m | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Tools/CodeGen/KrancThorn.m b/Tools/CodeGen/KrancThorn.m index c529943..230dc5b 100644 --- a/Tools/CodeGen/KrancThorn.m +++ b/Tools/CodeGen/KrancThorn.m @@ -644,8 +644,9 @@ groupsSetInCalc[calc_, groups_] := function returns a LIST of schedule structures for each calculation *) scheduleCalc[calc_, groups_] := - Module[{points, conditional, keyword, value, groupsToSync}, + Module[{points, conditional, triggered, keyword, value, groupsToSync}, conditional = mapContains[calc, ConditionalOnKeyword]; + triggered = mapContains[calc, TriggerGroups]; If[conditional, keywordConditional = lookup[calc, ConditionalOnKeyword]; If[! MatchQ[keywordConditional, {lhs_String, rhs_String}], @@ -671,6 +672,8 @@ scheduleCalc[calc_, groups_] := Language -> CodeGen`SOURCELANGUAGE, Comment -> lookup[calc, Name] }, + If[triggered, {TriggerGroups -> lookup[calc, TriggerGroups]}, + {}], If[conditional, {Conditional -> {Parameter -> keyword, Value -> value}}, {}] ] &, |