aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/alloc.c12
-rw-r--r--src/data.c5
2 files changed, 5 insertions, 12 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 53af7325f47..39964c4b293 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -302,15 +302,11 @@ static intptr_t garbage_collection_inhibited;
302 302
303const char *pending_malloc_warning; 303const char *pending_malloc_warning;
304 304
305#if 0 /* Normally, pointer sanity only on request... */ 305/* Pointer sanity only on request. FIXME: Code depending on
306 SUSPICIOUS_OBJECT_CHECKING is obsolete; remove it entirely. */
306#ifdef ENABLE_CHECKING 307#ifdef ENABLE_CHECKING
307#define SUSPICIOUS_OBJECT_CHECKING 1 308#define SUSPICIOUS_OBJECT_CHECKING 1
308#endif 309#endif
309#endif
310
311/* ... but unconditionally use SUSPICIOUS_OBJECT_CHECKING while the GC
312 bug is unresolved. */
313#define SUSPICIOUS_OBJECT_CHECKING 1
314 310
315#ifdef SUSPICIOUS_OBJECT_CHECKING 311#ifdef SUSPICIOUS_OBJECT_CHECKING
316struct suspicious_free_record 312struct suspicious_free_record
@@ -327,8 +323,8 @@ static int suspicious_free_history_index;
327static void *find_suspicious_object_in_range (void *begin, void *end); 323static void *find_suspicious_object_in_range (void *begin, void *end);
328static void detect_suspicious_free (void *ptr); 324static void detect_suspicious_free (void *ptr);
329#else 325#else
330# define find_suspicious_object_in_range(begin, end) NULL 326# define find_suspicious_object_in_range(begin, end) ((void *) NULL)
331# define detect_suspicious_free(ptr) (void) 327# define detect_suspicious_free(ptr) ((void) 0)
332#endif 328#endif
333 329
334/* Maximum amount of C stack to save when a GC happens. */ 330/* Maximum amount of C stack to save when a GC happens. */
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