Mercurial > emacs
comparison src/alloc.c @ 4087:bdecedbd64db
(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 |
comparison
equal
deleted
inserted
replaced
| 4086:26e6084c5885 | 4087:bdecedbd64db |
|---|---|
| 1457 static void | 1457 static void |
| 1458 mark_object (objptr) | 1458 mark_object (objptr) |
| 1459 Lisp_Object *objptr; | 1459 Lisp_Object *objptr; |
| 1460 { | 1460 { |
| 1461 register Lisp_Object obj; | 1461 register Lisp_Object obj; |
| 1462 | |
| 1463 #ifdef DEBUG_MOLE | |
| 1464 if (*(int *) ((char *)__builtin_frame_address (0) - 16) == 0) | |
| 1465 abort (); | |
| 1466 #endif | |
| 1462 | 1467 |
| 1463 obj = *objptr; | 1468 obj = *objptr; |
| 1464 XUNMARK (obj); | 1469 XUNMARK (obj); |
| 1465 | 1470 |
| 1466 loop: | 1471 loop: |