compact_function.hs\tests\ghc-compact\libraries - delta/haskell.git - gitlab.haskell.org: ghc/ghc.git

index : delta/haskell.git

gitlab.haskell.org: ghc/ghc.git

summary refs log tree commit diff

path: root/libraries/ghc-compact/tests/compact_function.hs

blob: 166f345552d267f24793d7d7054a35ee5e523adf (plain)

import Control.Exception
import GHC.Compact

data HiddenFunction = HiddenFunction (Int -> Int)

main = compact (HiddenFunction (+1))