lazy-search 0.1.2.0 → 0.1.2.1

raw patch · 2 files changed

+2/−2 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• lazy-search.cabal +1/−1
• src/Control/Search.hs +1/−1

@@ -1,5 +1,5 @@ name:                lazy-search
-version:             0.1.2.0
+version:             0.1.2.1
 synopsis:            Finds values satisfying a lazy predicate
 description:         
   This library can be used as a property based testing driver, and more

@@ -503,7 +503,7 @@   return (go xs 0)
   where go []           n      = Left n
         go ((b,a):_)    _ | b  = Right a
-        go (_    :xs')  n      = go xs' (n+1)
+        go (_    :xs')  n      = go xs' $! (n+1)
  
 -- Count the domain of a function
 countdom :: Enumerable a => (a -> b) -> Count a