aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/data.c b/src/data.c
index 4a846207073..00ef0b1c822 100644
--- a/src/data.c
+++ b/src/data.c
@@ -606,7 +606,7 @@ Return 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;
@@ -2673,7 +2673,7 @@ usage: (logior &rest INTS-OR-MARKERS) */)
2673DEFUN ("logxor", Flogxor, Slogxor, 0, MANY, 0, 2673DEFUN ("logxor", Flogxor, Slogxor, 0, MANY, 0,
2674 doc: /* Return bitwise-exclusive-or of all the arguments. 2674 doc: /* Return bitwise-exclusive-or of all the arguments.
2675Arguments may be integers, or markers converted to integers. 2675Arguments may be integers, or markers converted to integers.
2676usage: (logxor &rest INTS-OR-MARKERS) */) 2676usage: (logxor &rest INTS-OR-MARKERS) */)
2677 (nargs, args) 2677 (nargs, args)
2678 int nargs; 2678 int nargs;
2679 Lisp_Object *args; 2679 Lisp_Object *args;