-val optimization

2026-05-20 00:22:51 -06:00 · 2005-01-11 15:06:12 +00:00
parent 496416d7ab
commit a19856618b
36 changed files with 829 additions and 585 deletions
--- a/lib/resource/spanish/StructuralSpa.gf
+++ b/lib/resource/spanish/StructuralSpa.gf
@@ -71,7 +71,7 @@ lin
  OtherwiseAdv = ss "otramente" ;
  ThereforeAdv = ss ["por eso"] ;

-  EverybodyNP  = mkNameNounPhrase ["todos"] Masc ;
+  EverybodyNP  = normalNounPhrase (\\c => prepCase c ++ "todos") Masc Pl ;
  SomebodyNP   = mkNameNounPhrase ["algún"] Masc ;
  NobodyNP     = mkNameNounPhrase ["nadién"] Masc ;  --- ne
  EverythingNP = mkNameNounPhrase ["todo"] Masc ;