From bd75a0529c810f5b410b5b0ea574c3c8f5c2f1ab Mon Sep 17 00:00:00 2001
From: aarneranta <aarne@chalmers.se>
Date: Fri, 22 Mar 2024 13:51:20 +0100
Subject: [PATCH] Ara.ExtAdvS

---
 src/arabic/SentenceAra.gf | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/arabic/SentenceAra.gf b/src/arabic/SentenceAra.gf
index 0ee3a32aa..ad64b05c1 100644
--- a/src/arabic/SentenceAra.gf
+++ b/src/arabic/SentenceAra.gf
@@ -71,4 +71,5 @@ concrete SentenceAra of Sentence = CatAra ** open
     UseSlash t p cls = UseCl t p (complClSlash cls) ;
 
     AdvS adv s = s ** {s = \\o => adv.s ++ s.s ! o} ;
+    ExtAdvS adv s = s ** {s = \\o => adv.s ++ s.s ! o} ;
 }