Mercurial > hg > xemacs-beta
diff src/free-hook.c @ 233:52952cbfc5b5 r20-5b15
Import from CVS: tag r20-5b15
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:14:14 +0200 |
parents | 3d6bfa290dbd |
children | 966663fcf606 |
line wrap: on
line diff
--- a/src/free-hook.c Mon Aug 13 10:13:49 2007 +0200 +++ b/src/free-hook.c Mon Aug 13 10:14:14 2007 +0200 @@ -222,6 +222,7 @@ (void **) &size); if (!present) + { /* This can only happen if you try to free something that didn't come from malloc */ if (strict_free_check) @@ -232,8 +233,10 @@ __malloc_hook = check_malloc; goto end; } + } if (size < 0) + { /* This happens when you free twice */ if (strict_free_check) abort (); @@ -243,6 +246,7 @@ __malloc_hook = check_malloc; goto end; } + } puthash (ptr, (void *)-size, pointer_table); #ifdef UNMAPPED_FREE /* Round up size to an even number of pages. */