diff options
Diffstat (limited to 'users/grfn/xanthous/src/Xanthous/Orphans.hs')
| -rw-r--r-- | users/grfn/xanthous/src/Xanthous/Orphans.hs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/users/grfn/xanthous/src/Xanthous/Orphans.hs b/users/grfn/xanthous/src/Xanthous/Orphans.hs index a8274bf0aa..385873e7b4 100644 --- a/users/grfn/xanthous/src/Xanthous/Orphans.hs +++ b/users/grfn/xanthous/src/Xanthous/Orphans.hs @@ -38,6 +38,7 @@ import Test.QuickCheck.Checkers (EqProp ((=-=))) import Xanthous.Util.JSON import Xanthous.Util.QuickCheck import Xanthous.Util (EqEqProp(EqEqProp)) +import qualified Graphics.Vty.Input.Events -------------------------------------------------------------------------------- instance forall s a. @@ -305,6 +306,11 @@ deriving stock instance Ord Color deriving stock instance Ord a => Ord (MaybeDefault a) deriving stock instance Ord Attr +deriving anyclass instance Hashable Graphics.Vty.Input.Events.Key +deriving anyclass instance NFData Graphics.Vty.Input.Events.Key +deriving anyclass instance Hashable Graphics.Vty.Input.Events.Modifier +deriving anyclass instance NFData Graphics.Vty.Input.Events.Modifier + -------------------------------------------------------------------------------- instance (SemiSequence a, Arbitrary (Element a), Arbitrary a) |