From d60ddb1c4ab7ee4e79d0ed668498dff45efc793a Mon Sep 17 00:00:00 2001 From: Herbert Lange Date: Tue, 12 Nov 2019 14:54:19 +0100 Subject: [PATCH] fix relnp and posspron --- src/latin/NounLat.gf | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/latin/NounLat.gf b/src/latin/NounLat.gf index c6ebf97cc..bfff54006 100644 --- a/src/latin/NounLat.gf +++ b/src/latin/NounLat.gf @@ -64,7 +64,7 @@ concrete NounLat of Noun = CatLat ** open ResLat, Prelude, ConjunctionLat in { ExtAdvNP = AdvNP ; -- RelNP : NP -> RS -> NP ; -- Paris, which is here - RelNP np rs = np ** { adv = rs.s ++ np.adv } ; + RelNP np rs = np ** { adv = bindComma ++ rs.s ! np.g ! np.n ++ np.adv } ; -- DetNP : Det -> NP ; -- these five DetNP det = { @@ -91,7 +91,7 @@ concrete NounLat of Noun = CatLat ** open ResLat, Prelude, ConjunctionLat in { --- PossPron p = { + PossPron p = { s = \\a => p.poss.s ! PronNonRefl ! a ; sp = \\_ => "" } ; -- s = \\_,_ => p.s ! Gen ; -- sp = \\_,_ => p.sp -- } ;