msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

Added colon to the list of punctuation chars in GSL generation.

Browse Source
This commit is contained in:
bringert
2006-03-31 15:31:33 +00:00
parent ae30eca844
commit 8dfa27bb6d
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Speech/PrGSL.hs
View File

@@ -69,7 +69,7 @@ showToken :: Token -> String
showToken t = map toLower (prt t)
isPunct :: Char -> Bool
isPunct c = c `elem` "-_.;.,?!()[]{}"
isPunct c = c `elem` "-_.:;.,?!()[]{}"
comments :: [String] -> ShowS
comments = unlinesS . map (showString . ("; " ++))