summaryrefslogtreecommitdiff
path: root/testsuite/compiler/renamer/varpatt.gf
blob: 93bddd63e02987c5f3960f2ab47bdea96a99ff44 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
abstract varpatt = {

-- this should raise error
-- we cannot pattern match on functions

cat D ;
fun D1 : D ;
    D2 : D ;

fun d : D -> Int ;
def d x = 1 ;

}