diff --git a/src/Database/LSMTree/Internal/Paths.hs b/src/Database/LSMTree/Internal/Paths.hs
index 55eb327d2..a93bb07cb 100644
--- a/src/Database/LSMTree/Internal/Paths.hs
+++ b/src/Database/LSMTree/Internal/Paths.hs
@@ -104,7 +104,7 @@ instance IsString SnapshotName where
 
 data InvalidSnapshotNameError
   = ErrInvalidSnapshotName !String
-  deriving stock (Show)
+  deriving stock (Show, Eq)
   deriving anyclass (Exception)
 
 -- | Check if a 'String' would be a valid snapshot name.