Empty types are prettyprinted with trailing "="

[FSalad]

This prints the invalid declaration "data Void ="; should be "data Void":

{-# LANGUAGE EmptyDataDecls #-}
import Language.Haskell.TH
import Language.Haskell.TH.Ppr

main = putStrLn . pprint =<< runQ [d| data Void |]

[FSalad]

fix

[simonpj]

Thanks! I pushed an identical patch before seeing yours.

Thu Oct 15 12:41:04 BST 2009  simonpj@microsoft.com
  * Fix Trac #3572 (pls merge)

    M ./Language/Haskell/TH/Ppr.hs -1 +1

Ian pls merge to 6.12.

Simon

[igloo]

Merged