diff options
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 4 |
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) */) | |||
| 2673 | DEFUN ("logxor", Flogxor, Slogxor, 0, MANY, 0, | 2673 | DEFUN ("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. |
| 2675 | Arguments may be integers, or markers converted to integers. | 2675 | Arguments may be integers, or markers converted to integers. |
| 2676 | usage: (logxor &rest INTS-OR-MARKERS) */) | 2676 | usage: (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; |