1
0
forked from GitHub/gf-core

smart paradigm for refl verbs ending "se" in Spa

This commit is contained in:
aarne
2014-04-08 20:28:27 +00:00
parent 70dddec7e1
commit 2ca8024ba4
2 changed files with 5 additions and 2 deletions

View File

@@ -503,7 +503,10 @@ oper
prefixA = prefA ;
mkV = overload {
mkV : (pagar : Str) -> V = regV ;
mkV : (pagar : Str) -> V = \s -> case s of {
far + "se" => reflV (regV far) ;
_ => regV s
} ;
mkV : (mostrar,muestro : Str) -> V = regAltV ;
mkV : Verbum -> V = verboV ;

View File

@@ -19472,7 +19472,7 @@ lin to_Adv = mkAdv "además" ; -- status=guess
lin to_Prep = S.to_Prep ; -- comment=CHECKED
lin toad_N = mkN "sapo" ; -- status=guess
lin toadstool_N = mkN "seta venenosa" ; -- status=guess
lin toady_N = mkN "arrastrado" | mkN "[Colombia] cepillero" | mkN "[River Plate region] chupamedias" | mkN " lambiscón" | mkN "lameculos" | mkN "pelotillero" | mkN "sobon" | mkN "[Miami" | mkN "Latin America] come mierda" | mkN "[Peru] franelero" ; -- status=guess status=guess status=guess status=guess status=guess status=guess status=guess status=guess status=guess status=guess
lin toady_N = mkN "arrastrado" ;
lin toast_N = mkN "brindis" masculine ; -- status=guess
lin toast_V = mkV (mkV "brindar") "por" ; -- status=guess, src=wikt
lin toast_V2 = mkV2 (mkV (mkV "brindar") "por") ; -- status=guess, src=wikt