Merge pull request purescript#153 from puffnfresh/name-mangling

paf31 · paf31 · commit 856ca36d2a7a · 2014-01-31T14:22:31.000-08:00
Mangle '.' to "$dot"
diff --git a/src/Language/PureScript/Pretty/Common.hs b/src/Language/PureScript/Pretty/Common.hs
@@ -41,6 +41,7 @@ identToJs (Escaped name) = name
 identCharToString :: Char -> String
 identCharToString c | isAlphaNum c = [c]
 identCharToString '_' = "_"
+identCharToString '.' = "$dot"
 identCharToString '$' = "$dollar"
 identCharToString '~' = "$tilde"
 identCharToString '=' = "$eq"
