Skip to content

Commit 7a4681c

Browse files
committed
Fix default hash assertion
1 parent a10bb6b commit 7a4681c

File tree

1 file changed

+5
-0
lines changed

1 file changed

+5
-0
lines changed

tests/Regressions.hs

+5
Original file line numberDiff line numberDiff line change
@@ -144,8 +144,13 @@ assertDefaultHash = do
144144
-- appear to be set, we get the warning, yet the
145145
-- larger value in upstream is still being used.
146146
-- https://github.com/haskell-unordered-containers/hashable/blob/master/src/Data/Hashable/Class.hs#L221
147+
#if MIN_VERSION_hashable(1,3,1)
148+
HAS.hash someString @=?
149+
HAS.hashWithSalt 14695981039346656037 someString
150+
#else
147151
HAS.hash someString @=?
148152
HAS.hashWithSalt 0xdc36d1615b7400a4 someString
153+
#endif
149154

150155
------------------------------------------------------------------------
151156
-- * Test list

0 commit comments

Comments
 (0)