Function: combobulate-ztree--preorder-prev

combobulate-ztree--preorder-prev is a natively compiled function defined in combobulate-ztree.el.

Signature

(combobulate-ztree--preorder-prev LOC)

Documentation

Move to the previous LOC in the hierarchy, depth-first preorder.

If already at the root, returns nil.

Source Code

;; Defined in /nix/store/b5fvrwzi3zvkabyzx0in6gw1cj963z46-emacs-packages-deps/share/emacs/site-lisp/combobulate-ztree.el
(defun combobulate-ztree--preorder-prev (loc)
  "Move to the previous LOC in the hierarchy, depth-first preorder.
If already at the root, returns nil."
  (let ((lloc (combobulate-ztree-left loc))
        (child nil))
    (if lloc
        (progn
          (while (setq child (and (combobulate-ztree-branch-p lloc) (combobulate-ztree-children lloc)))
            (setq lloc (combobulate-ztree-rightmost child)))
          lloc)
      (combobulate-ztree-up loc))))