Mercurial > hg > xemacs-beta
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 |