aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/bug_13960.v
blob: 947db9586f0dc0a74bfddf115b996b69e304f08c (plain)
1
2
3
4
5
6
7
8
9
10
Require Ltac2.Ltac2.

Set Default Goal Selector "!".

Ltac2 t () := let _ := Message.print (Message.of_string "hi") in 42.

Goal False.
Proof.
Ltac2 Eval t ().
Abort.