From 4e1c1e6fe1282de833057f0c3c8306290b70d812 Mon Sep 17 00:00:00 2001
From: Krasimir Angelov <kr.angelov@gmail.com>
Date: Fri, 2 Oct 2026 09:24:00 +0200
Subject: [PATCH] fix compilation for Present

---
 src/dutch/ExtendDut.gf | 14 ++++++--------
 1 file changed, 6 insertions(+), 8 deletions(-)

diff --git a/src/dutch/ExtendDut.gf b/src/dutch/ExtendDut.gf
index c53dd62e..9bc8aa4c 100644
--- a/src/dutch/ExtendDut.gf
+++ b/src/dutch/ExtendDut.gf
@@ -1,5 +1,3 @@
---# -path=alltenses:../common:../abstract
-
 concrete ExtendDut of Extend =
   CatDut ** ExtendFunctor
    - [PastPartAP,PastPartAgentAP,PresPartAP,ProgrVPSlash,ICompAP,IAdvAdv,
@@ -41,12 +39,12 @@ lin
     isPre = notB vp.isHeavy
     } ;
 
-  PastPartAgentAP vp np = {
-    s = \\agr,af =>
-      (infClause [] agr vp APred).s ! Past ! Anter ! Pos ! Sub ++
-      "door" ++ np.s ! NPAcc ;
-    isPre = False
-    } ;
+  PastPartAgentAP vp np = { --# notpresent
+    s = \\agr,af => --# notpresent
+      (infClause [] agr vp APred).s ! Past ! Anter ! Pos ! Sub ++ --# notpresent
+      "door" ++ np.s ! NPAcc ; --# notpresent
+    isPre = False --# notpresent
+    } ; --# notpresent
 
   ProgrVPSlash vp =
     let vpi = infVP True vp in