diff options
| author | aspiwack | 2011-05-17 10:31:45 +0000 |
|---|---|---|
| committer | aspiwack | 2011-05-17 10:31:45 +0000 |
| commit | 5b9981239c3192d20d7db2de1248a63b59cbf44a (patch) | |
| tree | cf163ba95662293731c6a864aba6d3e96af14637 /proofs | |
| parent | 07a1de8f9fcff9864e53a090307efa48eca8fe94 (diff) | |
Break circular dependency Proof_global -> Vernacexpr -> Proof_global.
Fixes bug #2547 ( http://www.lix.polytechnique.fr/coq/bugs/show_bug.cgi?id=2547 )
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14131 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/proof_global.ml | 5 | ||||
| -rw-r--r-- | proofs/proof_global.mli | 5 |
2 files changed, 2 insertions, 8 deletions
diff --git a/proofs/proof_global.ml b/proofs/proof_global.ml index 780f2eeda6..186472be27 100644 --- a/proofs/proof_global.ml +++ b/proofs/proof_global.ml @@ -315,10 +315,7 @@ module Bullet = struct open Store.Field - type t = - | Dash - | Star - | Plus + type t = Vernacexpr.bullet type behavior = { name : string; diff --git a/proofs/proof_global.mli b/proofs/proof_global.mli index f9dbe3438a..2f9f4a549d 100644 --- a/proofs/proof_global.mli +++ b/proofs/proof_global.mli @@ -102,10 +102,7 @@ val maximal_unfocus : 'a Proof.focus_kind -> Proof.proof -> unit (**********************************************************) module Bullet : sig - type t = - | Dash - | Star - | Plus + type t = Vernacexpr.bullet (** A [behavior] is the data of a put function which is called when a bullet prefixes a tactic, together |