mirror of
https://github.com/haskell-nix/hnix-store.git
synced 2024-08-17 13:51:21 +03:00
remote: add Arbitrary Eq for SuccessCodeReply
This commit is contained in:
parent
c1f7666e03
commit
e20463df19
@ -123,6 +123,9 @@ instance Arbitrary (Some StoreRequest) where
|
||||
|
||||
-- ** Reply
|
||||
|
||||
deriving via GenericArbitrary SuccessCodeReply
|
||||
instance Arbitrary SuccessCodeReply
|
||||
|
||||
deriving via GenericArbitrary GCResult
|
||||
instance Arbitrary GCResult
|
||||
|
||||
|
@ -2,7 +2,9 @@ module System.Nix.Store.Remote.Types.SuccessCodeReply
|
||||
( SuccessCodeReply(..)
|
||||
) where
|
||||
|
||||
import GHC.Generics (Generic)
|
||||
|
||||
-- | Reply that checks an int success return value
|
||||
data SuccessCodeReply = SuccessCodeReply
|
||||
deriving (Show)
|
||||
deriving (Eq, Show, Generic)
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user