1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
|
{-# LANGUAGE CPP #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TypeFamilies #-}
#if __GLASGOW_HASKELL__ >= 800
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE PolyKinds #-}
# if __GLASGOW_HASKELL__ < 806
{-# LANGUAGE TypeInType #-}
# endif
#endif
module T82Spec (main, spec) where
import Test.Hspec
#if MIN_VERSION_base(4,10,0)
import Generics.Deriving.TH
import GHC.Exts (RuntimeRep, TYPE)
data Code m (a :: TYPE (r :: RuntimeRep)) = Code
$(deriveAll0And1 ''Code)
#endif
main :: IO ()
main = hspec spec
spec :: Spec
spec = return ()
|