mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-02 07:42:50 -06:00
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