1
0
forked from GitHub/gf-rgl

=Corrected the type of Imp because Bool produced False as default hence negative form of Imperative be = taba instead of ba. Why does GF compute for false first by default? Is it data Bool = False | True?

This commit is contained in:
David Bamutura
2019-05-19 06:31:16 +02:00
parent 115989e017
commit 9b0cbc63ec
4 changed files with 7 additions and 5 deletions

View File

@@ -6,7 +6,7 @@ concrete CatCgg of Cat = CommonX -[Adv,IAdv, AdA]**
lincat
Imp = {s : Bool => Str} ;
Imp = {s : Res. ImpPol=> Str} ;
QS = {s : Str} ;
-- Note: SS is a shorthand for {s:Str}, defined in Prelude.gf

View File

@@ -16,8 +16,8 @@ lin
UttAdv adv = {s = adv.s}; --: Adv -> Utt ; -- in the house
UttImpSg pol imp = {s =
case pol.p of {
Pos => imp.s!True;
Neg => (mkSubjClitic (AgMUBAP2 Sg)) ++ imp.s!False
Pos => imp.s!ImpPos;
Neg => (mkSubjClitic (AgMUBAP2 Sg)) ++ imp.s!ImpNeg
}
};--: Pol -> Imp -> Utt ; -- (do not) walk ----s
{-

View File

@@ -35,6 +35,8 @@ param
GenPrep2 |
GenAdj |
SStandPron ; --Self-standing pronouns
ImpPol = ImpPos | ImpNeg;
{-
--there are several and i.e.
-- na (two nouns, 2 Noun Phrases, 2 Pronouns, 2 relative subject clauses, )

View File

@@ -83,8 +83,8 @@ lin
ImpVP vp = {
s =table{
True=> vp.s ++ Predef.BIND ++ vp.morphs!VFInf!RestOfVerb ++ vp.comp;
False => case vp.isCompApStem of { -- How do I make the number dynamic use case?
ImpPos => vp.s ++ Predef.BIND ++ vp.morphs!VFInf!RestOfVerb ++ vp.comp;
ImpNeg => case vp.isCompApStem of { -- How do I make the number dynamic use case?
True =>vp.morphs!VFPres!SecNegM ++ Predef.BIND ++ vp.s ++ Predef.BIND ++
vp.morphs!VFInf!RestOfVerb ++ (mkAdjPronNoIVClitic (AgMUBAP2 Sg)) ++ vp.comp;
False => vp.morphs!VFPres!SecNegM ++ Predef.BIND ++ vp.s ++ Predef.BIND ++