started Czech with a mini-like coverage
This commit is contained in:
1 parent
8f46b09647
commit
7c275c1c28
23 files changed
+1492
No files matched your search
@@ -0,0 +1,8 @@
|
||||
concrete TextCze of Text = CatCze ** open ResCze in {
|
||||
|
||||
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} ;
|
||||
}
|
||||
Reference in new issue
Block a user