mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
polite imperative in Fre
This commit is contained in:
@@ -123,7 +123,7 @@ instance DiffFre of DiffRomance = open CommonRomance, PhonoFre, Prelude in {
|
||||
let
|
||||
agr = Ag g n p ;
|
||||
num = if_then_else Number b Pl n ;
|
||||
verb = vp.s.s ! vImper n p ;
|
||||
verb = vp.s.s ! vImper num p ;
|
||||
neg = vp.neg ! pol ;
|
||||
clpr = <vp.clit1 ++ vp.clit2, False> ; ---- TODO: True if clit
|
||||
compl = vp.comp ! agr ++ vp.ext ! pol
|
||||
|
||||
Reference in New Issue
Block a user