Skip to content

Commit

Permalink
verified that nothing ever gets added to ws if it already has a value
Browse files Browse the repository at this point in the history
in the substitution.
  • Loading branch information
David Nolen committed Oct 12, 2012
1 parent 08ece0f commit 2b1c70e
Showing 1 changed file with 0 additions and 5 deletions.
5 changes: 0 additions & 5 deletions src/main/clojure/clojure/core/logic.clj
Expand Up @@ -2686,11 +2686,6 @@
[a wsi x]
(assoc a :ws (dissoc (:ws a) (root-var a x))))

;; TODO NOW: we should not add anything to ws if
;; x already has a value in subst. should double
;; check this is a problem by counting how many times
;; we add to ws when x has a value in subst

(defn ext-ws
"Update the current value for a logic var using the working
store. Returns the updated substitution."
Expand Down

0 comments on commit 2b1c70e

Please sign in to comment.