26aa282203
since if we are doing this kind of debugging we really might want to inspect the library internals too.
20 lines
533 B
Plaintext
20 lines
533 B
Plaintext
--- dbg_mlc.c.orig Tue Apr 22 20:06:56 1997
|
|
+++ dbg_mlc.c Tue Apr 20 09:59:53 1999
|
|
@@ -386,7 +386,7 @@
|
|
{
|
|
register GC_PTR base = GC_base(p);
|
|
register ptr_t clobbered;
|
|
- register GC_PTR result = GC_debug_malloc(lb, s, i);
|
|
+ register GC_PTR result;
|
|
register size_t copy_sz = lb;
|
|
register size_t old_sz;
|
|
register hdr * hhdr;
|
|
@@ -432,6 +432,7 @@
|
|
if (old_sz < copy_sz) copy_sz = old_sz;
|
|
if (result == 0) return(0);
|
|
BCOPY(p, result, copy_sz);
|
|
+ GC_debug_free(p);
|
|
return(result);
|
|
}
|
|
|