msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

mkA revised

Browse Source
This commit is contained in:
ra.monique
2009-03-04 11:12:06 +00:00
parent 3d2d48c2ef
commit 4a7ad5ca9f
1 changed files with 386 additions and 380 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
next-lib/src/romanian/ParadigmsRon.gf
View File

@@ -222,6 +222,12 @@ mkNR s = mkIn (mkNomNeut s) ** {lock_N = <>} ;
--------------------------------------------------------------------
mkA = overload {
mkA : Str -> Str -> Str -> Str -> Str -> A = mk5A ;--worst case -- all 4 forms are needed + form for adverb
mkA : Str -> Str -> Str -> Str -> A = mk4A; -- 4 forms are needed
mkA : Str -> A = regA; -- regular adjectives
};
mk4A : Str -> Str -> Str -> Str -> A;
mk4A a b c d =
let adj = mkAdjSpec a b c d in