bug fix in Dutch infinitive vp

lib/doc/status.html

@@ -35,7 +35,7 @@ are marked in the table
 </TR>
 <TR>
 <TD>Afr</TD>
-<TD>-</TD>
+<TD>+</TD>
 <TD>-</TD>
 <TD>-</TD>
 <TD>-</TD>

lib/doc/status.txt

@@ -13,7 +13,7 @@ are marked in the table
 
 
 || Lang | Darcs | Mini | Parad | Lex | Lang | API | Symb | Irreg | Dict | authors       ||
-| Afr   | -     | -    | -     | -   | -    | -   | -    | -     | -    | *LPs,LPj
+| Afr   | +     | -    | -     | -   | -    | -   | -    | -     | -    | *LPs,LPj
 | Amh   | +     | +    | ++    | +   | +    | -   | -    | -     | -    | *MK
 | Ara   | +     | +    | +     | +   | -    | -   | -    | -     | -    | AD
 | Bul   | +     | +    | +     | +   | +    | +   | +    | +     | +    | *KA

lib/src/dutch/ResDut.gf

@@ -598,7 +598,7 @@ param
 
   infVP : Bool -> VP -> ((Agr => Str) * Str * Str) = \isAux, vp -> 
     <
-     \\agr => vp.n2 ! agr ++  vp.a2,
+     \\agr => vp.n0 ! agr ++  vp.n2 ! agr ++  vp.a2,
      vp.a1 ! Pos ++ 
      if_then_Str isAux [] "te" ++ vp.s.s ! VInf,
      vp.inf.p1 ++ vp.ext

lib/src/parse/ParseEng.gf

@@ -127,8 +127,8 @@ lin
       a = agrP3 Sg
       } ;
 
-    CompCN cn = { s = \\a => let n = (fromAgr a).n
-		              in IndefArt.s ! False ! n ++ cn.s ! n ! Acc} ;
+--    CompCN cn = { s = \\a => let n = (fromAgr a).n
+--		              in IndefArt.s ! False ! n ++ cn.s ! n ! Acc} ;
 
 -- Lexical additions
 
@@ -154,7 +154,7 @@ lin
 	VVPastNeg => ["shouldn't have"] ;
 	VVPresNeg => "shouldn't"
 	} ;
-      isAux = True
+      typ = VVAux
     } ;
     several_Det = mkDeterminer plural "several" ;
 

lib/src/parse/ParseEngAbs.gf

@@ -27,7 +27,7 @@ fun NumOfNP : Num -> NP -> NP ; -- ten of the dogs
 fun CAdvNP  : CAdv -> CN -> NP -> NP ; -- more wine than the professor
 fun CAdvSSlash  : CAdv -> CN -> SSlash -> NP ; -- more wine than the professor drank
 
-fun CompCN : CN -> Comp ; -- "(every man is) a dog", "(all men are) dogs"
+--fun CompCN : CN -> Comp ; -- "(every man is) a dog", "(all men are) dogs"
 
 -- Lexical additions