diff --git a/lib/src/hebrew/ResHeb.gf b/lib/src/hebrew/ResHeb.gf index fe4a530f2..e9da4af47 100644 --- a/lib/src/hebrew/ResHeb.gf +++ b/lib/src/hebrew/ResHeb.gf @@ -33,7 +33,7 @@ oper ClSlash : Type = { s : TenseHeb => Polarity => Str ; - c2 : Prep + c2 : Case } ; VP : Type = { @@ -129,7 +129,7 @@ oper -- defH : Str -> Str = \cn -> -- case cn of {_ => "h" + cn} ; - insertObj : NP -> VP -> VP = \np,vp -> + insertObj : NP -> VP -> VP = \np,vp -> let nps = np.s ! Acc in diff --git a/lib/src/hebrew/VerbHeb.gf b/lib/src/hebrew/VerbHeb.gf index c489ba45d..05f553757 100644 --- a/lib/src/hebrew/VerbHeb.gf +++ b/lib/src/hebrew/VerbHeb.gf @@ -6,7 +6,7 @@ concrete VerbHeb of Verb = CatHeb ** open Prelude, ResHeb in { UseV = predV ; - ComplSlash vp np = insertObj vp np; + ComplSlash vp np = insertObj np vp; SlashV2a v = predVc v ; --predV v ** {c2 = v.c2} ;