diff options
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/data.c b/src/data.c index ba5bdc5df3a..32ec89871a8 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -1426,7 +1426,7 @@ set_internal (Lisp_Object symbol, Lisp_Object newval, Lisp_Object where, | |||
| 1426 | static void | 1426 | static void |
| 1427 | set_symbol_trapped_write (Lisp_Object symbol, enum symbol_trapped_write trap) | 1427 | set_symbol_trapped_write (Lisp_Object symbol, enum symbol_trapped_write trap) |
| 1428 | { | 1428 | { |
| 1429 | struct Lisp_Symbol* sym = XSYMBOL (symbol); | 1429 | struct Lisp_Symbol *sym = XSYMBOL (symbol); |
| 1430 | if (sym->trapped_write == SYMBOL_NOWRITE) | 1430 | if (sym->trapped_write == SYMBOL_NOWRITE) |
| 1431 | xsignal1 (Qtrapping_constant, symbol); | 1431 | xsignal1 (Qtrapping_constant, symbol); |
| 1432 | sym->trapped_write = trap; | 1432 | sym->trapped_write = trap; |