diff options
| author |  bertot <bertot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-02-02 09:29:24 +0000 |
|---|---|---|
| committer | bertot <bertot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-02-02 09:29:24 +0000 |
| commit | 315b373054869cc823c96393815ec0aad3f6b9f9 (patch) | |
| tree | cd182670a711422682533692341c58619de55aa4 /contrib/interface/vtp.ml | |
| parent | 6e805b77992c6b28a6f801505288f42ffda927ad (diff) | |
adds the possibility to mark function arguments as formulas in Ltac
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5276 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/interface/vtp.ml')
| -rw-r--r-- | contrib/interface/vtp.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/contrib/interface/vtp.ml b/contrib/interface/vtp.ml index a6fad0769..55a148846 100644 --- a/contrib/interface/vtp.ml +++ b/contrib/interface/vtp.ml @@ -1496,6 +1496,9 @@ and fTACTIC_COM = function fINT x2; fFIX_TAC_LIST x3; fNODE "fixtactic" 3 +| CT_formula_marker(x1) -> + fFORMULA x1; + fNODE "formula_marker" 1 | CT_generalize(x1) -> fFORMULA_NE_LIST x1; fNODE "generalize" 1 |