Function: srecode-make-mode-table

srecode-make-mode-table is a byte-compiled function defined in table.el.gz.

Signature

(srecode-make-mode-table MODE)

Documentation

Get the SRecoder mode table for the major mode MODE.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/srecode/table.el.gz
(defun srecode-make-mode-table (mode)
  "Get the SRecoder mode table for the major mode MODE."
  (let ((old (eieio-instance-tracker-find
	      mode 'major-mode 'srecode-mode-table-list)))
    (or old
	(let* ((new (srecode-mode-table :major-mode mode
                                        :modetables nil
                                        :tables nil)))
	  ;; Save this new mode table in that mode's variable.
	  (eval `(setq-mode-local ,mode srecode-table ,new) t)

	  new))))