diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-11-15 11:24:22 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-11-15 11:24:22 +0000 |
| commit | 79c9ec116a0f5580a7965247e045ecfe59281e20 (patch) | |
| tree | 2c57c90833ab20240bfb7fb6a8c519bf4aceb015 /next-lib/src/norwegian | |
| parent | 3ff57f6184963acde7f3cc2dcf0638c0e819929a (diff) | |
new CAdv type in Dan and Nor
Diffstat (limited to 'next-lib/src/norwegian')
| -rw-r--r-- | next-lib/src/norwegian/StructuralNor.gf | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/next-lib/src/norwegian/StructuralNor.gf b/next-lib/src/norwegian/StructuralNor.gf index 4e0814915..b480ff1a1 100644 --- a/next-lib/src/norwegian/StructuralNor.gf +++ b/next-lib/src/norwegian/StructuralNor.gf @@ -1,5 +1,5 @@ concrete StructuralNor of Structural = CatNor ** - open MorphoNor, ParadigmsNor, Prelude in { + open MorphoNor, ParadigmsNor, (X = ConstructX), Prelude in { flags optimize=all ; @@ -44,9 +44,9 @@ concrete StructuralNor of Structural = CatNor ** MorphoNor.mkNP "jeg" "meg" (variants {"min" ; "mi"}) "mit" "mine" SgUtr P1 ; --- mi in_Prep = ss "i" ; it_Pron = MorphoNor.regNP "det" "dets" SgNeutr ; - less_CAdv = ss "mindre" ; + less_CAdv = X.mkCAdv "mindre" conjThan ; many_Det = {s = \\_,_ => "mange" ; n = Pl ; det = DDef Indef} ; - more_CAdv = ss "mer" ; + more_CAdv = X.mkCAdv "mer" conjThan ; most_Predet = {s = gennumForms ["den meste"] ["det meste"] ["de fleste"]} ; much_Det = {s = \\_,_ => "mye" ; n = Pl ; det = DDef Indef} ; must_VV = |