Mercurial > hg > xemacs-beta

comparison src/symeval.h @ 4971:bcdf496e49d0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
put back patch to get more informative staticpro debugging -------------------- ChangeLog entries follow: -------------------- src/ChangeLog addition: 2010-02-04 Ben Wing <ben@xemacs.org> * symbols.c (defsymbol_massage_name_1): * symbols.c (defsymbol_nodump): * symbols.c (defsymbol): * symbols.c (defkeyword): * symeval.h (DEFVAR_SYMVAL_FWD_OBJECT): Put this back again: Make the various calls to staticpro() instead call staticpro_1(), passing in the name of the C var being staticpro'ed, so that it shows up in staticpro_names. Otherwise staticpro_names just has 1000+ copies of the word `location'.
author Ben Wing <ben@xemacs.org>
date Thu, 04 Feb 2010 05:55:25 -0600
parents cbe181529c34
children b5df3737028a
comparison
equal deleted inserted replaced
4970:5c89ceb69819 4971:bcdf496e49d0
458 do \ 458 do \
459 { \ 459 { \
460 DEFVAR_SYMVAL_FWD (lname, c_location, forward_type, magicfun); \ 460 DEFVAR_SYMVAL_FWD (lname, c_location, forward_type, magicfun); \
461 { \ 461 { \
462 Lisp_Object *DSF_location = c_location; /* Type check */ \ 462 Lisp_Object *DSF_location = c_location; /* Type check */ \
463 staticpro (DSF_location); \ 463 staticpro_1 (DSF_location, lname); \
464 if (EQ (*DSF_location, Qnull_pointer)) *DSF_location = Qnil; \ 464 if (EQ (*DSF_location, Qnull_pointer)) *DSF_location = Qnil; \
465 } \ 465 } \
466 } while (0) 466 } while (0)
467 467
468 #define DEFVAR_LISP(lname, c_location) \ 468 #define DEFVAR_LISP(lname, c_location) \