summaryrefslogtreecommitdiff
path: root/test-suite/failure/Case12.v
blob: cf6c2026791eb8578b59cd070e58ba2e8f2eb69c (plain)
1
2
3
4
5
6
7
8

Type
  (fun x : nat =>
   match x return nat with
   | S x as b => match x with
                 | x => x
                 end
   end).