GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 04:59:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

q

Browse Source
This commit is contained in:
aarne
2008-05-06 16:47:44 +00:00
parent c78791b62e
commit c4a3cd633e
2 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
lib/resource-1.4/hindi/Deva.hs
View File

@@ -89,6 +89,7 @@ encode s = case s of
"*" -> 0x0902
" " -> space
"\n" -> fromEnum '\n'
_ -> 0x093e --- a:

4
lib/resource-1.4/hindi/ResHin.gf
View File

@@ -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 ;