Permalink
Switch branches/tags
Nothing to show
Find file
b6aebc2 Oct 30, 2011
4 lines (3 sloc) 104 Bytes
{-# LANGUAGE ExistentialQuantification #-}
data Foo = forall a. Foo a
ignorefoo f = 1 where (Foo a) = f