From 42f48621f0026781b3f55e5d882748aa56d84722 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Thu, 1 Sep 2011 08:14:27 +0000
Subject: [PATCH] ExtAdvS in Pol

---
 src/polish/SentencePol.gf | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/polish/SentencePol.gf b/src/polish/SentencePol.gf
index 658a5dacb..d4397b38e 100644
--- a/src/polish/SentencePol.gf
+++ b/src/polish/SentencePol.gf
@@ -74,6 +74,7 @@ lin
     
 --     AdvS     : Adv -> S  -> S ;            -- today, I will go home
     AdvS adv s = { s = adv.s ++ s.s };
+    ExtAdvS adv s = { s = adv.s ++ "," ++ s.s };
     
 --     SlashPrep : Cl -> Prep -> ClSlash ;         -- (with whom) he walks 
     SlashPrep c p = { s=c.s; c=p };