diff options
| author | Camil Staps | 2018-01-07 10:51:38 +0100 |
|---|---|---|
| committer | Camil Staps | 2018-01-07 10:51:38 +0100 |
| commit | 2043a55c410a0332bd9453e01c28f0a6a8327ddd (patch) | |
| tree | 77f6a5bec730ee7582da0ac5a00dba4a2a30040f /assignment-13/uFPL.icl | |
| parent | Layouting (diff) | |
Generate code from iTasks
Diffstat (limited to 'assignment-13/uFPL.icl')
| -rw-r--r-- | assignment-13/uFPL.icl | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/assignment-13/uFPL.icl b/assignment-13/uFPL.icl index ffe21b3..881a11f 100644 --- a/assignment-13/uFPL.icl +++ b/assignment-13/uFPL.icl @@ -270,11 +270,7 @@ instance run NamedRule where run (_ :=: r) = run r -Start w = simulate example_countdown w -Start _ = printToString (genp example_score) -where - genp :: (a -> CProg) | gen a CProg - genp = gen +Start w = simulate example_score w example_score :: [NamedRule] example_score = |