1
0
forked from GitHub/gf-rgl

(Est) get rid of most lock field warnings

This commit is contained in:
Inari Listenmaa
2022-07-25 17:38:35 +02:00
parent 728bb1faf9
commit afe76e1fe0
11 changed files with 60 additions and 59 deletions
+2 -2
View File
@@ -13,8 +13,8 @@ concrete IdiomEst of Idiom = CatEst **
ExistIP ip =
let cas : NPForm = NPCase Nom ; ---- also partitive in Extra
vp : VP = insertObj (\\_,b,_ => "olemas") (predV olla) ;
subj : NP = ip ** {isPron = False ; a = agrP3 ip.n} ;
vp : MorphoEst.VP = insertObj (\\_,b,_ => "olemas") (predV olla) ;
subj : MorphoEst.NPhrase = ip ** {isPron = False ; a = agrP3 ip.n} ;
in existClause (subjForm subj cas) (agrP3 Sg) vp ;
-- Notice the nominative in the cleft $NP$: "se on Matti josta Liisa pitää"