diff options
| author | gareuselesinge | 2013-08-08 18:52:24 +0000 |
|---|---|---|
| committer | gareuselesinge | 2013-08-08 18:52:24 +0000 |
| commit | 262fa2306196fb279a9b473c0f89fd061458cb0c (patch) | |
| tree | 0271102cfe1815fabab3109c651637075f3abe48 /lib | |
| parent | b213bae73ca927874275a896482246b2ee761b7b (diff) | |
Simple machinery to detect EXTEND that interpret during parsing
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16679 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/flags.ml | 2 | ||||
| -rw-r--r-- | lib/flags.mli | 2 |
2 files changed, 4 insertions, 0 deletions
diff --git a/lib/flags.ml b/lib/flags.ml index f47901ad72..cff86dbbb4 100644 --- a/lib/flags.ml +++ b/lib/flags.ml @@ -67,6 +67,8 @@ let raw_print = ref false let record_print = ref true +let we_are_parsing = ref false + (* Compatibility mode *) (* Current means no particular compatibility consideration. diff --git a/lib/flags.mli b/lib/flags.mli index c4ad3f333e..4908d4a484 100644 --- a/lib/flags.mli +++ b/lib/flags.mli @@ -26,6 +26,8 @@ val ide_slave : bool ref val time : bool ref +val we_are_parsing : bool ref + type load_proofs = Force | Lazy | Dont val load_proofs : load_proofs ref |