summaryrefslogtreecommitdiff
path: root/testsuite/compiler/update
diff options
context:
space:
mode:
authorkrasimir <krasimir@chalmers.se>2009-06-13 13:54:06 +0000
committerkrasimir <krasimir@chalmers.se>2009-06-13 13:54:06 +0000
commit9142fcff76eabaabe984760c211be1a0f31bcb55 (patch)
treecdf8b8e5fa53b9049f96d7a37affa38ae42e3408 /testsuite/compiler/update
parentc25d7be8773f2a2ee643d1d266b02bd2076f04be (diff)
split the testsuite to different directories for compiler, runtime and libraries
Diffstat (limited to 'testsuite/compiler/update')
-rw-r--r--testsuite/compiler/update/ArrityCheck.gf5
-rw-r--r--testsuite/compiler/update/ArrityCheck.gfs1
-rw-r--r--testsuite/compiler/update/ArrityCheck.gfs.gold8
3 files changed, 14 insertions, 0 deletions
diff --git a/testsuite/compiler/update/ArrityCheck.gf b/testsuite/compiler/update/ArrityCheck.gf
new file mode 100644
index 000000000..9ee03ba6e
--- /dev/null
+++ b/testsuite/compiler/update/ArrityCheck.gf
@@ -0,0 +1,5 @@
+abstract ArrityCheck = {
+ fun f : Int -> Int -> Int ;
+ def f 0 = \x -> x ;
+ f 1 1 = 0 ;
+}
diff --git a/testsuite/compiler/update/ArrityCheck.gfs b/testsuite/compiler/update/ArrityCheck.gfs
new file mode 100644
index 000000000..69d739975
--- /dev/null
+++ b/testsuite/compiler/update/ArrityCheck.gfs
@@ -0,0 +1 @@
+i testsuite/compiler/update/ArrityCheck.gf
diff --git a/testsuite/compiler/update/ArrityCheck.gfs.gold b/testsuite/compiler/update/ArrityCheck.gfs.gold
new file mode 100644
index 000000000..d6ea2bb0c
--- /dev/null
+++ b/testsuite/compiler/update/ArrityCheck.gfs.gold
@@ -0,0 +1,8 @@
+
+
+C:\gf_2\testsuite\compiler\update\ArrityCheck.gf:6:1: cannot unify the informations
+ fun f : Int -> Int -> Int ;
+ def f 0 = \x -> x ;
+and
+ def f 1 1 = 0 ;
+in module ArrityCheck