mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-01 23:32:51 -06:00
Japanese RGL by Liza Zimina - almost complete!
This commit is contained in:
14
lib/src/japanese/TextJap.gf
Normal file
14
lib/src/japanese/TextJap.gf
Normal file
@@ -0,0 +1,14 @@
|
||||
concrete TextJap of Text = CatJap ** open ResJap, Prelude in {
|
||||
|
||||
flags coding = utf8 ;
|
||||
|
||||
lin
|
||||
|
||||
TEmpty = ss "" ;
|
||||
|
||||
TFullStop phr txt = {s = phr.s ++ "." ++ txt.s} ;
|
||||
|
||||
TQuestMark phr txt = {s = phr.s ++ "?" ++ txt.s} ;
|
||||
|
||||
TExclMark phr txt = {s = phr.s ++ "!" ++ txt.s} ;
|
||||
}
|
||||
Reference in New Issue
Block a user