aboutsummaryrefslogtreecommitdiffhomepage
path: root/grammar
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 /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 093a561d6..98843a40f 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 bfc38feb8..a731ade68 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 527cc6b2f..5d9097f38 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 f96b67f5e..b5ab3a87b 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 ad8929657..433779302 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;