X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=mmalloc%2Fmfree.c;h=9622afc0a86ab86b089a95e759ef81c4caf81c0f;hb=690b40de4026658d385caf2cdbfa13837a1e679e;hp=c509ac6e2a6865f8b4a5968fc7eae8118fa3ba7b;hpb=d70485fb7a2776fbfeccdabc568aa98ab3a80225;p=ocaml-ancient.git

diff --git a/mmalloc/mfree.c b/mmalloc/mfree.c
index c509ac6..9622afc 100644
--- a/mmalloc/mfree.c
+++ b/mmalloc/mfree.c
@@ -233,6 +233,8 @@ mfree (md, ptr)
     }
 }
 
+#if 0 // RWMJ
+
 /* When using this package, provide a version of malloc/realloc/free built
    on top of it, so that if we use the default sbrk() region we will not
    collide with another malloc package trying to do the same thing, if
@@ -245,3 +247,5 @@ free (ptr)
 {
   mfree ((PTR) NULL, ptr);
 }
+
+#endif