mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-16 06:32:51 -06:00
some fixes in DictionarySwe ; in ParadigmsSwe, a compounding function mkN : Str -> N -> N
This commit is contained in:
@@ -101,6 +101,8 @@ oper
|
||||
-- such as "fotboll", just given as one argument. But compound nouns can be formed from their parts as well,
|
||||
|
||||
mkN : (regering, makt : N) -> N ; -- regeringsmakt, using the co form of regering
|
||||
|
||||
mkN : Str -> N -> N ; -- över + flöde
|
||||
} ;
|
||||
|
||||
-- The default compound form can be changed:
|
||||
@@ -365,6 +367,14 @@ oper
|
||||
co => a.co + co + "s"
|
||||
}
|
||||
} ;
|
||||
mkN : Str -> N -> N = \a,b -> lin N {
|
||||
s = \\n,d,c => a + b.s ! n ! d ! c ;
|
||||
g = b.g ;
|
||||
co = case b.co of {
|
||||
_ + "s" => a + b.co ;
|
||||
co => a + co + "s"
|
||||
}
|
||||
} ;
|
||||
} ;
|
||||
|
||||
-- The default compound form can be changed:
|
||||
|
||||
Reference in New Issue
Block a user