aboutsummaryrefslogtreecommitdiff
path: root/grammar
diff options
context:
space:
mode:
authorPierre Letouzey2014-03-05 14:59:16 +0100
committerPierre Letouzey2014-03-05 15:41:21 +0100
commitadfd437f8ae6aaf893119fa4730edecf067dede7 (patch)
treea395e5f9e50f5cde1419c1fbdb0870d9efdc09b8 /grammar
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 'grammar')
-rw-r--r--grammar/argextend.ml42
-rw-r--r--grammar/q_constr.ml42
-rw-r--r--grammar/q_util.mli2
-rw-r--r--grammar/tacextend.ml42
-rw-r--r--grammar/vernacextend.ml42
5 files changed, 5 insertions, 5 deletions
diff --git a/grammar/argextend.ml4 b/grammar/argextend.ml4
index 093a561d6e..98843a40ff 100644
--- a/grammar/argextend.ml4
+++ b/grammar/argextend.ml4
@@ -232,7 +232,7 @@ let declare_vernac_argument loc s pr cl =
open Pcoq
open Pcaml
-open PcamlSig
+open PcamlSig (* necessary for camlp4 *)
EXTEND
GLOBAL: str_item;
diff --git a/grammar/q_constr.ml4 b/grammar/q_constr.ml4
index bfc38feb8b..a731ade686 100644
--- a/grammar/q_constr.ml4
+++ b/grammar/q_constr.ml4
@@ -11,7 +11,7 @@
open Q_util
open Compat
open Pcaml
-open PcamlSig
+open PcamlSig (* necessary for camlp4 *)
let loc = CompatLoc.ghost
let dloc = <:expr< Loc.ghost >>
diff --git a/grammar/q_util.mli b/grammar/q_util.mli
index 527cc6b2fc..5d9097f38d 100644
--- a/grammar/q_util.mli
+++ b/grammar/q_util.mli
@@ -6,7 +6,7 @@
(* * GNU Lesser General Public License Version 2.1 *)
(************************************************************************)
-open Compat
+open Compat (* necessary for camlp4 *)
val mlexpr_of_list : ('a -> MLast.expr) -> 'a list -> MLast.expr
diff --git a/grammar/tacextend.ml4 b/grammar/tacextend.ml4
index f96b67f5e9..b5ab3a87bb 100644
--- a/grammar/tacextend.ml4
+++ b/grammar/tacextend.ml4
@@ -186,7 +186,7 @@ let declare_tactic loc s c cl =
]
open Pcaml
-open PcamlSig
+open PcamlSig (* necessary for camlp4 *)
EXTEND
GLOBAL: str_item;
diff --git a/grammar/vernacextend.ml4 b/grammar/vernacextend.ml4
index ad8929657a..4337793022 100644
--- a/grammar/vernacextend.ml4
+++ b/grammar/vernacextend.ml4
@@ -113,7 +113,7 @@ let declare_command loc s c nt cl =
} >> ]
open Pcaml
-open PcamlSig
+open PcamlSig (* necessary for camlp4 *)
EXTEND
GLOBAL: str_item;