summaryrefslogtreecommitdiff
path: root/src/prepare.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/prepare.sml')
-rw-r--r--src/prepare.sml4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/prepare.sml b/src/prepare.sml
index 4d81940f..1b7454dc 100644
--- a/src/prepare.sml
+++ b/src/prepare.sml
@@ -325,11 +325,11 @@ fun prepDecl (d as (_, loc), st) =
| DJavaScript _ => (d, st)
| DCookie _ => (d, st)
| DStyle _ => (d, st)
- | DTask (tk, e) =>
+ | DTask (tk, x1, x2, e) =>
let
val (e, st) = prepExp (e, st)
in
- ((DTask (tk, e), loc), st)
+ ((DTask (tk, x1, x2, e), loc), st)
end
| DOnError _ => (d, st)