• (ancestor? parent child)

0 Examples top

Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source clojure/contrib/pprint/pretty_writer.clj:71 top

(defn ancestor? [parent child]
  (loop [child (:parent child)]
     (nil? child) false
     (identical? parent child) true
     :else (recur (:parent child)))))
Vars in clojure.contrib.pprint.pretty-writer/ancestor?: cond defn identical? loop nil?
Used in 0 other vars

Comments top

No comments for ancestor?. Log in to add a comment.