-- | Something like Show but for things which annoyingly do not have
-- Show but Outputable instead.
showppr :: Outputable a => a -> String
showppr = showSDoc . ppr
showppr :: Outputable a => a -> String
showppr = showSDoc . ppr
showppr = showSDoc . ppr