forked from GitHub/gf-rgl
(Romance, #38) rm numForms from Morpho{Cat,Ita}
This commit is contained in:
@@ -17,13 +17,7 @@ resource MorphoCat = CommonRomance, ResCat **
|
||||
|
||||
--2 Nouns
|
||||
--
|
||||
-- The following macro is useful for creating the forms of number-dependent
|
||||
-- tables, such as common nouns.
|
||||
-- gcc M2.3
|
||||
oper
|
||||
numForms : (_,_ : Str) -> Number => Str = \vi, vins ->
|
||||
table {Sg => vi ; Pl => vins} ;
|
||||
|
||||
nomCep : Str -> Number => Str = \cep ->
|
||||
numForms cep (cep + "s") ;
|
||||
|
||||
|
||||
@@ -18,15 +18,7 @@ resource MorphoIta = CommonRomance, ResIta **
|
||||
|
||||
--2 Nouns
|
||||
--
|
||||
-- The following macro is useful for creating the forms of number-dependent
|
||||
-- tables, such as common nouns.
|
||||
|
||||
oper
|
||||
numForms : (_,_ : Str) -> Number => Str = \vino, vini ->
|
||||
table {Sg => vino ; Pl => vini} ;
|
||||
|
||||
-- For example:
|
||||
|
||||
nomVino : Str -> Number => Str = \vino -> let {vin = Predef.tk 1 vino} in
|
||||
numForms vino (vin + "i") ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user