diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-12-17 15:41:38 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-12-17 15:41:38 +0000 |
| commit | 124738068a401b872369b8f4fb957bbdcd1bda87 (patch) | |
| tree | 1038c6c8d514a5f74ed81e7f46496104bf9385dc /next-lib/src/russian/AdjectiveRus.gf | |
| parent | cb44a12c1be3141f69e9bb9cfb4ae6abe7ac68eb (diff) | |
completed Russian grammar with missing syntax functions (marked ---- AR 17/12/2008); their effects should be checked
Diffstat (limited to 'next-lib/src/russian/AdjectiveRus.gf')
| -rw-r--r-- | next-lib/src/russian/AdjectiveRus.gf | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/next-lib/src/russian/AdjectiveRus.gf b/next-lib/src/russian/AdjectiveRus.gf index 1cd91e71e..5a977e371 100644 --- a/next-lib/src/russian/AdjectiveRus.gf +++ b/next-lib/src/russian/AdjectiveRus.gf @@ -16,6 +16,24 @@ flags coding=utf8 ; p = True
} ;
+ ---- AR 17/12/2008
+ UseComparA bolshoj =
+ {s = \\af => bolshoj.s ! Compar ! af ;
+ p = True
+ } ;
+
+ ---- AR 17/12/2008
+ CAdvAP ad ap np = let adp = ad.s in { ---- should be ad.p
+ s = \\af => ad.s ++ ap.s ! af ++ adp ++ np.s ! (mkPronForm Gen Yes NonPoss) ;
+ p = True ----?
+ } ;
+
+ ---- AR 17/12/2008
+ AdjOrd a = {
+ s = a.s ;
+ p = True ---- ?
+ } ;
+
-- $SuperlA$ belongs to determiner syntax in $Noun$.
ComplA2 vlublen tu =
|