forked from GitHub/gf-core
updates to ParseEng and ParseEngBul
This commit is contained in:
@@ -63,4 +63,11 @@ concrete AdjectiveBul of Adjective = CatBul ** open ResBul, Prelude in {
|
||||
adv = a.adv ;
|
||||
isPre = True
|
||||
} ;
|
||||
|
||||
AdvAP ap adv = {
|
||||
s = \\aform => ap.s ! aform ++ adv.s ;
|
||||
adv = ap.adv ++ adv.s;
|
||||
isPre = False
|
||||
} ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user