diff options
| author | ppedrot | 2013-11-12 16:56:04 +0000 |
|---|---|---|
| committer | ppedrot | 2013-11-12 16:56:04 +0000 |
| commit | 2c20d679b9a5704515790740062f9ca0f4108d5c (patch) | |
| tree | cf979cc59b2c7bddf1aa54c1aec8d4aefc18d6b2 /proofs | |
| parent | bf33614eef6c26c169ab9dae9fd2f3713d19d23f (diff) | |
Do not print tactic notation names at each interpretation step.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@17082 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/proof_type.ml | 2 | ||||
| -rw-r--r-- | proofs/proof_type.mli | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/proofs/proof_type.ml b/proofs/proof_type.ml index 737cea68c4..c04c44193e 100644 --- a/proofs/proof_type.ml +++ b/proofs/proof_type.ml @@ -49,7 +49,7 @@ type rule = prim_rule (** Ltac traces *) type ltac_call_kind = - | LtacNotationCall of string + | LtacNotationCall of KerName.t | LtacNameCall of ltac_constant | LtacAtomCall of glob_atomic_tactic_expr | LtacVarCall of Id.t * glob_tactic_expr diff --git a/proofs/proof_type.mli b/proofs/proof_type.mli index f7cd8ad87d..8cc6bf76f6 100644 --- a/proofs/proof_type.mli +++ b/proofs/proof_type.mli @@ -76,7 +76,7 @@ type tactic = goal sigma -> goal list sigma (** TODO: Move those definitions somewhere sensible *) type ltac_call_kind = - | LtacNotationCall of string + | LtacNotationCall of KerName.t | LtacNameCall of ltac_constant | LtacAtomCall of glob_atomic_tactic_expr | LtacVarCall of Id.t * glob_tactic_expr |