summaryrefslogtreecommitdiff
path: root/testsuite/compiler/check
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/check
parentc25d7be8773f2a2ee643d1d266b02bd2076f04be (diff)
split the testsuite to different directories for compiler, runtime and libraries
Diffstat (limited to 'testsuite/compiler/check')
-rw-r--r--testsuite/compiler/check/lins/lins.gf9
-rw-r--r--testsuite/compiler/check/lins/lins.gfs2
-rw-r--r--testsuite/compiler/check/lins/lins.gfs.gold17
-rw-r--r--testsuite/compiler/check/lins/linsCnc.gf11
4 files changed, 39 insertions, 0 deletions
diff --git a/testsuite/compiler/check/lins/lins.gf b/testsuite/compiler/check/lins/lins.gf
new file mode 100644
index 000000000..9da3058d9
--- /dev/null
+++ b/testsuite/compiler/check/lins/lins.gf
@@ -0,0 +1,9 @@
+abstract lins = {
+
+cat Nat ;
+cat C Nat ;
+
+fun zero : Nat ;
+ test : C zero ;
+
+} \ No newline at end of file
diff --git a/testsuite/compiler/check/lins/lins.gfs b/testsuite/compiler/check/lins/lins.gfs
new file mode 100644
index 000000000..f84b865d9
--- /dev/null
+++ b/testsuite/compiler/check/lins/lins.gfs
@@ -0,0 +1,2 @@
+i -src -erasing=on testsuite/compiler/check/lins/linsCnc.gf
+pg -printer=pmcfg_pretty
diff --git a/testsuite/compiler/check/lins/lins.gfs.gold b/testsuite/compiler/check/lins/lins.gfs.gold
new file mode 100644
index 000000000..bce4d9d05
--- /dev/null
+++ b/testsuite/compiler/check/lins/lins.gfs.gold
@@ -0,0 +1,17 @@
+checking module linsCnc
+Warning: no linearization type for C, inserting default {s : Str}
+checking module linsCnc
+Warning: no linearization of test
+
+language linsCnc
+productions
+ C1 -> F0[]
+functions
+ F0 := () [zero]
+sequences
+startcats
+ C := [C0]
+ Float := [Float]
+ Int := [Int]
+ Nat := [C1]
+ String := [String]
diff --git a/testsuite/compiler/check/lins/linsCnc.gf b/testsuite/compiler/check/lins/linsCnc.gf
new file mode 100644
index 000000000..3d430f5a0
--- /dev/null
+++ b/testsuite/compiler/check/lins/linsCnc.gf
@@ -0,0 +1,11 @@
+concrete linsCnc of lins = {
+
+lincat Nat = {} ;
+
+-- we expect warnings because the lines bellow are commented out
+-- we don't expect warning for zero because Nat = {}
+
+-- lincat C = {s : Str} ;
+-- lin test = {s = "test"} ;
+
+} \ No newline at end of file