GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-24 02:12:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

Fixed regular Adj ending in 'r' in Cat

Browse Source
This commit is contained in:
jordi.saludes
2010-05-29 14:54:59 +00:00
parent cad022019a
commit 46bbbbf9b7
2 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/src/catalan/LexiconCat.gf
View File

@@ -91,7 +91,7 @@ lin
girl_N = regFN "noia" ; girl_N = regFN "noia" ;
glove_N = regMN "guant" ; glove_N = regMN "guant" ;
gold_N = regMN "or" ; gold_N = regMN "or" ;
good_A = mkADeg (mkA "bó" "bona" "bons" "bones" "bonament") (regA "millor") ; ---- adv? good_A = mkADeg (mkA "bo" "bona" "bons" "bones" "bonament") (regA "millor") ; ---- adv?
go_V = (verbV (anar_4 "anar")) ; go_V = (verbV (anar_4 "anar")) ;
green_A = regADeg "verd" ; green_A = regADeg "verd" ;
harbour_N = regMN "port" ; harbour_N = regMN "port" ;

1
lib/src/catalan/MorphoCat.gf
View File

@@ -120,6 +120,7 @@ oper
mkAdjReg : Str -> Adj = \prim -> mkAdjReg : Str -> Adj = \prim ->
case last prim of { case last prim of {
"e"|"u"|"o" => adjFondo prim ; "e"|"u"|"o" => adjFondo prim ;
"l"|"r" => adjFidel prim ;
_ => adjPrim prim _ => adjPrim prim
} ; } ;