diff options
| author | Paul Eggert | 2019-08-21 22:19:03 -0700 |
|---|---|---|
| committer | Paul Eggert | 2019-08-21 22:30:18 -0700 |
| commit | 2b552f34892ee3c73f4b5fb5380218dc6ebbf4bb (patch) | |
| tree | a5c875fa6082cb43b403a9bfa0b3ef2b90d93ebc /src/data.c | |
| parent | ceebf3efbea7faffc01558d88c91250539c737e0 (diff) | |
| download | emacs-2b552f34892ee3c73f4b5fb5380218dc6ebbf4bb.tar.gz emacs-2b552f34892ee3c73f4b5fb5380218dc6ebbf4bb.zip | |
Don’t debug fset by default
This GC bug seems to have been fixed, so the check is no longer
needed in production code. From a suggestion by Pip Cet in:
https://lists.gnu.org/r/emacs-devel/2019-08/msg00316.html
* src/alloc.c (SUSPICIOUS_OBJECT_CHECKING) [!ENABLE_CHECKING]:
Do not define.
(find_suspicious_object_in_range, detect_suspicious_free):
Expand to proper dummy expressions if !SUSPICIOUS_OBJECT_CHECKING.
* src/data.c (Ffset): Convert test to an eassert.
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/data.c b/src/data.c index 8344bfdd3d5..2797adfcdc8 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -771,10 +771,7 @@ DEFUN ("fset", Ffset, Sfset, 2, 2, 0, | |||
| 771 | if (AUTOLOADP (function)) | 771 | if (AUTOLOADP (function)) |
| 772 | Fput (symbol, Qautoload, XCDR (function)); | 772 | Fput (symbol, Qautoload, XCDR (function)); |
| 773 | 773 | ||
| 774 | /* Convert to eassert or remove after GC bug is found. In the | 774 | eassert (valid_lisp_object_p (definition)); |
| 775 | meantime, check unconditionally, at a slight perf hit. */ | ||
| 776 | if (! valid_lisp_object_p (definition)) | ||
| 777 | emacs_abort (); | ||
| 778 | 775 | ||
| 779 | set_symbol_function (symbol, definition); | 776 | set_symbol_function (symbol, definition); |
| 780 | 777 | ||