Function: srecode-root-dictionary

srecode-root-dictionary is a byte-compiled function defined in dictionary.el.gz.

Signature

(srecode-root-dictionary ARG &rest ARGS)

Implementations

((dict srecode-dictionary)) in `srecode/dictionary.el'.

For dictionary DICT, return the root dictionary. The root dictionary is usually for a current or active insertion.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/srecode/dictionary.el.gz
(cl-defmethod srecode-root-dictionary ((dict srecode-dictionary))
  "For dictionary DICT, return the root dictionary.
The root dictionary is usually for a current or active insertion."
  (let ((ans dict))
    (while (oref ans parent)
      (setq ans (oref ans parent)))
    ans))