From 7afbad405d4ab2ca633c43d43124728bc13b4e5e Mon Sep 17 00:00:00 2001 From: malin Date: Wed, 9 Nov 2011 20:06:59 +0000 Subject: [PATCH] fix to scandinavian --- lib/src/scandinavian/TenseScand.gf | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 lib/src/scandinavian/TenseScand.gf diff --git a/lib/src/scandinavian/TenseScand.gf b/lib/src/scandinavian/TenseScand.gf new file mode 100644 index 000000000..a1add77e2 --- /dev/null +++ b/lib/src/scandinavian/TenseScand.gf @@ -0,0 +1,22 @@ +incomplete concrete TenseScand of Tense = + CatScand [Tense,Temp], TenseX [Ant,Pol,AAnter,ASimul,PNeg,PPos] ** + open ResScand, CommonScand in { + + lin + + TTAnt t a = {s = a.s ++ t.s ; a = a.a ; t = t.t} ; + TPres = {s = []} ** {t = SPres} ; + TPast = {s = []} ** {t = SPast} ; --# notpresent + TFut = {s = []} ** {t = SFut} ; --# notpresent + TCond = {s = []} ** {t = SCond} ; --# notpresent + +param + STense = + SPres + | SPast --# notpresent + | SFut --# notpresent + | SFutKommer --# notpresent + | SCond --# notpresent + ; + +}