-val optimization

2005-01-11 15:06:12 +00:00
parent 496416d7ab
commit a19856618b
36 changed files with 829 additions and 585 deletions
--- a/lib/resource/italian/StructuralIta.gf
+++ b/lib/resource/italian/StructuralIta.gf
@@ -69,7 +69,7 @@ lin
  OtherwiseAdv = ss "altramente" ;
  ThereforeAdv = ss "quindi" ;

-  EverybodyNP  = mkNameNounPhrase ["tutti"] Masc ;
+  EverybodyNP  = normalNounPhrase (\\c => prepCase c ++ "tutti") Masc Pl ;
  SomebodyNP   = mkNameNounPhrase ["qualcuno"] Masc ;
  NobodyNP     = mkNameNounPhrase ["nessuno"] Masc ;  --- ne
  EverythingNP = mkNameNounPhrase ["tutto"] Masc ;