aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/extraction
diff options
context:
space:
mode:
authorGravatar Pierre Letouzey <pierre.letouzey@inria.fr>2014-03-05 14:59:16 +0100
committerGravatar Pierre Letouzey <pierre.letouzey@inria.fr>2014-03-05 15:41:21 +0100
commitadfd437f8ae6aaf893119fa4730edecf067dede7 (patch)
treea395e5f9e50f5cde1419c1fbdb0870d9efdc09b8 /plugins/extraction
parent3080dd5e27ee20ba0b3537c7882e7ad8af414325 (diff)
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.
Diffstat (limited to 'plugins/extraction')
-rw-r--r--plugins/extraction/common.mli1
-rw-r--r--plugins/extraction/extraction.mli1
-rw-r--r--plugins/extraction/mlutil.ml1
-rw-r--r--plugins/extraction/mlutil.mli1
-rw-r--r--plugins/extraction/modutil.mli3
5 files changed, 0 insertions, 7 deletions
diff --git a/plugins/extraction/common.mli b/plugins/extraction/common.mli
index 0fd3e7bb7..3058b91b6 100644
--- a/plugins/extraction/common.mli
+++ b/plugins/extraction/common.mli
@@ -9,7 +9,6 @@
open Names
open Globnames
open Miniml
-open Mlutil
open Pp
(** By default, in module Format, you can do horizontal placing of blocks
diff --git a/plugins/extraction/extraction.mli b/plugins/extraction/extraction.mli
index 89db50e63..8d3cf76fd 100644
--- a/plugins/extraction/extraction.mli
+++ b/plugins/extraction/extraction.mli
@@ -12,7 +12,6 @@ open Names
open Term
open Declarations
open Environ
-open Libnames
open Miniml
val extract_constant : env -> constant -> constant_body -> ml_decl
diff --git a/plugins/extraction/mlutil.ml b/plugins/extraction/mlutil.ml
index 1a4cfb45f..9b72c3e9f 100644
--- a/plugins/extraction/mlutil.ml
+++ b/plugins/extraction/mlutil.ml
@@ -1363,7 +1363,6 @@ let is_not_strict t =
restriction for the moment.
*)
-open Declarations
open Declareops
let inline_test r t =
diff --git a/plugins/extraction/mlutil.mli b/plugins/extraction/mlutil.mli
index f25f0bb89..ff5dee31f 100644
--- a/plugins/extraction/mlutil.mli
+++ b/plugins/extraction/mlutil.mli
@@ -7,7 +7,6 @@
(************************************************************************)
open Names
-open Term
open Globnames
open Miniml
open Table
diff --git a/plugins/extraction/modutil.mli b/plugins/extraction/modutil.mli
index 52805bc87..42c8b11f3 100644
--- a/plugins/extraction/modutil.mli
+++ b/plugins/extraction/modutil.mli
@@ -7,11 +7,8 @@
(************************************************************************)
open Names
-open Declarations
-open Environ
open Globnames
open Miniml
-open Mod_subst
(*s Functions upon ML modules. *)