Browse files

missing field keyword lookup ansv*

  • Loading branch information...
1 parent 03ad0a4 commit e4587339257d65888a8e260e1b6a06e7850c4d3f David Nolen committed Oct 5, 2012
Showing with 2 additions and 1 deletion.
  1. +2 −1 src/main/clojure/clojure/core/logic.clj
View
3 src/main/clojure/clojure/core/logic.clj
@@ -2767,6 +2767,7 @@
(valAt [this k not-found]
(case k
:cache cache
+ :ansv* ansv*
:f f
not-found))
ISuspendedStream
@@ -2876,7 +2877,7 @@
(fn []
(into []
(map (fn [ss]
- (make-suspended-stream (:cache ss) (.ansv* ss)
+ (make-suspended-stream (:cache ss) (:ansv* ss)
(fn [] (bind ((:f ss)) g))))
this)))))

0 comments on commit e458733

Please sign in to comment.