[Haskell-cafe] is there a way to pretty print a module?

[Anatoly Yakovenko]

is there a way to pretty print a module?
like:

module Main where
import Language.Haskell.TH
main = do
 print $ pprint Main