shithub: MicroHs

ref: 7d2f32a9e5e2b27faa217fd3d9d2d2092f052861
dir: /lib/Data/Orphans.hs/

View raw version 
-- Instance declarations that can't be put where
-- due to import cycles.
module Data.Orphans where
import Prelude(); import MiniPrelude

instance (Show a) => Show (Down a) where
  showsPrec d (Down x) = showParen (d > 10) $
    showString "Down " . showsPrec 11 x