Function: semantic-grammar-insert-defun

semantic-grammar-insert-defun is a byte-compiled function defined in grammar.el.gz.

Signature

(semantic-grammar-insert-defun NAME BODY DOCSTRING)

Documentation

Insert declaration of function NAME with BODY and DOCSTRING.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/grammar.el.gz
(defun semantic-grammar-insert-defun (name body docstring)
  "Insert declaration of function NAME with BODY and DOCSTRING."
  (let ((start (point)))
    (insert (format "(defun %s ()\n%S\n%s)\n\n" name docstring body))
    (save-excursion
      (goto-char start)
      (indent-sexp))))