From 33ef39807667b33dfd25749569947ea388dc29b3 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Thu, 24 Feb 2011 08:20:55 +0000
Subject: [PATCH] that_Subj in Finnish

---
 lib/src/finnish/ResFin.gf        | 2 +-
 lib/src/finnish/StructuralFin.gf | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/src/finnish/ResFin.gf b/lib/src/finnish/ResFin.gf
index e8dc9c050..5176d2433 100644
--- a/lib/src/finnish/ResFin.gf
+++ b/lib/src/finnish/ResFin.gf
@@ -298,7 +298,7 @@ oper
     } ;
 
   ClausePlus : Type = {
-    s : Tense => Anteriority => Polarity => {subj,fin,inf,compl,adv,ext : HStr}
+    s : Tense => Anteriority => Polarity => {subj,fin,inf,compl,adv,ext : Str ; qp : Bool}
     } ;
 
   mkClause : (Polarity -> Str) -> Agr -> VP -> Clause = 
diff --git a/lib/src/finnish/StructuralFin.gf b/lib/src/finnish/StructuralFin.gf
index 3f5919396..64f28e459 100644
--- a/lib/src/finnish/StructuralFin.gf
+++ b/lib/src/finnish/StructuralFin.gf
@@ -108,6 +108,7 @@ concrete StructuralFin of Structural = CatFin **
           } ;
     s2 = [] ; isNum,isPoss = False ; isDef = True ; 
     } ;
+  that_Subj = ss "että" ;
   there_Adv = ss "siellä" ; --- tuolla
   there7to_Adv = ss "sinne" ;
   there7from_Adv = ss "sieltä" ;