summaryrefslogtreecommitdiff
path: root/src/pretty_print.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/pretty_print.ml')
-rw-r--r--src/pretty_print.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/pretty_print.ml b/src/pretty_print.ml
index 5d6e45e7..ab6e0539 100644
--- a/src/pretty_print.ml
+++ b/src/pretty_print.ml
@@ -565,7 +565,7 @@ and pp_format_o o =
^ " Unknown)"
let pp_format_tag = function
- | Emp -> "Tag_empty"
+ | Emp_local | Emp_global -> "Tag_empty"
| External (Some s) -> "(Tag_extern (Just \""^s^"\"))"
| External None -> "(Tag_extern Nothing)"
| Default -> "Tag_default"