Remove Binary Ident instance

Not that useful and we avoid a direct dep
This commit is contained in:
Francesco Gazzetta
2022-07-01 22:13:59 +02:00
parent 7b848c8e33
commit ebd4b2e2b1
2 changed files with 1 additions and 3 deletions

View File

@@ -51,7 +51,6 @@ library
, bytestring
, hashable
, deepseq
, binary
, prettyprinter
hs-source-dirs: src

View File

@@ -17,7 +17,6 @@ import Prettyprinter
-- Instances
import Data.Hashable (Hashable)
import Control.DeepSeq (NFData)
import Data.Binary (Binary)
import Data.String (IsString)
-- * Identifiers
@@ -49,7 +48,7 @@ data Sigil
-- In the second argument of ($), namely Jmp $ Ident @'Global "a"
-- In the expression: pretty $ Jmp $ Ident @'Global "a"
newtype Ident (t :: Sigil) = Ident RawIdent
deriving (Show, Eq, Ord, IsString, Binary, NFData, Hashable)
deriving (Show, Eq, Ord, IsString, NFData, Hashable)
instance Pretty (Ident 'AggregateTy) where
pretty (Ident raw) = pretty ':' <> pretty (TS.toText raw)