added api/Combinators for Eng

lib/resource/italian/LexiconIta.gf

@@ -4,7 +4,7 @@ concrete LexiconIta of Lexicon = CatIta ** open
   MorphoIta, ParadigmsIta, BeschIta in {
 
 flags 
-  optimize=values ;
+  optimize=values ; coding=utf8 ;
 
 lin
   airplane_N = regN "aereo" ;
@@ -24,7 +24,7 @@ lin
   bike_N = regN "bicicletta" ;
   bird_N = regN "uccello" ;
   black_A = regADeg "nero" ;
-  blue_A = mkA "blù" "blù" "blù" "blù" "blumente" ;
+  blue_A = mkA "blù" "blù" "blù" "blù" "blumente" ;
   boat_N = regN "batello" ;
   book_N = regN "libro" ;
   boot_N = regN "stivale" ;
@@ -47,7 +47,7 @@ lin
   cheese_N = regN "formaggio" ;
   child_N = regN "bambino" ;
   church_N = regN "chiesa" ;
-  city_N = regN "città" ;
+  city_N = regN "città" ;
   clean_A = regADeg "proprio" ;
   clever_A = regADeg "saggio" ;
   close_V2 = dirV2 (verboV (chiudere_30 "chiudere")) ;
@@ -102,7 +102,7 @@ lin
   industry_N = regN "industria" ;
   iron_N = regN "ferro" ;
   john_PN = mkPN "Giovanni" masculine ;
-  king_N = regN "ré" ;
+  king_N = regN "ré" ;
   know_V2 = dirV2 (verboV (conoscere_37 "conoscere")) ; --- savoir_V2 : VS
   lake_N = regN "lago" ;
   lamp_N = regN "lampa" ;
@@ -197,7 +197,7 @@ lin
  --- trousers_N = regN "pantalon" ;
   ugly_A = regADeg "brutto" ;
   understand_V2 = dirV2 (regV "capire") ;
-  university_N = regN "università" ;
+  university_N = regN "università" ;
   village_N = regN "paese" ;
   wait_V2 = mkV2 (regV "aspettare") ParadigmsIta.dative ;
   walk_V = regV "camminare" ;
@@ -218,7 +218,7 @@ lin
 
   do_V2 =  dirV2 (verboV (fare_52 "fare")) ;
   now_Adv = mkAdv "adesso" ;
-  already_Adv = mkAdv "già" ;
+  already_Adv = mkAdv "già" ;
   song_N = femN (regN "canzone") ;
   add_V3 = dirV3 (verboV (giungere_55 "aggiungere")) ParadigmsIta.dative ;
   number_N = regN "numero" ;

lib/resource/italian/StructuralIta.gf

@@ -1,7 +1,7 @@
 concrete StructuralIta of Structural = CatIta ** 
   open PhonoIta, MorphoIta, ParadigmsIta, BeschIta, Prelude in {
 
-  flags optimize=all ;
+  flags optimize=all ; coding=utf8 ;
 
 lin
 
@@ -13,9 +13,9 @@ lin
     } ;
   almost_AdA, almost_AdN = ss "quasi" ;
   always_AdV = ss "sempre" ;
-  although_Subj = ss "benché" ** {m = Conjunct} ;
+  although_Subj = ss "benché" ** {m = Conjunct} ;
   and_Conj = {s1 = [] ; s2 = "e" ; n = Pl} ;
-  because_Subj = ss "perché" ** {m = Indic} ;
+  because_Subj = ss "perché" ** {m = Indic} ;
   before_Prep = mkPrep "prima" ;
   behind_Prep = mkPrep "dietro" ;
   between_Prep = mkPrep "fra" ;
@@ -39,9 +39,9 @@ lin
     mkPronoun
       "lui" "lo" "gli" "glie" "lui" "suo" "sua" "suoi" "sue"
       Masc Sg P3 ;
-  here7from_Adv = ss ["da quì"] ;
-  here7to_Adv = ss "quì" ;
-  here_Adv = ss "quì" ;
+  here7from_Adv = ss ["da quì"] ;
+  here7to_Adv = ss "quì" ;
+  here_Adv = ss "quì" ;
   how_IAdv = ss "come" ;
   how8many_IDet = {s = \\g,c => prepCase c ++ genForms "quanti" "quante" ! g ; n = Pl} ;
   if_Subj = ss "se" ** {m = Indic} ;
@@ -57,7 +57,7 @@ lin
       Masc Sg P3 ;
   less_CAdv = ss "meno" ;
   many_Det = {s = \\g,c => prepCase c ++ genForms "molti" "molte" ! g ; n = Pl} ;
-  more_CAdv = ss "più" ;
+  more_CAdv = ss "più" ;
   most_Predet = {s = \\_,c => prepCase c ++ ["la maggior parte"] ; c = CPrep P_di} ;
   much_Det = {s = \\g,c => prepCase c ++ genForms "molto" "molta" ! g ; n = Sg} ;
   must_VV = mkVV (verboV (dovere_47 "dovere")) ;
@@ -75,7 +75,7 @@ lin
     mkPronoun
       "lei" "la" "le" "glie" "lei" "suo" "sua" "suoi" "sue"
       Fem Sg P3 ;
-  so_AdA = ss "così" ;
+  so_AdA = ss "così" ;
   somebody_NP = pn2np (mkPN ["qualcuno"] Masc) ;
   somePl_Det = {s = \\_,c => prepCase c ++ "qualche" ; n = Pl} ;
   someSg_Det = {s = \\_,c => prepCase c ++ "qualche" ; n = Sg} ;
@@ -87,9 +87,9 @@ lin
       Pl => \\g,c => prepCase c ++ genForms "quelli" "quelle" ! g ---- quegli
       }
     } ;
-  there7from_Adv = ss ["di là"] ;
-  there7to_Adv = ss "là" ; --- ci
-  there_Adv = ss "là" ;
+  there7from_Adv = ss ["di là"] ;
+  there7to_Adv = ss "là" ; --- ci
+  there_Adv = ss "là" ;
   therefore_PConj = ss "quindi" ;
   they_Pron = mkPronoun
     "loro" "loro" "li" "glie" "loro" "loro" "loro" "loro" "loro" 
@@ -121,10 +121,10 @@ lin
   } ;
   whoPl_IP = {s = \\c => prepCase c ++ "chi" ; a = aagr Masc Pl} ;
   whoSg_IP = {s = \\c => prepCase c ++ "chi" ; a = aagr Masc Sg} ;
-  why_IAdv = ss "perché" ;
+  why_IAdv = ss "perché" ;
   without_Prep = mkPrep "senza" ;
   with_Prep = {s = [] ; c = CPrep P_con ; isDir = False} ;
-  yes_Utt = ss "sì" ;
+  yes_Utt = ss "sì" ;
   youSg_Pron = mkPronoun 
     "tu" "ti" "ti" "te" "te" "tuo" "tua" "tuoi" "tue"
     Masc Sg P2 ;