Printer.hs 140 Bytes
Newer Older
1
2
3
4
5
6
module Printer
    (validateId)
where

validateId :: String -> String
validateId = map (\c -> if c `elem` ",;:(){}\t \n\r" then '_' else c)