For instance:

module Let where

foo = let x :: Int
          x = 1
      in x

Will print like:

module Let where

foo = let x ::
            Intx = 1

      in x

Looks like we're dropping a newline somewhere.