hpage-0.4.1: res/test/TypeSynonymInstances.hs

class ExtTest a where
    extes :: a -> String
    
instance ExtTest String where
    extes = show . map show