diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-05-27 23:48:18 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-05-27 23:48:18 +0000 |
| commit | 6b5fd105cefb333edfd2a39af1c6428bfb1c4e19 (patch) | |
| tree | 6573243f977314859f91859a4af6823da39148b0 /src/alloc.c | |
| parent | 78c7997f4d271706a9b9b00d799820538ce4dad9 (diff) | |
| download | emacs-6b5fd105cefb333edfd2a39af1c6428bfb1c4e19.tar.gz emacs-6b5fd105cefb333edfd2a39af1c6428bfb1c4e19.tar.bz2 emacs-6b5fd105cefb333edfd2a39af1c6428bfb1c4e19.zip | |
(mark_object): Add debugging code to check for ptr clobbered.
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/alloc.c b/src/alloc.c index 48117d4e356..a6f554ad086 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -1623,7 +1623,11 @@ mark_object (objptr) XUNMARK (obj); goto loop; } + if (ptr == 0) + abort (); mark_object (&ptr->car); + if (ptr == 0) + abort (); objptr = &ptr->cdr; obj = ptr->cdr; goto loop; |