(defn ancestor? [parent child] (loop [child (:parent child)] (cond (nil? child) false (identical? parent child) true :else (recur (:parent child)))))
Comments top
No comments for ancestor?. Log in to add a comment.