forked from GitHub/gf-rgl
Merge pull request #160 from odanoburu/iberic-neg-imp
(Por) also bind clitic with hyphen in imperative
This commit is contained in:
@@ -58,7 +58,7 @@ instance DiffPor of DiffRomance - [chooseTA,partAgr,vpAgrSubj,vpAgrClits] = open
|
|||||||
mkImperative isPol p vp =
|
mkImperative isPol p vp =
|
||||||
\\pol,g,n => case pol of {
|
\\pol,g,n => case pol of {
|
||||||
RPos => neg.p1 ++ imper ++ bindHyphenIf refl.isRefl ++ refl.pron
|
RPos => neg.p1 ++ imper ++ bindHyphenIf refl.isRefl ++ refl.pron
|
||||||
++ bindIf hasClit ++ clit ++ compl ;
|
++ bindHyphenIf hasClit ++ clit ++ compl ;
|
||||||
RNeg _ => neg.p1 ++ refl.pron ++ clit ++ subj ++ compl
|
RNeg _ => neg.p1 ++ refl.pron ++ clit ++ subj ++ compl
|
||||||
} where {
|
} where {
|
||||||
pe = case isPol of {True => P2 ; _ => P3} ;
|
pe = case isPol of {True => P2 ; _ => P3} ;
|
||||||
|
|||||||
@@ -347,7 +347,7 @@ lin
|
|||||||
sew_V = mkV "costurar" ;
|
sew_V = mkV "costurar" ;
|
||||||
sing_V = mkV "cantar" ;
|
sing_V = mkV "cantar" ;
|
||||||
sit_V = reflV (mkV "sentar") ;
|
sit_V = reflV (mkV "sentar") ;
|
||||||
sleep_V = mkV "dormir" ;
|
sleep_V = mkV (dormir_Besch "dormir") ;
|
||||||
smell_V = mkV "cheirar" ;
|
smell_V = mkV "cheirar" ;
|
||||||
spit_V = mkV "cuspir" ;
|
spit_V = mkV "cuspir" ;
|
||||||
stand_V = mkV (estar_Besch "estar") ; ---- "estar de pé" ;
|
stand_V = mkV (estar_Besch "estar") ; ---- "estar de pé" ;
|
||||||
|
|||||||
Reference in New Issue
Block a user