diff options
| -rw-r--r-- | src/clj/clojure/core.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index bef817c3..56db96b3 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -3257,7 +3257,7 @@ (lazy-seq (let [x (.take q)] (if (identical? x q) ;q itself is eos sentinel - @agt ;will be nil - touch agent just to propagate errors + (do @agt nil) ;touch agent just to propagate errors (do (send-off agt fill) (cons (if (identical? x NIL) nil x) (drain)))))))] |