dotsToSpace :: String -> String
dotsToSpace = map replace where
  replace '.' = ' '
  replace c   = c

-- | Print a GHC name to some text.
dotsToSpace :: String -> String
dotsToSpace = map replace where
  replace '.' = ' '
  replace c   = c

-- | Print a GHC name to some text.
dotsToSpace = map replace where
  replace '.' = ' '
  replace c   = c

-- | Print a GHC name to some text.