mirror of
https://github.com/ilyakooo0/vty.git
synced 2024-11-29 08:49:40 +03:00
Derive Eq for Cursor
This allows me to use it with `frpnow`'s `toChanges :: Eq a => Behavior a -> EvStream a`.
This commit is contained in:
parent
8a1a128677
commit
2b9272f2b2
@ -85,6 +85,7 @@ data Cursor =
|
||||
| Cursor !Int !Int
|
||||
-- | Show the cursor at the given absolute terminal column and row
|
||||
| AbsoluteCursor !Int !Int
|
||||
deriving Eq
|
||||
|
||||
instance NFData Cursor where
|
||||
rnf c = c `seq` ()
|
||||
|
Loading…
Reference in New Issue
Block a user