summaryrefslogtreecommitdiff
path: root/testsuite/compiler/compute/Variants.gfs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/compiler/compute/Variants.gfs')
-rw-r--r--testsuite/compiler/compute/Variants.gfs10
1 files changed, 10 insertions, 0 deletions
diff --git a/testsuite/compiler/compute/Variants.gfs b/testsuite/compiler/compute/Variants.gfs
index 1f512694c..f65427e88 100644
--- a/testsuite/compiler/compute/Variants.gfs
+++ b/testsuite/compiler/compute/Variants.gfs
@@ -1,2 +1,12 @@
i -retain testsuite/compiler/compute/Variants.gf
cc hello
+cc <\x -> x++x : Str -> Str> ("a"|"b")
+cc <\x -> x : Str -> Str> ("a"|"b")
+cc <\x -> "c" : Str -> Str> ("a"|"b")
+cc <let x = ("a"|"b") in x++x : Str>
+cc <let x = ("a"|"b") in x : Str>
+cc <let x = ("a"|"b") in "c" : Str>
+cc <\x -> x.p1++x.p1 : Str*Str -> Str> <"a"|"b","c">
+cc <\x -> x.p1 : Str*Str -> Str> <"a"|"b","c">
+cc <\x -> x.p2++x.p2 : Str*Str -> Str> <"a"|"b","c">
+cc <\x -> x.p2 : Str*Str -> Str> <"a"|"b","c">