comparison src/symbols.c @ 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 bcdf496e49d0
children b5df3737028a
comparison
equal deleted inserted replaced
4978:f48bf636045f 4979:4234fd5a7b17
3597 reinit_symbols_early (void) 3597 reinit_symbols_early (void)
3598 { 3598 {
3599 } 3599 }
3600 3600
3601 static void 3601 static void
3602 defsymbol_massage_name_1 (Lisp_Object *location, const Ascbyte *name, int dump_p, 3602 defsymbol_massage_name_1 (Lisp_Object *location, const Ascbyte *name,
3603 int multiword_predicate_p) 3603 int dump_p, int multiword_predicate_p)
3604 { 3604 {
3605 char temp[500]; 3605 char temp[500];
3606 int len = strlen (name) - 1; 3606 int len = strlen (name) - 1;
3607 int i; 3607 int i;
3608 3608
3644 { 3644 {
3645 defsymbol_massage_name_1 (location, name, 0, 1); 3645 defsymbol_massage_name_1 (location, name, 0, 1);
3646 } 3646 }
3647 3647
3648 void 3648 void
3649 defsymbol_massage_multiword_predicate (Lisp_Object *location, const Ascbyte *name) 3649 defsymbol_massage_multiword_predicate (Lisp_Object *location,
3650 const Ascbyte *name)
3650 { 3651 {
3651 defsymbol_massage_name_1 (location, name, 1, 1); 3652 defsymbol_massage_name_1 (location, name, 1, 1);
3652 } 3653 }
3653 3654
3654 void 3655 void