From 9b0f5ea449017cde768ba319ceca4c5f468e6fe0 Mon Sep 17 00:00:00 2001
From: "kr.angelov" <kr.angelov@gmail.com>
Date: Fri, 1 Nov 2013 10:58:52 +0000
Subject: [PATCH] ExtraEng.MkVPS should add the extra position field

---
 lib/src/english/ExtraEng.gf | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/src/english/ExtraEng.gf b/lib/src/english/ExtraEng.gf
index 0ff9f7a94..b20c980fa 100644
--- a/lib/src/english/ExtraEng.gf
+++ b/lib/src/english/ExtraEng.gf
@@ -79,7 +79,7 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
             let 
               verb = vp.s ! t.t ! t.a ! p.p ! ODir ! a ;
               verbf = verb.aux ++ verb.adv ++ verb.fin ++ verb.inf ;
-            in t.s ++ p.s ++ vp.ad ++ verbf ++ vp.p ++ vp.s2 ! a
+            in t.s ++ p.s ++ vp.ad ++ verbf ++ vp.p ++ vp.s2 ! a ++ vp.ext
       } ;
 
     ConjVPS = conjunctDistrTable Agr ;