From adfd437f8ae6aaf893119fa4730edecf067dede7 Mon Sep 17 00:00:00 2001
From: Pierre Letouzey
Date: Wed, 5 Mar 2014 14:59:16 +0100
Subject: Remove many superfluous 'open' indicated by ocamlc -w +33

 With ocaml 4.01, the 'unused open' warning also checks the mli :-)

 Beware: some open are reported as useless when compiling with camlp5,
 but are necessary for compatibility with camlp4. These open are now
 marked with a comment.
---
 printing/genprint.ml  | 1 -
 printing/ppconstr.mli | 2 --
 printing/pptactic.mli | 1 -
 printing/prettyp.mli  | 2 --
 printing/printer.ml   | 1 -
 printing/printer.mli  | 5 -----
 printing/printmod.ml  | 1 -
 7 files changed, 13 deletions(-)

(limited to 'printing')

diff --git a/printing/genprint.ml b/printing/genprint.ml
index dcd357d5c9..02f2dd63b2 100644
--- a/printing/genprint.ml
+++ b/printing/genprint.ml
@@ -7,7 +7,6 @@
 (************************************************************************)
 
 open Pp
-open Util
 open Genarg
 
 type ('raw, 'glb, 'top) printer = {
diff --git a/printing/ppconstr.mli b/printing/ppconstr.mli
index 95498b8d80..79399094d7 100644
--- a/printing/ppconstr.mli
+++ b/printing/ppconstr.mli
@@ -8,8 +8,6 @@
 
 open Loc
 open Pp
-open Environ
-open Term
 open Libnames
 open Constrexpr
 open Names
diff --git a/printing/pptactic.mli b/printing/pptactic.mli
index 47640afa60..e20e3ae014 100644
--- a/printing/pptactic.mli
+++ b/printing/pptactic.mli
@@ -11,7 +11,6 @@ open Genarg
 open Names
 open Constrexpr
 open Tacexpr
-open Proof_type
 open Ppextend
 open Environ
 open Pattern
diff --git a/printing/prettyp.mli b/printing/prettyp.mli
index 1bf8c6ab3c..0cbb7a86c4 100644
--- a/printing/prettyp.mli
+++ b/printing/prettyp.mli
@@ -8,13 +8,11 @@
 
 open Pp
 open Names
-open Context
 open Term
 open Environ
 open Reductionops
 open Libnames
 open Globnames
-open Nametab
 open Misctypes
 
 (** A Pretty-Printer for the Calculus of Inductive Constructions. *)
diff --git a/printing/printer.ml b/printing/printer.ml
index 9143d1c5b3..ad154ec554 100644
--- a/printing/printer.ml
+++ b/printing/printer.ml
@@ -12,7 +12,6 @@ open Util
 open Names
 open Term
 open Vars
-open Context
 open Environ
 open Globnames
 open Nametab
diff --git a/printing/printer.mli b/printing/printer.mli
index 2d7f0a5d33..6ca55b16b5 100644
--- a/printing/printer.mli
+++ b/printing/printer.mli
@@ -8,19 +8,14 @@
 
 open Pp
 open Names
-open Libnames
 open Globnames
 open Term
 open Context
 open Environ
-open Glob_term
 open Pattern
-open Nametab
-open Termops
 open Evd
 open Proof_type
 open Glob_term
-open Tacexpr
 
 (** These are the entry points for printing terms, context, tac, ... *)
 
diff --git a/printing/printmod.ml b/printing/printmod.ml
index 34224d7b50..112abeec9c 100644
--- a/printing/printmod.ml
+++ b/printing/printmod.ml
@@ -7,7 +7,6 @@
 (************************************************************************)
 
 open Pp
-open Errors
 open Names
 open Declarations
 open Nameops
-- 
cgit v1.2.3