diff options
author | 2012-04-27 07:35:59 -0400 | |
---|---|---|
committer | 2012-04-27 07:35:59 -0400 | |
commit | 6320e0f89da5fd1afc85e36bde7351d514b02e99 (patch) | |
tree | 9419cd55c53f38da8c5958df4e698a3e10962a05 /src | |
parent | 82018746530efcbcf17f8cde87033285c2b9a81f (diff) |
Omit unnecessary parens around arrows in pretty-printing
Diffstat (limited to 'src')
-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, |