diff --git a/low/heaps.cc b/low/heaps.cc
index e6f883e6d48fbdcb0c51fc14f7d0d11024e35f94..d11aa72712a84e0d6e9177d7a3ef527634421b78 100644
--- a/low/heaps.cc
+++ b/low/heaps.cc
@@ -151,26 +151,6 @@ void NS_PREFIX HeapStat (const HEAP *theHeap)
   UserWriteF("          usedfreelistent=%d\n",usedfreelistentries);
 }
 
-
-/****************************************************************************/
-/** \brief Initialize memory management module
-
-   This function initializes memory management module.
-   (Supposedly.  Currently it only contains a 'return 0'.
-
-   CAUTION: code may be machine dependent.
-
-   \return
-   0 if module initialized correctly
- */
-/****************************************************************************/
-
-INT NS_PREFIX InitHeaps ()
-{
-  return(0);
-}
-
-
 /****************************************************************************/
 /** \brief Install a new heap structure
 
diff --git a/low/heaps.h b/low/heaps.h
index 2ee32e98028e77039da994f4153e8cb51980380e..db1ba8f539c6d6a8158ebab1825b242c2e6f8d5a 100644
--- a/low/heaps.h
+++ b/low/heaps.h
@@ -200,8 +200,6 @@ extern INT check_of_putcallstack;
 /*                                                                          */
 /****************************************************************************/
 
-INT          InitHeaps                (void);
-
 /** @name Functions for the simple and general heap management */
 /* @{ */
 HEAP        *NewHeap                (enum HeapType type, MEM size, void *buffer);
diff --git a/low/initlow.cc b/low/initlow.cc
index c58784e7a75105b637343bade57f27175b3a81c4..cecd5429b8e7cbc7600e7be60433eb3a561909f3 100644
--- a/low/initlow.cc
+++ b/low/initlow.cc
@@ -86,13 +86,6 @@ INT NS_PREFIX InitLow ()
 {
   INT err;
 
-  /* init heaps.c */
-  if ((err=InitHeaps())!=0)
-  {
-    SetHiWrd(err,__LINE__);
-    return (err);
-  }
-
   /* init ugenv.c */
   if ((err=InitUgEnv())!=0)
   {