Function: profiler-calltree-find

profiler-calltree-find is a byte-compiled function defined in profiler.el.gz.

Signature

(profiler-calltree-find TREE ENTRY)

Documentation

Return a child tree of ENTRY under TREE.

Source Code

;; Defined in /usr/src/emacs/lisp/profiler.el.gz
(defun profiler-calltree-find (tree entry)
  "Return a child tree of ENTRY under TREE."
  (let (result (children (profiler-calltree-children tree)))
    (while (and children (null result))
      (let ((child (car children)))
	(when (function-equal (profiler-calltree-entry child) entry)
	  (setq result child))
	(setq children (cdr children))))
    result))