forked from GitHub/gf-rgl
refinementsTextUrd-11-05-19
This commit is contained in:
11
src/urdu/TextUrd.gf
Normal file
11
src/urdu/TextUrd.gf
Normal file
@@ -0,0 +1,11 @@
|
|||||||
|
concrete TextUrd of Text = CommonX - [Temp,TTAnt,Tense,TPres,TPast,TFut,TCond] ** {
|
||||||
|
|
||||||
|
-- This works for the special punctuation marks of Urdu but still browser does not display them well so left balnk.
|
||||||
|
|
||||||
|
lin
|
||||||
|
TEmpty = {s = []} ;
|
||||||
|
TFullStop x xs = {s = x.s ++ "" ++ xs.s} ;
|
||||||
|
TQuestMark x xs = {s = x.s ++ "" ++ xs.s} ;
|
||||||
|
TExclMark x xs = {s = x.s ++ "" ++ xs.s} ;
|
||||||
|
|
||||||
|
}
|
||||||
11
src/urdu/src/TextUrd.gf
Normal file
11
src/urdu/src/TextUrd.gf
Normal file
@@ -0,0 +1,11 @@
|
|||||||
|
concrete TextUrd of Text = CommonX - [Temp,TTAnt,Tense,TPres,TPast,TFut,TCond] ** {
|
||||||
|
|
||||||
|
-- This works for the special punctuation marks of Urdu.
|
||||||
|
|
||||||
|
lin
|
||||||
|
TEmpty = {s = []} ;
|
||||||
|
TFullStop x xs = {s = x.s ++ "." ++ xs.s} ;
|
||||||
|
TQuestMark x xs = {s = x.s ++ "?" ++ xs.s} ;
|
||||||
|
TExclMark x xs = {s = x.s ++ "" ++ xs.s} ;
|
||||||
|
|
||||||
|
}
|
||||||
@@ -9,5 +9,6 @@ rf -file=src/LexiconUrd.gf | ps -env=quotes -to_urdu | wf -file=LexiconUrd.gf
|
|||||||
rf -file=src/MorphoUrd.gf | ps -env=quotes -to_urdu | wf -file=MorphoUrd.gf
|
rf -file=src/MorphoUrd.gf | ps -env=quotes -to_urdu | wf -file=MorphoUrd.gf
|
||||||
rf -file=src/StructuralUrd.gf | ps -env=quotes -to_urdu | wf -file=StructuralUrd.gf
|
rf -file=src/StructuralUrd.gf | ps -env=quotes -to_urdu | wf -file=StructuralUrd.gf
|
||||||
rf -file=src/NumeralUrd.gf | ps -env=quotes -to_urdu | wf -file=NumeralUrd.gf
|
rf -file=src/NumeralUrd.gf | ps -env=quotes -to_urdu | wf -file=NumeralUrd.gf
|
||||||
|
rf -file=src/TextUrd.gf | ps -env=quotes -to_urdu | wf -file=TextUrd.gf
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user