Convert many RGL modules from Latin-1 to UTF-8 to speed up compilation

Also add flags coding=utf8 to silence warnings.

lib/src/romance/CatRomance.gf

@@ -1,8 +1,8 @@
---# -coding=latin1
 incomplete concrete CatRomance of Cat = CommonX - [SC,Pol]
   ** open Prelude, CommonRomance, ResRomance, (R = ParamX) in {
 
   flags optimize=all_subs ;
+    coding=utf8 ;
 
   lincat
 
@@ -20,7 +20,7 @@ incomplete concrete CatRomance of Cat = CommonX - [SC,Pol]
       c2 : Compl
       } ;
 
-    SC = {s : Case => Str} ;  -- de dormir / à dormir
+    SC = {s : Case => Str} ;  -- de dormir / à dormir
 
 -- Sentence
 
@@ -112,7 +112,7 @@ incomplete concrete CatRomance of Cat = CommonX - [SC,Pol]
     N3 = Noun  ** {c2,c3 : Compl} ;
     PN = {s : Str ; g : Gender} ;
 
--- tense augmented with passé simple
+-- tense augmented with passé simple
   lincat
     Temp  = {s : Str ; t : RTense ; a : Anteriority} ;
     Tense = {s : Str ; t : RTense} ;

lib/src/romance/CommonRomance.gf

@@ -6,10 +6,10 @@
 -- which depends on [DiffRomance DiffRomance.html].
 --
 
---# -coding=latin1
 resource CommonRomance = ParamX ** open Prelude in {
 
   flags optimize=all ;
+    coding=utf8 ;
 
 --2 Enumerated parameter types for morphology
 --
@@ -145,7 +145,7 @@ param
   oper
     complAgr : Agr -> {g : Gender ; n : Number} = \a -> case a of {
       Ag g n _ => {g = g ; n = n} ;
-      AgPol g  => {g = g ; n = Sg}  -- vous êtes fatiguée
+      AgPol g  => {g = g ; n = Sg}  -- vous êtes fatiguée
       } ;
     verbAgr : Agr -> {g : Gender ; n : Number ; p : Person} = \a -> case a of {
       Ag g n p => {g = g ; n = n  ; p = p} ;

lib/src/romance/DiffRomance.gf

@@ -1,7 +1,7 @@
---# -coding=latin1
 --1 Differences between Romance languages
 
 interface DiffRomance = open CommonRomance, Prelude in {
+  flags coding=utf8 ;
 
 -- The first eight constants show the essential differences
 -- between French, Italian, and Romance syntaxes (as regards the
@@ -18,12 +18,12 @@ interface DiffRomance = open CommonRomance, Prelude in {
   param Prepos ;
 
 -- Which types of verbs exist, in terms of auxiliaries.
--- (Fre, Ita "avoir", "être", and refl; Spa only "haber" and refl).
+-- (Fre, Ita "avoir", "être", and refl; Spa only "haber" and refl).
 
   param VType ;
 
 -- Derivatively, if/when the participle agrees to the subject.
--- (Fre "elle est partie", Ita "lei è partita", Spa not)
+-- (Fre "elle est partie", Ita "lei è partita", Spa not)
 
   oper partAgr   : VType -> VPAgr ;
 
@@ -89,7 +89,7 @@ interface DiffRomance = open CommonRomance, Prelude in {
   relPron   : Bool => AAgr => Case => Str ;
   pronSuch  : AAgr => Str ;
 
-  partQIndir : Str ; -- ce, ciò
+  partQIndir : Str ; -- ce, ciò
 
   reflPron : Number -> Person -> Case -> Str ;
 --  argPron  : Gender -> Number -> Person -> Case -> Str ;
@@ -113,7 +113,7 @@ oper
     clit2  : Str ;                      -- lui
     clit3  : Clit3 ;                    -- y en
     isNeg  : Bool ;                     -- includes a negative element, such as "rien"
-    comp   : Agr => Str ;               -- content(e) ; à ma mère ; hier
+    comp   : Agr => Str ;               -- content(e) ; à ma mère ; hier
     ext    : RPolarity => Str ;         -- que je dors / que je dorme
     } ;
 

lib/src/romance/ResRomance.gf

@@ -1,10 +1,10 @@
 --1 Romance auxiliary operations.
 --
 
---# -coding=latin1
 interface ResRomance = DiffRomance ** open CommonRomance, Prelude in {
 
 flags optimize=all ;
+    coding=utf8 ;
 
 --2 Constants uniformly defined in terms of language-dependent constants
 
@@ -124,7 +124,7 @@ oper
 
 
 -- Agreement with preceding relative or interrogative: 
--- "les femmes que j'ai aimées"
+-- "les femmes que j'ai aimées"
 
   insertAgr : AAgr -> VP -> VP = \ag,vp -> { 
     s     = vp.s ;
@@ -292,9 +292,9 @@ oper
 -- p -cat=Cl -tr "la femme te l' envoie"
 -- PredVP (DetCN (DetSg DefSg NoOrd) (UseN woman_N)) 
 --  (ComplV3 send_V3 (UsePron he_Pron) (UsePron thou_Pron))
--- la femme te l' a envoyé
+-- la femme te l' a envoyé
 --
 -- p -cat=Cl -tr "la femme te lui envoie"
 -- PredVP (DetCN (DetSg DefSg NoOrd) (UseN woman_N)) 
 --   (ComplV3 send_V3 (UsePron thou_Pron) (UsePron he_Pron))
--- la femme te lui a envoyée
+-- la femme te lui a envoyée

lib/src/romance/SentenceRomance.gf

@@ -1,8 +1,8 @@
---# -coding=latin1
 incomplete concrete SentenceRomance of Sentence = 
   CatRomance ** open Prelude, CommonRomance, ResRomance in {
 
   flags optimize=all_subs ;
+    coding=utf8 ;
 
   lin
     PredVP np vp = mkClausePol np.isNeg (np.s ! Nom).comp np.hasClit np.isPol np.a vp ;
@@ -17,14 +17,14 @@ incomplete concrete SentenceRomance of Sentence =
 
 {-
     SlashVP np vps = 
-      -- agreement decided afterwards: la fille qu'il a trouvée
+      -- agreement decided afterwards: la fille qu'il a trouvée
       {s = \\agr => 
           let 
             vp = case <vps.c2.c, vps.c2.isDir> of {
-              <Acc,True> => insertAgr agr vps ;                         -- la fille qu'il a trouvée decided here
+              <Acc,True> => insertAgr agr vps ;                         -- la fille qu'il a trouvée decided here
               _ => vps
               }
-          in (mkClausePol np.isNeg (np.s ! Nom).comp np.hasClit np.isPol np.a vp).s ;  -- à qui montre-t-il sa maison 
+          in (mkClausePol np.isNeg (np.s ! Nom).comp np.hasClit np.isPol np.a vp).s ;  -- à qui montre-t-il sa maison 
        c2 = vps.c2                                                                      -- np.hasClit decides inversion
       } ;
 -}
@@ -49,7 +49,7 @@ incomplete concrete SentenceRomance of Sentence =
         let
 
           vp : ResRomance.VP = case <vps.c2.c, vps.c2.isDir> of {
-              <Acc,True> => insertAgr agr0 vps ;    -- la fille qu'il a trouvée is decided here
+              <Acc,True> => insertAgr agr0 vps ;    -- la fille qu'il a trouvée is decided here
               _ => vps
               } ;