LazySeq应利用其底层seq的缓存哈希。

Question

即使底层seq包含缓存哈希，LazySeq也会每次都重新计算它。


user=> *clojure-version*
{:major 1, :minor 7, :incremental 0, :qualifier "master", :interim true}
user=> (def a (range 100000))
#'user/a
user=> (time (hash a))
"执行时间：21.812毫秒"
375952610
user=> (time (hash a))        ;; 哈希已缓存
"执行时间：0.036毫秒"
375952610
user=> (def b (seq a))
#'user/b
user=> (time (hash b))
"执行时间：0.042毫秒"   ;; 使用了缓存的哈希
375952610
user=> (def c (lazy-seq b))
#'user/c
user=> (time (hash c))        ;; 应该使用底层哈希
"执行时间：27.758毫秒"
375952610
user=> (time (hash c))        ;; 应该使用底层哈希
"执行时间：17.846毫秒"
375952610


*方法：如果LazySeq实现的seq生成器实现了IHashEq，则使用它来计算hasheq()。
*补丁：clj-1373.diff

Answer 1

评论者：wagjo

添加了补丁，该补丁检查底层seq是否实现了IHashEq，如果是，则使用该哈希而不是重新计算。

Answer 2

评论者：alexmiller

在这个补丁中，您能否更新else情况（原始代码）以使用s而不是this，这样就不会重新调用seq()？

Answer 3

评论者：wagjo

添加补丁（链接：^clj-1373-2.diff），用于重用 {{s}} 作为 else 情况。

Answer 4

评论者：alexmiller

-2 补丁无法编译，所以我想这应该是一个错误建议。 :)

Answer 5

参考：[https://clojure.atlassian.net/browse/CLJ-1373](https://clojure.atlassian.net/browse/CLJ-1373)（由 wagjo 报告）