Haskell source code pretty print