GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 04:59:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

added testcase for pattern matching on runtime variables

Browse Source
This commit is contained in:
krasimir
2009-07-22 09:53:39 +00:00
parent 4f21b57a86
commit 3473f0d274
3 changed files with 15 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
testsuite/compiler/check/strMatch/strMatch.gf Normal file
View File

@@ -0,0 +1,5 @@
abstract strMatch = {
cat S ;
fun f : S -> S ;
z : S ;
}

2
testsuite/compiler/check/strMatch/strMatch.gfs Normal file
View File

@@ -0,0 +1,2 @@
i testsuite/compiler/check/strMatch/strMatch.gf
l f z

8
testsuite/compiler/check/strMatch/strMatchCnc.gf Normal file
View File

@@ -0,0 +1,8 @@
concrete strMatchCnc of strMatch = open Prelude in {
lincat S = {s : Str; b : Bool} ;
lin f x = case x.s of {
"" => {s="empty"; b=False} ;
_ => x
} ;
lin z = {s=""; b=False} ;
}