diff options
| author | aarne <aarne@cs.chalmers.se> | 2009-04-27 13:28:47 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2009-04-27 13:28:47 +0000 |
| commit | c14a899ab49167b025c1cc744af1e9694682c1bc (patch) | |
| tree | 7f4d9748342ac4c4d20183a3fca7d62254476419 /next-lib/src/german | |
| parent | 010dee0c974f20d8ffcba5bac422e78ab2ede610 (diff) | |
have_V2 in Structural
Diffstat (limited to 'next-lib/src/german')
| -rw-r--r-- | next-lib/src/german/LexiconGer.gf | 1 | ||||
| -rw-r--r-- | next-lib/src/german/StructuralGer.gf | 4 |
2 files changed, 3 insertions, 2 deletions
diff --git a/next-lib/src/german/LexiconGer.gf b/next-lib/src/german/LexiconGer.gf index 38dfda364..61ab8dd32 100644 --- a/next-lib/src/german/LexiconGer.gf +++ b/next-lib/src/german/LexiconGer.gf @@ -96,7 +96,6 @@ lin harbour_N = reg2N "Hafen" "Häfen" masculine ; hate_V2 = dirV2 (regV "hassen") ; hat_N = reg2N "Hut" "Hüte" masculine ; - have_V2 = dirV2 IrregGer.haben_V ; hear_V2 = dirV2 (regV "hören") ; hill_N = mkN "Hügel" ; hope_VS = mkVS (regV "hoffen") ; diff --git a/next-lib/src/german/StructuralGer.gf b/next-lib/src/german/StructuralGer.gf index 723837974..a48a30143 100644 --- a/next-lib/src/german/StructuralGer.gf +++ b/next-lib/src/german/StructuralGer.gf @@ -1,6 +1,7 @@ concrete StructuralGer of Structural = CatGer ** - open MorphoGer, MakeStructuralGer, (X = ConstructX), Prelude in { + open MorphoGer, MakeStructuralGer, (X = ConstructX), + (P = ParadigmsGer), IrregGer, Prelude in { flags optimize=all ; @@ -145,5 +146,6 @@ concrete StructuralGer of Structural = CatGer ** except_Prep = mkPrep "außer" Dat ; as_CAdv = X.mkCAdv "ebenso" "wie" ; + have_V2 = P.dirV2 IrregGer.haben_V ; } |