diff --git a/lib/resource-1.4/hindi/Deva.hs b/lib/resource-1.4/hindi/Deva.hs index 0c557dc8d..e5085d126 100644 --- a/lib/resource-1.4/hindi/Deva.hs +++ b/lib/resource-1.4/hindi/Deva.hs @@ -89,6 +89,7 @@ encode s = case s of "*" -> 0x0902 " " -> space + "\n" -> fromEnum '\n' _ -> 0x093e --- a: diff --git a/lib/resource-1.4/hindi/ResHin.gf b/lib/resource-1.4/hindi/ResHin.gf index c20ada8b4..320c07e5a 100644 --- a/lib/resource-1.4/hindi/ResHin.gf +++ b/lib/resource-1.4/hindi/ResHin.gf @@ -181,7 +181,7 @@ resource ResHin = ParamX ** open Prelude in { s = \\b,vh => let na = if_then_Str b [] "na" ; - nahim = if_then_Str b [] "nahim" ; + nahim = if_then_Str b [] "nahi:*" ; in case vh of { VPTense VPGenPres (Ag g n p) => @@ -197,7 +197,7 @@ resource ResHin = ParamX ** open Prelude in { VPTense VPSubj (Ag _ n p) => {fin = verb.s ! VSubj n p ; inf = [] ; neg = na} ; VPTense VPFut (Ag g n p) => {fin = verb.s ! VFut n p g ; inf = [] ; neg = na} ; VPInf => {fin = verb.s ! VStem ; inf = [] ; neg = na} ; - _ => {fin = verb.s ! VStem ; inf = [] ; neg = na} + _ => {fin = verb.s ! VStem ; inf = [] ; neg = na} ---- } ; obj = [] ; subj = VIntrans ;