18 lines
438 B
Haskell
18 lines
438 B
Haskell
{-# LANGUAGE TypeApplications #-}
|
|
|
|
module GHCup.Types.JSONSpec where
|
|
|
|
import GHCup.ArbitraryTypes ()
|
|
import GHCup.Types hiding ( defaultSettings )
|
|
import GHCup.Types.JSON ()
|
|
|
|
import Test.Aeson.GenericSpecs
|
|
import Test.Hspec
|
|
|
|
|
|
|
|
spec :: Spec
|
|
spec = do
|
|
roundtripAndGoldenSpecsWithSettings (defaultSettings { goldenDirectoryOption = CustomDirectoryName "test/golden" }) (Proxy @GHCupInfo)
|
|
|