From 5aedf4add6d0ae2b1be19ae623aef00be65a5c21 Mon Sep 17 00:00:00 2001 From: odanoburu Date: Mon, 18 Mar 2019 14:59:39 -0300 Subject: [PATCH] rm trailing whitespace --- src/common/ParamX.gf | 2 +- src/english/QuestionEng.gf | 2 +- src/romance/ResRomance.gf | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/common/ParamX.gf b/src/common/ParamX.gf index 65901de66..a99406651 100644 --- a/src/common/ParamX.gf +++ b/src/common/ParamX.gf @@ -11,7 +11,7 @@ resource ParamX = open Prelude in { Simul | Anter --# notpresent ; - Tense = + Tense = Pres | Past --# notpresent | Fut --# notpresent diff --git a/src/english/QuestionEng.gf b/src/english/QuestionEng.gf index 2723a4109..a2f478d80 100644 --- a/src/english/QuestionEng.gf +++ b/src/english/QuestionEng.gf @@ -13,7 +13,7 @@ concrete QuestionEng of Question = CatEng ** open ResEng, Prelude in { } ---- "whether" in ExtEng } ; - QuestVP qp vp = + QuestVP qp vp = let cl = mkClause (qp.s ! npNom) (agrP3 qp.n) vp in {s = \\t,a,b,_ => cl.s ! t ! a ! b ! oDir} ; ---- diff --git a/src/romance/ResRomance.gf b/src/romance/ResRomance.gf index ad38ed321..a53575de2 100644 --- a/src/romance/ResRomance.gf +++ b/src/romance/ResRomance.gf @@ -215,7 +215,7 @@ oper clit = refl ++ vp.clit1 ++ vp.clit2 ++ vp.clit3.s ; ---- refl first? verb = vp.s.s ; - vaux = auxVerb vp.s.vtyp ; + vaux = auxVerb vtyp ; ---- VPAgr : this is where it really matters part = case vp.agr.p2 of {