Mercurial > emacs

diff src/alloc.c @ 4087:bdecedbd64db

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mark_object) [DEBUG_MOLE]: Add abort at beginning.
author Richard M. Stallman <rms@gnu.org>
date Wed, 14 Jul 1993 16:36:25 +0000
parents 41c85710702d
children 0b32ee899a3a
line wrap: on
line diff
--- a/src/alloc.c	Wed Jul 14 07:24:36 1993 +0000
+++ b/src/alloc.c	Wed Jul 14 16:36:25 1993 +0000
@@ -1460,6 +1460,11 @@
 {
   register Lisp_Object obj;
 
+#ifdef DEBUG_MOLE
+  if (*(int *) ((char *)__builtin_frame_address (0) - 16) == 0)
+    abort ();
+#endif
+
   obj = *objptr;
   XUNMARK (obj);