(DEFUN): Remove `DOC_STRINGS_IN_COMMENTS' case.

[gnu-emacs] / src / lisp.h

diff --git a/src/lisp.h b/src/lisp.h
index 2cb7a1fcc7f9eaf47ee3bb1b671091b4e46dfbdd..cba2349b581a33902797fa1b6c98446d3ca1e68d 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1560,17 +1560,6 @@ typedef unsigned char UCHAR;
 #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 @@ typedef unsigned char UCHAR;
       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 @@ typedef unsigned char UCHAR;
       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 *)