diff options
| author | coq | 2002-12-19 16:57:45 +0000 |
|---|---|---|
| committer | coq | 2002-12-19 16:57:45 +0000 |
| commit | bb6f20a2ee88f264fa2c73c5a3ed306008791f7d (patch) | |
| tree | e065248fcc1818fbb7c2f1c29131977c14722a55 /parsing | |
| parent | 57cd43543edfc8961038e2da734c6477ff5ae2bc (diff) | |
Petit netoyage dans lib
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3463 85f007b7-540e-0410-9357-904b9bb8a0f7
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 ()) |