German preposition contractions

2010-05-26 09:37:17 +00:00
parent 4089242edb
commit c7ff8114b4
17 changed files with 166 additions and 104 deletions
--- a/lib/src/german/MakeStructuralGer.gf
+++ b/lib/src/german/MakeStructuralGer.gf
@@ -17,7 +17,7 @@ oper
        c = noCase ;
        a = PAgNone
        } ;     
-    mkPredet : A -> Str -> Case -> Bool -> Number -> Predet = \a,p,c,b,n ->
+    mkPredet : A -> Str -> PCase -> Bool -> Number -> Predet = \a,p,c,b,n ->
      lin Predet {
        s = appAdj a ; 
        c = {p = p ; k = PredCase c} ;