summaryrefslogtreecommitdiff
path: root/src/elab_print.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/elab_print.sml')
-rw-r--r--src/elab_print.sml7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/elab_print.sml b/src/elab_print.sml
index 7eb853af..5028ff44 100644
--- a/src/elab_print.sml
+++ b/src/elab_print.sml
@@ -779,6 +779,13 @@ fun p_decl env (dAll as (d, _) : decl) =
string ":",
space,
p_con env c]
+ | DStyle (_, x, n, c) => box [string "style",
+ space,
+ p_named x n,
+ space,
+ string ":",
+ space,
+ p_con env c]
and p_str env (str, _) =
case str of