GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-28 01:18:57 -06:00
Code Issues Packages Projects Releases Wiki Activity

temporarily (?) removed the ?? markings from Slo and Cze smart paradigms

Browse Source
This commit is contained in:
Aarne Ranta
2020-04-30 11:50:10 +02:00
parent 9a45ab3889
commit 115be8c68d
2 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/czech/ResCze.gf
View File

@@ -86,7 +86,7 @@ oper
ul + "ice" => ul + "ic" ; ul + "ice" => ul + "ic" ;
koleg + "yně" => koleg + "yň" ; koleg + "yně" => koleg + "yň" ;
ruz + "e" => ruz + "í" ; ruz + "e" => ruz + "í" ;
_ => "??" + s -- Predef.error ("shortFemPlGen does not apply to" ++ s) _ => "" + s -- Predef.error ("shortFemPlGen does not apply to" ++ s)
} ; } ;
--------------- ---------------
@@ -155,7 +155,7 @@ oper
<Neutr, _ + "e" , _+"ete"> => declKURE ; <Neutr, _ + "e" , _+"ete"> => declKURE ;
<Neutr, _ + "e" , _ + "e"> => declMORE ; <Neutr, _ + "e" , _ + "e"> => declMORE ;
<Neutr, _ + "í" , _ + "í"> => declSTAVENI ; <Neutr, _ + "í" , _ + "í"> => declSTAVENI ;
_ => (\s -> declSTROJ ("??" + s)) -- Predef.error ("cannot infer declension type for" ++ nom ++ gen) _ => (\s -> declSTROJ ("" + s)) -- Predef.error ("cannot infer declension type for" ++ nom ++ gen)
} }
in decl nom ; in decl nom ;
@@ -172,7 +172,7 @@ oper
_ + "ce" => declSOUDCE s ; _ + "ce" => declSOUDCE s ;
_ + "e" => declMORE s ; _ + "e" => declMORE s ;
_ + "í" => declSTAVENI s ; _ + "í" => declSTAVENI s ;
_ => declSTROJ ("??" + s) -- Predef.error ("cannot guess declension type for" ++ s) _ => declSTROJ ("" + s) -- Predef.error ("cannot guess declension type for" ++ s)
} ; } ;
-- the traditional declensions, in both CEG and Wiki -- the traditional declensions, in both CEG and Wiki

6
src/slovak/ResSlo.gf
View File

@@ -120,7 +120,7 @@ oper
<Neutr, _ + ("a"|"ä") , _ + "iec"> => dievceniecN snom ; <Neutr, _ + ("a"|"ä") , _ + "iec"> => dievceniecN snom ;
<Neutr, _ + ("a"|"ä") , _ > => dievcaN snom ; <Neutr, _ + ("a"|"ä") , _ > => dievcaN snom ;
_ => dubN ("??"+snom) ** {pgen = pgen} ---- Predef.error ("cannot infer declension type for" ++ snom ++ pgen) _ => dubN (""+snom) ** {pgen = pgen} ---- Predef.error ("cannot infer declension type for" ++ snom ++ pgen)
} ** {pgen = pgen ; g = g} ; } ** {pgen = pgen ; g = g} ;
-- the "smartest" one-argument mkN -- the "smartest" one-argument mkN
@@ -140,7 +140,7 @@ oper
_ + "e" => srdceN snom ; _ + "e" => srdceN snom ;
_ + "ä" => dievcaN snom ; _ + "ä" => dievcaN snom ;
_ => dubN ("??"+snom) ---- Predef.error ("cannot guess declension type for" ++ snom) _ => dubN (""+snom) ---- Predef.error ("cannot guess declension type for" ++ snom)
} ; } ;
@@ -497,7 +497,7 @@ adjFormsAdjective : AdjForms -> Adjective = \afs -> {
_ + "í" => cudziA s ; _ + "í" => cudziA s ;
_ + "i" => rydziA s ; _ + "i" => rydziA s ;
_ + ("ov"|"in") => otcovA s ; _ + ("ov"|"in") => otcovA s ;
_ => otcovA ("??"+s) ---- Predef.error ("no mkA for" ++ s) _ => otcovA (""+s) ---- Predef.error ("no mkA for" ++ s)
} ; } ;