have_V2 in Structural

This commit is contained in:
aarne
2009-04-27 13:28:47 +00:00
parent 2a235f9709
commit 06c0b57ed1
23 changed files with 22 additions and 17 deletions

View File

@@ -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") ;

View File

@@ -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 ;
}