hexagoxel
/
brittany
1
0
Fork 0
Code Issues 117 Pull Requests 5 Packages Projects Releases 5 Wiki Activity

Fix the Semigroup.Last aeson instances (config breaking change :/)

pull/3/head
Lennart Spitzner 2016-08-12 14:22:36 +02:00
parent 0c6cc960cc
commit dd24316941
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Language/Haskell/Brittany/Config/Types.hs
View File

@ -111,7 +111,10 @@ type LayoutConfig = LayoutConfigF Identity
type ErrorHandlingConfig = ErrorHandlingConfigF Identity type ErrorHandlingConfig = ErrorHandlingConfigF Identity
instance FromJSON a => FromJSON (Semigroup.Last a) where instance FromJSON a => FromJSON (Semigroup.Last a) where
parseJSON obj = Semigroup.Last <$> parseJSON obj
{-# INLINE parseJSON #-}
instance ToJSON a => ToJSON (Semigroup.Last a) where instance ToJSON a => ToJSON (Semigroup.Last a) where
toJSON (Semigroup.Last x) = toJSON x
instance FromJSON (DebugConfigF Maybe) instance FromJSON (DebugConfigF Maybe)
instance ToJSON (DebugConfigF Maybe) instance ToJSON (DebugConfigF Maybe)