mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
(Som) bugfix in QuestIAdv: add subject also when STM is negative
This commit is contained in:
@@ -27,10 +27,12 @@ concrete QuestionSom of Question = CatSom ** open
|
|||||||
sbj = clRaw.subj ;
|
sbj = clRaw.subj ;
|
||||||
cl : ClSlash = clRaw ** {
|
cl : ClSlash = clRaw ** {
|
||||||
stm = \\clt,p => case <clt,p> of {
|
stm = \\clt,p => case <clt,p> of {
|
||||||
-- IAdv is focused
|
-- IAdv is focused with baa, and subject comes after
|
||||||
<_,Pos> => "baa" ++ sbj.pron ++ sbj.noun;
|
<_,Pos> => "baa" ++ sbj.pron ++ sbj.noun;
|
||||||
_ => clRaw.stm ! clt ! p } ;
|
-- TODO how do negative questions work
|
||||||
subj = {noun, pron = [] ; isP3 = True}}
|
_ => clRaw.stm ! Question ! p ++ sbj.pron ++ sbj.noun } ;
|
||||||
|
subj = sbj ** {noun, pron = []} -- to force subject after baa
|
||||||
|
} ;
|
||||||
in cl2qcl cl ;
|
in cl2qcl cl ;
|
||||||
|
|
||||||
-- : IComp -> NP -> QCl ; -- where is John?
|
-- : IComp -> NP -> QCl ; -- where is John?
|
||||||
|
|||||||
Reference in New Issue
Block a user