Add a perf comment
commita72141c523f842fbaa56c496923cc7526b549a15
authorHarendra Kumar <harendra.kumar@gmail.com>
dateSat 10 Mar 2018, 16:16 (9 years ago)
parente4f3d16
src/Streamly/Prelude.hs+1
@@ -248,6 +248,7 @@ drop n m = fromStream $ go n (toStream m)
248248 go n1 m1 = Stream $ \ctx stp yld ->
249249 let yield _ Nothing = stp
250250 yield _ (Just x) = (runStream $ go (n1 - 1) x) ctx stp yld
251+ -- Somehow "<=" check performs better than a ">"
251252 in if n1 <= 0
252253 then (runStream m1) ctx stp yld
253254 else (runStream m1) ctx stp yield