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
|
--2 Nouns
|
||||||
--
|
--
|
||||||
-- The following macro is useful for creating the forms of number-dependent
|
|
||||||
-- tables, such as common nouns.
|
|
||||||
-- gcc M2.3
|
|
||||||
oper
|
oper
|
||||||
numForms : (_,_ : Str) -> Number => Str = \vi, vins ->
|
|
||||||
table {Sg => vi ; Pl => vins} ;
|
|
||||||
|
|
||||||
nomCep : Str -> Number => Str = \cep ->
|
nomCep : Str -> Number => Str = \cep ->
|
||||||
numForms cep (cep + "s") ;
|
numForms cep (cep + "s") ;
|
||||||
|
|
||||||
|
|||||||
@@ -18,15 +18,7 @@ resource MorphoIta = CommonRomance, ResIta **
|
|||||||
|
|
||||||
--2 Nouns
|
--2 Nouns
|
||||||
--
|
--
|
||||||
-- The following macro is useful for creating the forms of number-dependent
|
|
||||||
-- tables, such as common nouns.
|
|
||||||
|
|
||||||
oper
|
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
|
nomVino : Str -> Number => Str = \vino -> let {vin = Predef.tk 1 vino} in
|
||||||
numForms vino (vin + "i") ;
|
numForms vino (vin + "i") ;
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user