msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

Merge pull request #215 from inariksit/spanish

Browse Source 
(Spa) small fixes
This commit is contained in:
Inari Listenmaa
2019-04-02 17:26:07 +02:00
committed by GitHub
parent 70e1292013 bad6119baa
commit bb178fc2c8
3 changed files with 21 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/spanish/DictSpa.gf
View File

@@ -25472,7 +25472,7 @@ lin madera_tierna_N = mkAN madera_N "tierna" ; -- to-check segmentation
lin madoqua_N = mkN "madoqua" ; lin madoqua_N = mkN "madoqua" ;
lin madrastra_N = mkN "madrastra" ; lin madrastra_N = mkN "madrastra" ;
lin madraza_N = mkN "madraza" ; lin madraza_N = mkN "madraza" ;
lin madre_N = mkN "madre" ; lin madre_N = mkN "madre" feminine ;
lin madre_patria_N = mkAN madre_N "patria" ; -- to-check segmentation lin madre_patria_N = mkAN madre_N "patria" ; -- to-check segmentation
lin madre_politica_N = mkAN madre_N "politica" ; -- to-check segmentation lin madre_politica_N = mkAN madre_N "politica" ; -- to-check segmentation
lin madreselva_N = mkN "madreselva" ; lin madreselva_N = mkN "madreselva" ;
@@ -27581,7 +27581,7 @@ lin mugriento_A = mkA "mugriento" ;
lin mugriento_N = mkN "mugriento" ; lin mugriento_N = mkN "mugriento" ;
lin mugroso_A = mkA "mugroso" ; lin mugroso_A = mkA "mugroso" ;
lin muitú_N = mkN "muitú" ; lin muitú_N = mkN "muitú" ;
lin mujer_N = mkN "mujer" ; lin mujer_N = mkN "mujer" feminine ;
lin mujer_de_negocios_N = mkN mujer_N "de negocios" ; lin mujer_de_negocios_N = mkN mujer_N "de negocios" ;
lin mujer_del_jeque_N = mkN mujer_N "del jeque" ; lin mujer_del_jeque_N = mkN mujer_N "del jeque" ;
lin mujer_fatal_N = mkAN mujer_N "fatal" ; -- to-check segmentation lin mujer_fatal_N = mkAN mujer_N "fatal" ; -- to-check segmentation

4
src/spanish/ParadigmsSpa.gf
View File

@@ -156,7 +156,7 @@ oper
-- Some adjectives need the feminine form separately. -- Some adjectives need the feminine form separately.
mkA : (espanol,espanola : Str) -> A ; mkA : (español,española : Str) -> A ;
-- One-place adjectives compared with "mas" need five forms in the worst -- One-place adjectives compared with "mas" need five forms in the worst
-- case (masc and fem singular, masc plural, adverbial). -- case (masc and fem singular, masc plural, adverbial).
@@ -182,6 +182,8 @@ oper
prefixA : A -> A ; -- adjective before noun (default after noun) prefixA : A -> A ; -- adjective before noun (default after noun)
invarA : Str -> A -- invariable adjective
= \s -> mkA s s s s s ;
--3 Two-place adjectives --3 Two-place adjectives
-- --

3
src/spanish/StructuralSpa.gf
View File

@@ -10,7 +10,7 @@ lin
-- have_not_V3 -- have_not_V3
above_Prep = mkPrep "sobre" ; above_Prep = mkPrep "sobre" ;
after_Prep = {s = ["despues"] ; c = MorphoSpa.genitive ; isDir = False} ; after_Prep = mkPrep "después" genitive ;
all_Predet = { all_Predet = {
s = \\a,c => prepCase c ++ aagrForms "todo" "toda" "todos" "todas" ! a ; s = \\a,c => prepCase c ++ aagrForms "todo" "toda" "todos" "todas" ! a ;
c = Nom ; c = Nom ;
@@ -178,4 +178,3 @@ lin
lin language_title_Utt = ss "español" ; lin language_title_Utt = ss "español" ;
} }