We're updating the issue view to help you get more done. 

StackOverflow for large `appendo`

Description

1 2 (def l (range 0 2000)) (run* [q] (appendo l l q))

Stacktrace

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 user=> (def l (range 0 2000)) #'user/l user=> (run* [q] (appendo l l q)) StackOverflowError clojure.core.logic.LVar (logic.clj:1307) user=> (pst) StackOverflowError clojure.core.logic.LVar (logic.clj:1307) clojure.lang.KeywordLookupSite$1.get (KeywordLookupSite.java:45) clojure.core.logic.LVar (logic.clj:1325) clojure.lang.Util.equiv (Util.java:32) clojure.lang.PersistentHashMap$BitmapIndexedNode.find (PersistentHashMap.java:601) clojure.lang.PersistentHashMap$ArrayNode.find (PersistentHashMap.java:370) clojure.lang.PersistentHashMap$ArrayNode.find (PersistentHashMap.java:370) clojure.lang.PersistentHashMap.entryAt (PersistentHashMap.java:133) clojure.lang.RT.find (RT.java:720) clojure.core/find (core.clj:1432) clojure.core.logic.Substitutions (logic.clj:1134) clojure.core.logic/walk*/fn--2847 (logic.clj:1005)

Environment

None

Status

Assignee

David Nolen

Reporter

David Nolen

Labels

None

Approval

None

Patch

None

Priority

Major