aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/success/ltac.v
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2008-05-01 16:28:08 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2008-05-01 16:28:08 +0000
commit14f6e7940436909c6f3bc1cc9f01464a556c1a45 (patch)
treee63f2c96ab9389010bb85f56ef1c6b89b36cd6e4 /test-suite/success/ltac.v
parent4f9cf134a3763de4ec5a5720edb11bb1e6eca66b (diff)
Clarification de l'ordre d'interprétation des variables dans ltac. En
particulier, TacCall(_,f,[]) est utilisé pour une référence à une variable ltac ou une tactique et Reference(f) est utilisé pour une référence à une variable ltac ou un constr (en passant, standardisation de l'utilisation de constr: ou ltac: à setoid_ring). git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10878 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success/ltac.v')
-rw-r--r--test-suite/success/ltac.v13
1 files changed, 12 insertions, 1 deletions
diff --git a/test-suite/success/ltac.v b/test-suite/success/ltac.v
index 9dd7b273d..757cf6a4e 100644
--- a/test-suite/success/ltac.v
+++ b/test-suite/success/ltac.v
@@ -173,7 +173,7 @@ Abort.
empty args *)
Goal True.
-match None with @None => exact I end.
+match constr:@None with @None => exact I end.
Abort.
(* Check second-order pattern unification *)
@@ -209,3 +209,14 @@ Goal True -> True -> True.
is.
exact I.
Abort.
+
+(* Interférence entre espaces des noms *)
+
+Ltac O := intro.
+Ltac Z1 t := set (x:=t).
+Ltac Z2 t := t.
+Goal True -> True.
+Z1 O.
+Z2 ltac:O.
+exact I.
+Qed.