diff options
| -rw-r--r-- | test-suite/success/unification.v | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/test-suite/success/unification.v b/test-suite/success/unification.v index 9de78b138b..e31d67d8cd 100644 --- a/test-suite/success/unification.v +++ b/test-suite/success/unification.v @@ -109,10 +109,3 @@ intros. apply H0. (* Check that equation ?n[H] = ?n[H] is correctly considered true *) reflexivity. Qed. - -(* An example that failed at some time in early 2008 *) -(* The "fun t => match ..." used to raise an anomaly instead of an error *) - -Ltac f := set (x:=fun t => match t with (f,_) => f 0 end). -Goal True. -try f. (* if an error, it is caught *) |