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

tidy up res; bug fix in ShellState.addTransfer

Browse Source
This commit is contained in:
aarne
2005-12-05 16:14:12 +00:00
parent 7188ccc88d
commit 5a39ac6b11
16 changed files with 162 additions and 201 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
resource-1.0/english/RelativeEng.gf
View File

@@ -15,11 +15,9 @@ concrete RelativeEng of Relative = CatEng ** open ResEng in {
RNoAg => ag ;
RAg a => a
} ;
verb = vp.s ! t ! ant ! b ! ODir ! agr ;
subj = rp.s ! Nom ;
compl = vp.s2 ! agr
cl = mkS (rp.s ! Nom) agr vp.s vp.s2
in
subj ++ verb.fin ++ verb.inf ++ compl
cl.s ! t ! ant ! b ! ODir
} ;
RelSlash rp slash = {