summaryrefslogtreecommitdiff
path: root/src/expl_print.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/expl_print.sml')
-rw-r--r--src/expl_print.sml8
1 files changed, 6 insertions, 2 deletions
diff --git a/src/expl_print.sml b/src/expl_print.sml
index 624afa63..5284eecb 100644
--- a/src/expl_print.sml
+++ b/src/expl_print.sml
@@ -713,9 +713,13 @@ fun p_decl env (dAll as (d, _) : decl) =
| DStyle (_, x, n) => box [string "style",
space,
p_named x n]
- | DInitializer e => box [string "initializer",
+ | DTask (e1, e2) => box [string "task",
space,
- p_exp env e]
+ p_exp env e1,
+ space,
+ string "=",
+ space,
+ p_exp env e2]
and p_str env (str, _) =
case str of