1
0
forked from GitHub/gf-core

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

Also add flags coding=utf8 to silence warnings.
This commit is contained in:
hallgren
2014-08-19 19:42:05 +00:00
parent efcec8e7e9
commit be301d8a5e
135 changed files with 2828 additions and 2810 deletions

View File

@@ -1,5 +1,4 @@
--# -path=.:../romance:../common:../abstract:../../prelude
--# -coding=latin1
--1 Catalan Lexical Paradigms
--
@@ -35,7 +34,7 @@ resource ParadigmsCat =
flags
optimize=all ;
-- coding = utf8 ;
coding = utf8 ;
--2 Parameters
--
@@ -93,11 +92,11 @@ oper
--3 Compound nouns
--
-- Some nouns are ones where the first part is inflected as a noun but
-- the second part is not inflected. e.g. "número de telèfon".
-- the second part is not inflected. e.g. "número de telèfon".
-- They could be formed in syntax, but we give a shortcut here since
-- they are frequent in lexica.
compN : N -> Str -> N ; -- compound, e.g. "número" + "de telèfon"
compN : N -> Str -> N ; -- compound, e.g. "número" + "de telèfon"
--3 Relational nouns
@@ -112,9 +111,9 @@ oper
deN2 : N -> N2 ; -- relation with genitive
aN2 : N -> N2 ; -- relation with dative
-- Three-place relational nouns ("la connexió de x a y") need two prepositions.
-- Three-place relational nouns ("la connexió de x a y") need two prepositions.
mkN3 : N -> Prep -> Prep -> N3 ; -- e.g. connexió + genitive + dative
mkN3 : N -> Prep -> Prep -> N3 ; -- e.g. connexió + genitive + dative
--3 Relational common noun phrases
@@ -194,7 +193,7 @@ oper
mkV : overload {
-- Regular verbs are ones inflected like "cantar", "perdre", "tÈmer", "perdre", "servir", "dormir"
-- Regular verbs are ones inflected like "cantar", "perdre", "tÈmer", "perdre", "servir", "dormir"
-- The regular verb function works for models I, IIa, IIb and IIa
-- The module $BeschCat$ gives the complete set of "Bescherelle" conjugations.
@@ -332,7 +331,7 @@ oper
{s = table {Posit => a.s ! Posit ; _ => b.s ! Posit} ;
isPre = a.isPre ; lock_A = <>} ;
compADeg a =
{s = table {Posit => a.s ! Posit ; _ => \\f => "més" ++ a.s ! Posit ! f} ;
{s = table {Posit => a.s ! Posit ; _ => \\f => "més" ++ a.s ! Posit ! f} ;
isPre = a.isPre ;
lock_A = <>} ;
regADeg a = compADeg (regA a) ;
@@ -341,18 +340,18 @@ oper
mkAdV x = ss x ** {lock_AdV = <>} ;
mkAdA x = ss x ** {lock_AdA = <>} ;
regV x = -- cantar, perdre, témer, dormir
regV x = -- cantar, perdre, témer, dormir
case (Predef.dp 3 x) of {
--regular changes in stem
"iar" => canviar_16 x ; --esglaiar with non-smart paradigm
"jar" => envejar_48 x ;
"çar" => començar_22 x ;
"çar" => començar_22 x ;
"gir" => fugir_58 x ;
"ure" => beure_11 x ;
"xer" => créixer_33 x ; --conèixer,aparèixer with regAltV
"xer" => créixer_33 x ; --conèixer,aparèixer with regAltV
_ + "re" => perdre_83 x ;
_ + "er" => verbEr x ; --handles accents in infinitives and c/ç, g/j
_ + "er" => verbEr x ; --handles accents in infinitives and c/ç, g/j
_ + "ir" => dormir_44 x ; --inchoative verbs with regAltV
_ + "ur" => dur_45 x ;
_ => cantar_15 x } ;
@@ -372,7 +371,7 @@ oper
<_+"re",_+"ig"> => veure_118 x ;
<_+"ar",_+"ig"> => anar_4 x ;
<"xer" ,_+ "c"> => conèixer_27 x ; --créixer, merèixer with regV
<"xer" ,_+ "c"> => conèixer_27 x ; --créixer, merèixer with regV
<_+"er",_+ "c"> => valer_114 x ;
<_+"re",_+ "c"> => doldre_42 x ; --participles of type dolgut
--for absolt, pres, ... use mk3V
@@ -398,19 +397,19 @@ oper
<"rir", _+"ixo",_+"rt"> => cobrir_20 x ; --cob|rir cob|ert
<_+"ir",_+"ixo",_+"rt"> => complir_25 x ; --compl|ir compl|ert
<_+"ir",_+"ixo",_+"ït"> => lluir_64 x ; --lluir lluïm lluït
<_+"ir",_+"ixo",_+"ït"> => lluir_64 x ; --lluir lluïm lluït
<"dre",_,"nut"> => vendre_116 x ;
<_+"re",_+"c",_+"t"> => absoldre_1 x ; --c in sgP1 and subj, not in part
<_+"re",_,_+"es"> => prendre_87 x ;
<_+"re",_,_+"ès"> => atendre_8 x ;
<_+"re",_,_+"ès"> => atendre_8 x ;
<_+"re",_,_+"as"> => raure_91 x ;
<_+"re",_,_+"às"> => romandre_97 x ;
<_+"re",_,_+"às"> => romandre_97 x ;
<_+"re",_,_+"os"> => cloure_19 x ;
<_+"re",_,_+"ós"> => confondre_28 x ;
<_+"re",_,_+"òs"> => recloure_93 x ;
<_+"re",_,_+"ós"> => confondre_28 x ;
<_+"re",_,_+"òs"> => recloure_93 x ;
<_,_,_> => regAltV x y } ;