summaryrefslogtreecommitdiff
path: root/test-suite/success/remember.v
blob: 0befe054a38c61cd0ea336b97e25f2559e10910a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
(* Testing remember and co *)

Lemma A : forall (P: forall X, X -> Prop), P nat 0 -> P nat 0.
intros.
Fail remember nat as X.
Fail remember nat as X in H. (* This line used to succeed in 8.3 *)
Fail remember nat as X.
Abort.

(* Testing Ltac interpretation of remember (was not working up to r16181) *)

Goal (1 + 2 + 3 = 6).
let name := fresh "fresh" in
remember (1 + 2) as x eqn:name.
rewrite fresh.
Abort.