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 b23bcbe15b3..bef2888a969 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -928,7 +928,7 @@ store_symval_forwarding (union Lisp_Fwd *valcontents, register Lisp_Object newva | |||
| 928 | Lisp_Object type = XBUFFER_OBJFWD (valcontents)->slottype; | 928 | Lisp_Object type = XBUFFER_OBJFWD (valcontents)->slottype; |
| 929 | 929 | ||
| 930 | if (!(NILP (type) || NILP (newval) | 930 | if (!(NILP (type) || NILP (newval) |
| 931 | || (XINT (type) == LISP_INT_TAG | 931 | || (XINT (type) == Lisp_Int0 |
| 932 | ? INTEGERP (newval) | 932 | ? INTEGERP (newval) |
| 933 | : XTYPE (newval) == XINT (type)))) | 933 | : XTYPE (newval) == XINT (type)))) |
| 934 | buffer_slot_type_mismatch (newval, XINT (type)); | 934 | buffer_slot_type_mismatch (newval, XINT (type)); |