1
0
forked from GitHub/gf-core

mkTemp in api; Inf to aux in SentenceEng bug fix

This commit is contained in:
aarne
2010-12-20 14:10:48 +00:00
parent 9509a451e0
commit 8f9e72ae4c
2 changed files with 9 additions and 1 deletions

View File

@@ -275,6 +275,14 @@ incomplete resource Constructors = open Grammar in { --%
conditionalTense : Tense -- she would sleep --# notpresent --:
= TCond ; --# notpresent --%
--3 Temp, temporal and aspectual features
-- Temp is a combination of Tense and Ant. In extra modules for some
-- languages, it can also involve aspect and other things.
mkTemp : Tense -> Ant -> Temp
= TTAnt ; --%
--3 ImpForm, imperative form
-- Imperative form is a parameter that sets the form of imperative

View File

@@ -12,7 +12,7 @@ concrete SentenceEng of Sentence = CatEng ** open Prelude, ResEng in {
s = \\pol,n =>
let
agr = AgP2 (numImp n) ;
verb = infVP VVInf vp agr ;
verb = infVP VVAux vp agr ;
dont = case pol of {
CNeg True => "don't" ;
CNeg False => "do" ++ "not" ;