updated clefts in Idiom (now all except Russian)

2006-06-01 14:02:49 +00:00
parent d631ee00d7
commit 4dcbfcdf75
14 changed files with 100 additions and 24 deletions
--- a/lib/resource-1.0/swedish/IdiomSwe.gf
+++ b/lib/resource-1.0/swedish/IdiomSwe.gf
@@ -12,7 +12,7 @@ concrete IdiomSwe of Idiom = CatSwe **
        (insertObj (\\_ => np.s ! rs.c) (predV verbBe))) ;

    CleftAdv ad s = mkClause "det" (agrP3 neutrum Sg) 
-      (insertObj (\\_ => s.s ! Main)
+      (insertObj (\\_ => "som" ++ s.s ! Sub)
        (insertObj (\\_ => ad.s) (predV verbBe))) ;