Skip to content

Instantly share code, notes, and snippets.

@mrocklin
Last active December 11, 2015 01:48
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mrocklin/4525736 to your computer and use it in GitHub Desktop.
Save mrocklin/4525736 to your computer and use it in GitHub Desktop.
A simple script to demonstrate the unfortunate importance of goal ordering in `core.logic`.
(use `clojure.core.logic)
;; Runs quickly. Prints (1 2,3).
(clojure.pprint/pprint (run* [q] (fresh [x] (== x [1,2,3])
(membero q x))))
;; Hangs
(clojure.pprint/pprint (run* [q] (fresh [x] (membero q x)
(== x [1,2,3]))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment