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

Type [x:nat]<nat> Cases x  of 
                  ((S x) as b) => <nat>Cases x  of
                                        x => x 
                                   end
                          end.