aboutsummaryrefslogtreecommitdiff
path: root/plugins/extraction/table.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-11-23 17:36:03 +0100
committerMaxime Dénès2017-11-23 17:36:03 +0100
commit915554785ffed11370f5d700d11a8b5614408096 (patch)
tree4b5b4120c896cf99c863fab4fd5e1ec22af20d53 /plugins/extraction/table.ml
parentebe133a0df0656de82a566c4f1673257f60f7c0c (diff)
parent9f47342d890dc3ef7f4950004513a47d940af5ca (diff)
Merge PR #6186: [api] Miscellaneous consolidation.
Diffstat (limited to 'plugins/extraction/table.ml')
-rw-r--r--plugins/extraction/table.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/extraction/table.ml b/plugins/extraction/table.ml
index 995d5fd19d..5903733a66 100644
--- a/plugins/extraction/table.ml
+++ b/plugins/extraction/table.ml
@@ -486,7 +486,7 @@ let check_loaded_modfile mp = match base_mp mp with
if not (Library.library_is_loaded dp) then begin
match base_mp (Lib.current_mp ()) with
| MPfile dp' when not (DirPath.equal dp dp') ->
- err (str "Please load library " ++ pr_dirpath dp ++ str " first.")
+ err (str "Please load library " ++ DirPath.print dp ++ str " first.")
| _ -> ()
end
| _ -> ()