comparison src/data.c @ 73838:a99be0fe5bd4

(Fmakunbound): Use SYMBOL_CONSTANT_P macro.
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 08 Nov 2006 21:13:44 +0000
parents 7febc7ff0f0d
children a248fe2d281f
comparison
equal deleted inserted replaced
73837:28bd4e5c228d 73838:a99be0fe5bd4
604 Return SYMBOL. */) 604 Return SYMBOL. */)
605 (symbol) 605 (symbol)
606 register Lisp_Object symbol; 606 register Lisp_Object symbol;
607 { 607 {
608 CHECK_SYMBOL (symbol); 608 CHECK_SYMBOL (symbol);
609 if (XSYMBOL (symbol)->constant) 609 if (SYMBOL_CONSTANT_P (symbol))
610 xsignal1 (Qsetting_constant, symbol); 610 xsignal1 (Qsetting_constant, symbol);
611 Fset (symbol, Qunbound); 611 Fset (symbol, Qunbound);
612 return symbol; 612 return symbol;
613 } 613 }
614 614