diff options
Diffstat (limited to 'toplevel/whelp.ml4')
-rw-r--r-- | toplevel/whelp.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/whelp.ml4 b/toplevel/whelp.ml4 index 4999cd0c2..935606fc4 100644 --- a/toplevel/whelp.ml4 +++ b/toplevel/whelp.ml4 @@ -83,7 +83,7 @@ let error_whelp_unknown_reference ref = let uri_of_repr_kn ref (mp,dir,l) = match mp with | MPfile sl -> - uri_of_dirpath (id_of_label l :: Dir_path.repr dir @ Dir_path.repr sl) + uri_of_dirpath (Label.to_id l :: Dir_path.repr dir @ Dir_path.repr sl) | _ -> error_whelp_unknown_reference ref |