comparison src/lisp.h @ 4979:4234fd5a7b17

fix bug #668 (compile error, not --with-debug) -------------------- ChangeLog entries follow: -------------------- src/ChangeLog addition: 2010-02-05 Ben Wing <ben@xemacs.org> * lisp.h: * lisp.h (staticpro_nodump_1): Define staticpro_1 and staticpro_nodump_1 when not XEMACS_DEBUG. * symbols.c (defsymbol_massage_name_1): * symbols.c (defsymbol_massage_multiword_predicate): Cosmetic fixes.
author Ben Wing <ben@xemacs.org>
date Fri, 05 Feb 2010 08:09:03 -0600
parents 16112448d484
children 3c3c1d139863
comparison
equal deleted inserted replaced
4978:f48bf636045f 4979:4234fd5a7b17
4298 4298
4299 #else 4299 #else
4300 4300
4301 /* Call staticpro (&var) to protect static variable `var'. */ 4301 /* Call staticpro (&var) to protect static variable `var'. */
4302 MODULE_API void staticpro (Lisp_Object *); 4302 MODULE_API void staticpro (Lisp_Object *);
4303 /* staticpro_1 (varptr, name) is used when we're not directly calling
4304 staticpro() on the address of a Lisp variable, but on a pointer we
4305 got from elsewhere. In that case, NAME is a string describing the
4306 actual variable in question. NAME is used only for debugging purposes,
4307 and hence when not DEBUG_XEMACS, staticpro_1() just calls staticpro().
4308 With DEBUG_XEMACS, however, it's the reverse -- staticpro() calls
4309 staticpro_1(), using the ANSI "stringize" operator to construct a string
4310 out of the variable name. */
4311 #define staticpro_1(ptr, name) staticpro (ptr)
4303 4312
4304 /* Call staticpro_nodump (&var) to protect static variable `var'. */ 4313 /* Call staticpro_nodump (&var) to protect static variable `var'. */
4305 /* var will not be saved at dump time */ 4314 /* var will not be saved at dump time */
4306 MODULE_API void staticpro_nodump (Lisp_Object *); 4315 MODULE_API void staticpro_nodump (Lisp_Object *);
4316 #define staticpro_nodump_1(ptr, name) staticpro_nodump (ptr)
4307 4317
4308 #ifdef HAVE_SHLIB 4318 #ifdef HAVE_SHLIB
4309 /* Call unstaticpro_nodump (&var) to stop protecting static variable `var'. */ 4319 /* Call unstaticpro_nodump (&var) to stop protecting static variable `var'. */
4310 MODULE_API void unstaticpro_nodump (Lisp_Object *); 4320 MODULE_API void unstaticpro_nodump (Lisp_Object *);
4311 #endif 4321 #endif