Function: semantic-grammar-header
semantic-grammar-header is a byte-compiled function defined in
grammar.el.gz.
Signature
(semantic-grammar-header)
Documentation
Return text of a generated standard header.
Source Code
;; Defined in /usr/src/emacs/lisp/cedet/semantic/grammar.el.gz
(defun semantic-grammar-header ()
"Return text of a generated standard header."
(semantic-grammar--template-expand
semantic-grammar-header-template
`((file . ,(semantic-grammar-buffer-file
semantic--grammar-output-buffer))
(gram . ,(semantic-grammar-buffer-file))
(date . ,(format-time-string "%Y-%m-%d %T%z"))
(require-form . ,(format "%S" semantic-grammar-require-form))
(vcid . ,(concat "$" "Id" "$")) ;; Avoid expansion
;; Try to get the copyright from the input grammar, or
;; generate a new one if not found.
(copy . ,(or (semantic-grammar-copyright-line)
(concat (format-time-string ";; Copyright (C) %Y ")
user-full-name))))))