msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

almost completed Swedish

Browse Source
This commit is contained in:
aarne
2005-12-08 15:40:50 +00:00
parent 89423c7ad3
commit 203fc87319
9 changed files with 465 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
lib/resource-1.0/scandinavian/TensedScand.gf
View File

@@ -1,10 +1,10 @@
--concrete TensedScand of Tensed = CatScand, TenseX ** open ResScand in {
--
-- flags optimize=all_subs ;
--
-- lin
-- UseCl t a p cl = {s = t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! ODir} ;
-- UseQCl t a p cl = {s = \\q => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! q} ;
-- UseRCl t a p cl = {s = \\r => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! r} ;
--
--}
incomplete concrete TensedScand of Tensed = CatScand, TenseX ** open ResScand in {
flags optimize=all_subs ;
lin
UseCl t a p cl = {s = \\o => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! o} ;
UseQCl t a p cl = {s = \\q => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! q} ;
UseRCl t a p cl = {s = \\r => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! r} ;
}