GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-07 02:02:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

parameters to dep

Browse Source
This commit is contained in:
aarne
2005-09-01 19:18:55 +00:00
parent 7ad0dda9ed
commit 5e190b38fd
3 changed files with 77 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
grammars/dep/ResDep.gf Normal file
View File

@@ -0,0 +1,17 @@
resource ResDep = {
param
Case = C_ | C_to ;
VComp = VC_ | VC1 Case | VC2 Case Case ;
oper
case1, case2 : VComp -> Str ;
case1 c = case c of {
VC1 C_to => "to" ;
VC2 C_to _ => "to" ;
_ => []
} ;
case2 c = case c of {
VC2 _ C_to => "to" ;
_ => []
} ;
}