Drop NFData constraint from compact.
[ghc.git] / libraries / compact / tests / compact_function.hs
1 import Control.Exception
2 import Data.Compact
3
4 data HiddenFunction = HiddenFunction (Int -> Int)
5
6 main = compact (HiddenFunction (+1))