Thai complete with what is needed to compile Sentences in Phrasebook

This commit is contained in:
aarne
2011-11-07 15:46:21 +00:00
parent 3148e305d5
commit 06630f223f
9 changed files with 55 additions and 31 deletions

11
lib/src/thai/TextTha.gf Normal file
View File

@@ -0,0 +1,11 @@
concrete TextTha of Text = CommonX ** {
-- No punctuation - but make sure to leave spaces between sentences!
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} ;
}