summaryrefslogtreecommitdiff
path: root/testsuite/compiler/renamer/funpatt.gf
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/compiler/renamer/funpatt.gf')
-rw-r--r--testsuite/compiler/renamer/funpatt.gf14
1 files changed, 14 insertions, 0 deletions
diff --git a/testsuite/compiler/renamer/funpatt.gf b/testsuite/compiler/renamer/funpatt.gf
new file mode 100644
index 000000000..8406e1e3b
--- /dev/null
+++ b/testsuite/compiler/renamer/funpatt.gf
@@ -0,0 +1,14 @@
+abstract funpatt = {
+
+-- this should raise error
+-- we cannot pattern match on functions
+
+cat D ;
+fun D1 : D ;
+ D2 : D ;
+
+fun d : D -> Int ;
+def d D1 = 1 ;
+ d D2 = 2 ;
+
+} \ No newline at end of file