Function: srecode-adebug-dictionary

srecode-adebug-dictionary is an interactive and byte-compiled function defined in dictionary.el.gz.

Signature

(srecode-adebug-dictionary)

Documentation

Run data-debug on this mode's dictionary.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/srecode/dictionary.el.gz
;;; DUMP DICTIONARY
;;
;; Make a dictionary, and dump it's contents.

(defun srecode-adebug-dictionary ()
  "Run data-debug on this mode's dictionary."
  (interactive)
  (require 'eieio-datadebug)
  (require 'srecode/find)
  (let* ((modesym major-mode)
	 (start (current-time))
	 (_ (or (progn (srecode-load-tables-for-mode modesym)
		       (srecode-get-mode-table modesym))
		(error "No table found for mode %S" modesym)))
	 (dict (srecode-create-dictionary (current-buffer)))
	 )
    (message "Creating a dictionary took %.2f seconds."
	     (semantic-elapsed-time start nil))
    (data-debug-new-buffer "*SRECODE ADEBUG*")
    (data-debug-insert-object-slots dict "*")))