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

infinitive marks in EmbedVP, bugs noticed

Browse Source
This commit is contained in:
aarne
2006-01-24 21:51:17 +00:00
parent 62e4090739
commit 7cce7e6462
5 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/resource-1.0/english/SentenceEng.gf
View File

@@ -36,6 +36,6 @@ concrete SentenceEng of Sentence = CatEng ** open ResEng in {
EmbedS s = {s = conjThat ++ s.s} ;
EmbedQS qs = {s = qs.s ! QIndir} ;
EmbedVP vp = {s = infVP vp (agrP3 Sg)} ; --- agr
EmbedVP vp = {s = "to" ++ infVP vp (agrP3 Sg)} ; --- agr
}

2
lib/resource-1.0/french/StructuralFre.gf
View File

@@ -86,7 +86,7 @@ lin
there7to_Adv = ss "là" ; --- y
there_Adv = ss "là" ;
therefore_PConj = ss "donc" ;
these_NP = pn2np (mkPN ["celles-ci"] Fem) ;
these_NP = pn2np (mkPN ["celles-ci"] Fem) ; ---- Pl
these_Quant = {s = \\_,c => prepCase c ++ "ces"} ; ---- ci
they_Pron = mkPronoun
"elles" "les" "leur" "eux" "leur" "leur" "leurs"

2
lib/resource-1.0/german/SentenceGer.gf
View File

@@ -35,6 +35,6 @@ concrete SentenceGer of Sentence = CatGer ** open ResGer in {
EmbedS s = {s = conjThat ++ s.s ! Sub} ;
EmbedQS qs = {s = qs.s ! QIndir} ;
EmbedVP vp = {s = (vp.s ! agrP3 Sg ! VPInfinit Simul).inf} ; --- agr
EmbedVP vp = {s = "zu" ++ (vp.s ! agrP3 Sg ! VPInfinit Simul).inf} ; --- agr ---- compl
}

2
lib/resource-1.0/romance/SentenceRomance.gf
View File

@@ -38,6 +38,6 @@ incomplete concrete SentenceRomance of Sentence =
EmbedS s = {s = conjThat ++ s.s ! Indic} ; --- mood
EmbedQS qs = {s = qs.s ! QIndir} ;
EmbedVP vp = {s = infVP vp (agrP3 Masc Sg)} ; --- agr
EmbedVP vp = {s = infVP vp (agrP3 Masc Sg)} ; --- agr ---- compl
}

2
lib/resource-1.0/scandinavian/SentenceScand.gf
View File

@@ -38,6 +38,6 @@ incomplete concrete SentenceScand of Sentence =
EmbedS s = {s = conjThat ++ s.s ! Sub} ;
EmbedQS qs = {s = qs.s ! QIndir} ;
EmbedVP vp = {s = infVP vp (agrP3 utrum Sg)} ; --- agr
EmbedVP vp = {s = infMark ++ infVP vp (agrP3 utrum Sg)} ; --- agr
}