mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-10-30 10:33:18 -06:00
bugfixes from Codex
This commit is contained in:
1 parent
4bbc7c7d59
commit
a557b49c95
8 files changed
+37
-22
No files matched your search
@@ -25,9 +25,10 @@ concrete SentenceBul of Sentence = CatBul ** open Prelude, ResBul in {
|
||||
VPhrasal Dat => personalClitics agr ! Dat++vp.clitics;
|
||||
VPhrasal c => vp.clitics++personalClitics agr ! c
|
||||
}
|
||||
in case orPol p vp.p of {
|
||||
Pos => vp.ad.s ++ verb Perf ++ clitic ;
|
||||
Neg => "не" ++ vp.ad.s ++ clitic ++ verb Imperf
|
||||
in case <p,vp.p> of {
|
||||
<Pos,Pos> => vp.ad.s ++ verb Perf ++ clitic ;
|
||||
<Pos,Neg> => vp.ad.s ++ "не" ++ clitic ++ verb Imperf ;
|
||||
_ => "не" ++ vp.ad.s ++ clitic ++ verb Imperf
|
||||
} ++ compl ;
|
||||
} ;
|
||||
|
||||
|
||||
Reference in new issue
Block a user