Fix default hash assertion

haskell-unordered-containers · Sep 22, 2021 · 7a4681c · 7a4681c
1 parent a10bb6b
commit 7a4681c
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/tests/Regressions.hs b/tests/Regressions.hs
@@ -144,8 +144,13 @@ assertDefaultHash = do
   -- appear to be set, we get the warning, yet the
   -- larger value in upstream is still being used.
   -- https://github.com/haskell-unordered-containers/hashable/blob/master/src/Data/Hashable/Class.hs#L221
+#if MIN_VERSION_hashable(1,3,1)
+  HAS.hash someString  @=?
+    HAS.hashWithSalt 14695981039346656037 someString
+#else
   HAS.hash someString  @=?
     HAS.hashWithSalt 0xdc36d1615b7400a4 someString
+#endif
 
 ------------------------------------------------------------------------
 -- * Test list