infinitive marks in EmbedVP, bugs noticed

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

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
}