Function: c-lineup-gnu-DEFUN-intro-cont
c-lineup-gnu-DEFUN-intro-cont is a byte-compiled function defined in
cc-align.el.gz.
Signature
(c-lineup-gnu-DEFUN-intro-cont LANGELEM)
Documentation
Line up the continuation lines of a DEFUN macro in the Emacs C source.
These lines are indented c-basic-offset columns, usually from column 0.
Return nil when we're not in such a construct.
This function was formally for use in DEFUNs, which used to have knr argument lists. Now (2019-05) it just indents the argument list of the DEFUN's function, which would otherwise go to column 0.
Here is an example:
DEFUN ("forward-char", Fforward_char, Sforward_char, 0, 1, "p",
doc: /* Move point right N characters (left if N is negative).
On reaching end of buffer, stop and signal error. */)
(Lisp_Object n) <- c-lineup-gnu-DEFUN-into-cont
Works with: topmost-intro-cont.
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/cc-align.el.gz
(defun c-lineup-gnu-DEFUN-intro-cont (langelem)
"Line up the continuation lines of a DEFUN macro in the Emacs C source.
These lines are indented `c-basic-offset' columns, usually from column 0.
Return nil when we're not in such a construct.
This function was formally for use in DEFUNs, which used to have knr
argument lists. Now (2019-05) it just indents the argument list of the
DEFUN's function, which would otherwise go to column 0.
Here is an example:
DEFUN (\"forward-char\", Fforward_char, Sforward_char, 0, 1, \"p\",
doc: /* Move point right N characters (left if N is negative).
On reaching end of buffer, stop and signal error. */)
(Lisp_Object n) <- c-lineup-gnu-DEFUN-into-cont
Works with: topmost-intro-cont."
(save-excursion
(let (case-fold-search)
(goto-char (c-langelem-pos langelem))
(if (looking-at "\\<DEFUN\\>")
c-basic-offset))))