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.sml2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/elab_print.sml b/src/elab_print.sml
index 12abf6b0..72453f29 100644
--- a/src/elab_print.sml
+++ b/src/elab_print.sml
@@ -363,6 +363,8 @@ fun p_exp' par env (e, _) =
p_exp env e]) pes])
| EError => string "<ERROR>"
+ | EUnif (ref (SOME e)) => p_exp env e
+ | EUnif _ => string "_"
and p_exp env = p_exp' false env