mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-23 11:42:49 -06:00
more tests for variants
This commit is contained in:
@@ -1,2 +1,12 @@
|
|||||||
i -retain testsuite/compiler/compute/Variants.gf
|
i -retain testsuite/compiler/compute/Variants.gf
|
||||||
cc hello
|
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">
|
||||||
|
|||||||
@@ -1 +1,11 @@
|
|||||||
variants {"hello"; "hello" ++ "hello"}
|
variants {"hello"; "hello" ++ "hello"}
|
||||||
|
variants {"a" ++ "a"; "b" ++ "b"}
|
||||||
|
variants {"a"; "b"}
|
||||||
|
"c"
|
||||||
|
variants {"a"; "b"} ++ variants {"a"; "b"}
|
||||||
|
variants {"a"; "b"}
|
||||||
|
"c"
|
||||||
|
variants {"a"; "b"} ++ variants {"a"; "b"}
|
||||||
|
variants {"a"; "b"}
|
||||||
|
"c" ++ "c"
|
||||||
|
"c"
|
||||||
|
|||||||
Reference in New Issue
Block a user