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

a couple of changes in DictEng/DictEngBul. Added infVV in ParadigmsEng which allows the definition of VVs that take a bare infinitive

Browse Source
This commit is contained in:
kr.angelov
2013-09-03 08:06:44 +00:00
parent b9192ccccf
commit 69881dccac
4 changed files with 30 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/src/english/ParadigmsEng.gf
View File

@@ -306,6 +306,7 @@ oper
mkVS : V -> VS ; -- sentence-compl e.g. say (that S)
mkV2S : V -> Prep -> V2S ; -- e.g. tell (NP) (that S)
mkVV : V -> VV ; -- e.g. want (to VP)
infVV : V -> VV ; -- e.g. want (to VP)
ingVV : V -> VV ; -- e.g. start (VPing)
mkV2V : V -> Prep -> Prep -> V2V ; -- e.g. want (noPrep NP) (to VP)
ingV2V : V -> Prep -> Prep -> V2V ; -- e.g. prevent (noPrep NP) (from VP-ing)
@@ -548,6 +549,11 @@ mkSubj : Str -> Subj = \s -> lin Subj {s = s} ; --%
p = v.p ;
typ = VVInf
} ;
infVV v = lin VV {
s = table {VVF vf => v.s ! vf ; _ => v.s ! VInf} ;
p = v.p ;
typ = VVAux
} ;
ingVV v = lin VV {
s = table {VVF vf => v.s ! vf ; _ => v.s ! VInf} ;
p = v.p ;