Mercurial > emacs
changeset 39987:9c096889e4c6
(DEFUN): Remove `DOC_STRINGS_IN_COMMENTS' case.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Wed, 17 Oct 2001 03:11:30 +0000 |
| parents | c9411c9fab91 |
| children | eac4e9ae201c |
| files | src/lisp.h |
| diffstat | 1 files changed, 0 insertions(+), 26 deletions(-) [+] |
line wrap: on
line diff
--- a/src/lisp.h Wed Oct 17 02:53:57 2001 +0000 +++ b/src/lisp.h Wed Oct 17 03:11:30 2001 +0000 @@ -1560,17 +1560,6 @@ #if (!defined (__STDC__) && !defined (PROTOTYPES)) \ || defined (USE_NONANSI_DEFUN) -#ifdef DOC_STRINGS_IN_COMMENTS - -#define DEFUN(lname, fnname, sname, minargs, maxargs, prompt, doc) \ - Lisp_Object fnname (); \ - struct Lisp_Subr sname = \ - { PVEC_SUBR | (sizeof (struct Lisp_Subr) / sizeof (EMACS_INT)), \ - fnname, minargs, maxargs, lname, prompt, 0}; \ - Lisp_Object fnname - -#else /* not DOC_STRINGS_IN_COMMENTS */ - #define DEFUN(lname, fnname, sname, minargs, maxargs, prompt, args) \ Lisp_Object fnname (); \ struct Lisp_Subr sname = \ @@ -1578,21 +1567,8 @@ fnname, minargs, maxargs, lname, prompt, 0}; \ Lisp_Object fnname args -#endif /* not DOC_STRINGS_IN_COMMENTS */ - #else -#ifdef DOC_STRINGS_IN_COMMENTS - -#define DEFUN(lname, fnname, sname, minargs, maxargs, prompt, args) \ - Lisp_Object fnname DEFUN_ARGS_ ## maxargs ; \ - struct Lisp_Subr sname = \ - { PVEC_SUBR | (sizeof (struct Lisp_Subr) / sizeof (EMACS_INT)), \ - fnname, minargs, maxargs, lname, prompt, 0}; \ - Lisp_Object fnname args - -#else /* not DOC_STRINGS_IN_COMMENTS */ - /* This version of DEFUN declares a function prototype with the right arguments, so we can catch errors with maxargs at compile-time. */ #define DEFUN(lname, fnname, sname, minargs, maxargs, prompt, doc) \ @@ -1602,8 +1578,6 @@ fnname, minargs, maxargs, lname, prompt, 0}; \ Lisp_Object fnname -#endif /* not DOC_STRINGS_IN_COMMENTS */ - /* Note that the weird token-substitution semantics of ANSI C makes this work for MANY and UNEVALLED. */ #define DEFUN_ARGS_MANY (int, Lisp_Object *)