diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-09-05 16:47:03 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-09-05 16:47:03 +0000 |
| commit | ac2ca408aef1759e4682d989a40ab332068edcdb (patch) | |
| tree | c33bd5f94b5da11544706492d5746e8894c05f0a /parsing/prettyp.ml | |
| parent | 98db1b73f6ab89763ef386a2055528db91e4e152 (diff) | |
Lib.node: merge OpenedModtype and OpenedModule, same for Closed...
This allows more sharing of code (cf. start_module / end_module)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14452 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/prettyp.ml')
| -rw-r--r-- | parsing/prettyp.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/parsing/prettyp.ml b/parsing/prettyp.ml index 38c8a7438..f530870e9 100644 --- a/parsing/prettyp.ml +++ b/parsing/prettyp.ml @@ -430,10 +430,6 @@ let gallina_print_library_entry with_values ent = Some (str " >>>>>>> Module " ++ pr_name oname) | (oname,Lib.ClosedModule _) -> Some (str " >>>>>>> Closed Module " ++ pr_name oname) - | (oname,Lib.OpenedModtype _) -> - Some (str " >>>>>>> Module Type " ++ pr_name oname) - | (oname,Lib.ClosedModtype _) -> - Some (str " >>>>>>> Closed Module Type " ++ pr_name oname) | (_,Lib.FrozenState _) -> None |