aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/data.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/data.c b/src/data.c
index eb1cbf77bbc..eb04f5a39aa 100644
--- a/src/data.c
+++ b/src/data.c
@@ -618,7 +618,7 @@ DEFUN ("makunbound", Fmakunbound, Smakunbound, 1, 1, 0, "Make SYMBOL's value be
618 CHECK_SYMBOL (symbol, 0); 618 CHECK_SYMBOL (symbol, 0);
619 if (NILP (symbol) || EQ (symbol, Qt) 619 if (NILP (symbol) || EQ (symbol, Qt)
620 || (XSYMBOL (symbol)->name->data[0] == ':' 620 || (XSYMBOL (symbol)->name->data[0] == ':'
621 && XSYMBOL (symbol)->obarray == initial_obarray 621 && EQ (XSYMBOL (symbol)->obarray, initial_obarray)
622 && keyword_symbols_constant_flag)) 622 && keyword_symbols_constant_flag))
623 return Fsignal (Qsetting_constant, Fcons (symbol, Qnil)); 623 return Fsignal (Qsetting_constant, Fcons (symbol, Qnil));
624 Fset (symbol, Qunbound); 624 Fset (symbol, Qunbound);
@@ -970,7 +970,7 @@ set_internal (symbol, newval, bindflag)
970 CHECK_SYMBOL (symbol, 0); 970 CHECK_SYMBOL (symbol, 0);
971 if (NILP (symbol) || EQ (symbol, Qt) 971 if (NILP (symbol) || EQ (symbol, Qt)
972 || (XSYMBOL (symbol)->name->data[0] == ':' 972 || (XSYMBOL (symbol)->name->data[0] == ':'
973 && XSYMBOL (symbol)->obarray == initial_obarray 973 && EQ (XSYMBOL (symbol)->obarray, initial_obarray)
974 && keyword_symbols_constant_flag && ! EQ (newval, symbol))) 974 && keyword_symbols_constant_flag && ! EQ (newval, symbol)))
975 return Fsignal (Qsetting_constant, Fcons (symbol, Qnil)); 975 return Fsignal (Qsetting_constant, Fcons (symbol, Qnil));
976 valcontents = XSYMBOL (symbol)->value; 976 valcontents = XSYMBOL (symbol)->value;