X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=mmalloc%2Fmcalloc.c;h=83f5029188ff382d62df81fe4c59e3e0a4d7d1a7;hb=a380d35f81da4bd3e6c31ab32629ec79aecfa5a4;hp=c9fcc07e894858f541e74145eced4c70b17c3199;hpb=d70485fb7a2776fbfeccdabc568aa98ab3a80225;p=ocaml-ancient.git

diff --git a/mmalloc/mcalloc.c b/mmalloc/mcalloc.c
index c9fcc07..83f5029 100644
--- a/mmalloc/mcalloc.c
+++ b/mmalloc/mcalloc.c
@@ -39,6 +39,8 @@ mcalloc (md, nmemb, size)
   return (result);
 }
 
+#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
@@ -52,3 +54,5 @@ calloc (nmemb, size)
 {
   return (mcalloc ((PTR) NULL, nmemb, size));
 }
+
+#endif