Cleanup, remove DeriveGeneric language extensions

This commit is contained in:
2025-10-20 12:10:11 +01:00
parent 2056d8ba0e
commit b2fd0543dd
86 changed files with 61 additions and 263 deletions
+13 -13
View File
@@ -1,30 +1,30 @@
{-# LANGUAGE DeriveGeneric #-}
--{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE TypeFamilies #-}
--{-# LANGUAGE StandaloneDeriving #-}
module NewInt where
import qualified Data.IntSet as IS
import qualified Data.IntMap.Strict as IM
import Control.Lens
import Data.Aeson
import Data.Aeson.TH
import qualified Data.IntMap.Strict as IM
import qualified Data.IntSet as IS
newtype NewInt a = NInt { _unNInt :: Int}
deriving newtype (Eq,Ord,Show,Num,Read,Integral,Real,Enum)
newtype NewInt a = NInt {_unNInt :: Int}
deriving newtype (Eq, Ord, Show, Num, Read, Integral, Real, Enum)
newtype NewIntSet a = NIntSet { _unNIntSet :: IS.IntSet}
deriving newtype (Eq,Ord,Show,Read)
newtype NewIntSet a = NIntSet {_unNIntSet :: IS.IntSet}
deriving newtype (Eq, Ord, Show, Read)
newtype NewIntMap a b = NIntMap { _unNIntMap :: IM.IntMap b}
deriving newtype (Foldable,Functor,Monoid,Semigroup)
deriving (Eq,Ord,Show,Read)
newtype NewIntMap a b = NIntMap {_unNIntMap :: IM.IntMap b}
deriving newtype (Foldable, Functor, Monoid, Semigroup)
deriving (Eq, Ord, Show, Read)
type instance Index (NewIntMap a b) = NewInt a
type instance IxValue (NewIntMap a b) = b
instance Ixed (NewIntMap a b) where