diff options
| author | krasimir <krasimir@chalmers.se> | 2008-11-07 09:41:59 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2008-11-07 09:41:59 +0000 |
| commit | c82fa213ac6128baa04a6328489e58f085df99c2 (patch) | |
| tree | 4ef0a22e3c3c1ba658e6b6c77983419c5ce66d5d /next-lib | |
| parent | 4a1bfac84b24b17dd973c31bade986762a7b65b6 (diff) | |
add TTAnt in CatBul
Diffstat (limited to 'next-lib')
| -rw-r--r-- | next-lib/src/bulgarian/CatBul.gf | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/next-lib/src/bulgarian/CatBul.gf b/next-lib/src/bulgarian/CatBul.gf index 6c467d3ce..6888dd511 100644 --- a/next-lib/src/bulgarian/CatBul.gf +++ b/next-lib/src/bulgarian/CatBul.gf @@ -115,6 +115,8 @@ concrete CatBul of Cat = open ResBul, Prelude, (R = ParamX) in { -- Tense, Anteriority and Polarity functions
lin
+ TTAnt t a = {s = t.s ++ a.s ; t = t.t ; a = a.a} ;
+
PPos = {s = []} ** {p = R.Pos} ;
PNeg = {s = []} ** {p = R.Neg} ;
TPres = {s = []} ** {t = R.Pres} ;
|