diff --git a/hnix-store-remote/src/System/Nix/Store/Remote/Arbitrary.hs b/hnix-store-remote/src/System/Nix/Store/Remote/Arbitrary.hs
index 3a08a87..0ab81b9 100644
--- a/hnix-store-remote/src/System/Nix/Store/Remote/Arbitrary.hs
+++ b/hnix-store-remote/src/System/Nix/Store/Remote/Arbitrary.hs
@@ -123,6 +123,9 @@ instance Arbitrary (Some StoreRequest) where
 
 -- ** Reply
 
+deriving via GenericArbitrary SuccessCodeReply
+  instance Arbitrary SuccessCodeReply
+
 deriving via GenericArbitrary GCResult
   instance Arbitrary GCResult
 
diff --git a/hnix-store-remote/src/System/Nix/Store/Remote/Types/SuccessCodeReply.hs b/hnix-store-remote/src/System/Nix/Store/Remote/Types/SuccessCodeReply.hs
index 1b9eeda..1b38d05 100644
--- a/hnix-store-remote/src/System/Nix/Store/Remote/Types/SuccessCodeReply.hs
+++ b/hnix-store-remote/src/System/Nix/Store/Remote/Types/SuccessCodeReply.hs
@@ -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)