Skip to content

Commit

Permalink
Remove orphan instances that have been added to clash-prelude
Browse files Browse the repository at this point in the history
  • Loading branch information
martijnbastiaan committed Feb 8, 2024
1 parent fcd72e9 commit b566543
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions src/Protocols/Internal.hs
Original file line number Diff line number Diff line change
Expand Up @@ -737,8 +737,10 @@ type family KeepType (keep :: Bool) (optionalType :: Type) = t | t -> keep optio
deriving instance (C.ShowX t) => (C.ShowX (Identity t))
deriving instance (C.NFDataX t) => (C.NFDataX (Identity t))
#endif
#if !MIN_VERSION_clash_prelude(1, 9, 0)
deriving instance (C.ShowX t) => (C.ShowX (Proxy t))
deriving instance (C.NFDataX t) => (C.NFDataX (Proxy t))
#endif

-- | We want to define operations on 'KeepType' that work for both possibilities
-- (@keep = 'True@ and @keep = 'False@), but we can't pattern match directly.
Expand Down

0 comments on commit b566543

Please sign in to comment.