mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-30 02:58:35 -06:00
(Som) WIP: add FocusObj
This commit is contained in:
@@ -7,7 +7,13 @@ concrete ExtendSom of Extend = CatSom
|
||||
|
||||
lin
|
||||
-- : NP -> SSlash -> Utt ; -- her I love -- Sayeed p. 189-
|
||||
FocusObj np sslash =
|
||||
FocusObj np sslash = -- FIXME: preposition disappears in negative sentences
|
||||
let ss = sslash.s ! False ;
|
||||
ssSub = sslash.s ! True ; -- the negative particle is the same as subordinate, but verb forms come from main clause
|
||||
obj = case np.isPron of {
|
||||
True => np.empty ++ (pronTable ! np.a).sp ;
|
||||
False => np.s ! Abs }
|
||||
in {s = ssSub.beforeSTM ++ "waxa" ++ ssSub.stm ++ ss.afterSTM ++ obj} ;
|
||||
|
||||
-- FocusAdv : Adv -> S -> Utt ; -- today I will sleep
|
||||
-- FocusAdV : AdV -> S -> Utt ; -- never will I sleep
|
||||
|
||||
Reference in New Issue
Block a user