--- 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);
 }
 
