# HG changeset patch # User Miles Bader # Date 1003288290 0 # Node ID 9c096889e4c6b2711532a61dd1b370058b20bdf8 # Parent c9411c9fab91cc348f17c80089d0c5a0b89572e4 (DEFUN): Remove `DOC_STRINGS_IN_COMMENTS' case. diff -r c9411c9fab91 -r 9c096889e4c6 src/lisp.h --- 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 *)