diff options
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/prettyp.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/prettyp.ml b/parsing/prettyp.ml index 1aa337373f..0587bd9219 100644 --- a/parsing/prettyp.ml +++ b/parsing/prettyp.ml @@ -365,7 +365,7 @@ let rec print_library_entry with_values ent = (str " >>>>>>> Section " ++ pr_name oname ++ fnl ()) | (oname,Lib.ClosedSection _) -> (str " >>>>>>> Closed Section " ++ pr_name oname ++ fnl ()) - | (_,Lib.CompilingModule (dir,_)) -> + | (_,Lib.CompilingLibrary (dir,_)) -> (str " >>>>>>> Library " ++ pr_dirpath dir ++ fnl ()) | (oname,Lib.OpenedModule _) -> (str " >>>>>>> Module " ++ pr_name oname ++ fnl ()) |