
Untitled
By: a guest on
Jan 22nd, 2013 | syntax:
Haskell | size: 0.16 KB | hits: 23 | expires: Never
{-# LANGUAGE ExistentialQuantification #-}
data Foo = forall a . Show a => Foo a
showSomething :: Foo -> IO ()
showSomething (Foo a) = putStrLn (show a)