Mercurial > hg > xemacs-beta

diff src/lisp.h @ 100:4be1180a9e89 r20-1b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b2
author cvs
date Mon, 13 Aug 2007 09:15:11 +0200
parents ac0620f6398e
children b980b6286996
line wrap: on
line diff
--- a/src/lisp.h	Mon Aug 13 09:13:58 2007 +0200
+++ b/src/lisp.h	Mon Aug 13 09:15:11 2007 +0200
@@ -1423,12 +1423,11 @@
    Snarf_documentation chokes */
 
 #define DEFUN(lname, Fname, minargs, maxargs, prompt, arglist)		\
-  Lisp_Object Fname (DEFUN_ ## maxargs arglist) ; /* See below */	\
+  Lisp_Object Fname (DEFUN_##maxargs arglist) ; /* See below */	\
   static struct Lisp_Subr S##Fname = { {lrecord_subr},			\
 	minargs, maxargs, prompt, 0, lname, (lisp_fn_t) Fname };	\
   Lisp_Object Fname (DEFUN_##maxargs arglist)
 
-
 /* Heavy ANSI C preprocessor hackery to get DEFUN to declare a
    prototype that matches maxargs, and add the obligatory
    `Lisp_Object' type declaration to the formal C arguments.  */