forked from GitHub/gf-core
fix to scandinavian
This commit is contained in:
22
lib/src/scandinavian/TenseScand.gf
Normal file
22
lib/src/scandinavian/TenseScand.gf
Normal file
@@ -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
|
||||
;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user