some bug fixes in Scand and Fin

2013-11-03 11:37:08 +00:00
parent a0380013ba
commit 01a98d9a39
4 changed files with 9 additions and 8 deletions
--- a/lib/src/finnish/SentenceFin.gf
+++ b/lib/src/finnish/SentenceFin.gf
@@ -12,7 +12,7 @@ concrete SentenceFin of Sentence = CatFin ** open Prelude, ResFin, StemFin in {
      s = \\pol,agr => 
        let 
          verb  = vp.s ! VIImper ! Simul ! pol ! agr ;
-          compl = vp.s2 ! False ! pol ! agr ++ vp.ext  --- False = like inf (osta auto)
+          compl = vp.s2 ! False ! pol ! agr ++ vp.adv ! pol ++ vp.ext  --- False = like inf (osta auto)
        in
        verb.fin ++ verb.inf ++ compl ;
    } ;