diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-03-05 09:01:05 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-03-05 09:01:05 +0000 |
commit | 714849072050afc647247bb1f556c111fa4c36c5 (patch) | |
tree | 28101a9b3bb936ce88a895bb5a2fb5069c3fdcbb /test-suite/success/ltac.v | |
parent | 2dfb47c13d6f79fd44bd5f224873f84a6c00c8a9 (diff) |
Ajout test relatif au bug #984
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@8127 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success/ltac.v')
-rw-r--r-- | test-suite/success/ltac.v | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/success/ltac.v b/test-suite/success/ltac.v index b6aa1e705..99cfe0177 100644 --- a/test-suite/success/ltac.v +++ b/test-suite/success/ltac.v @@ -145,3 +145,11 @@ Ltac check_binding y := cut ((fun y => y) = S). Goal True. check_binding true. Abort. + +(* Check that variables explicitly parsed as ltac variables are not + seen as intro pattern or constr (bug #984) *) + +Ltac afi tac := intros; tac. +Goal 1 = 2. +afi ltac:auto. + |