diff options
Diffstat (limited to 'src/elab_print.sml')
-rw-r--r-- | src/elab_print.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/elab_print.sml b/src/elab_print.sml index c25576ba..37669312 100644 --- a/src/elab_print.sml +++ b/src/elab_print.sml @@ -87,7 +87,7 @@ fun p_explicitness e = fun p_con' par env (c, _) = case c of - TFun (t1, t2) => parenIf true (box [p_con' true env t1, + TFun (t1, t2) => parenIf par (box [p_con' true env t1, space, string "->", space, |