erikd on Freenode #haskell.au shares an interesting bug.
The relevant code is:
buildTable :: IO EvenCache
buildTable = do
ht <- HT.new
forM_ pairs $ \ (k,v) ->
maybe (HT.insert ht k v) (const $ abort k) <$>
HT.lookup ht k
return ht
Can you spot the error?