warning fix
authorSimon Marlow <simonmar@microsoft.com>
Wed, 7 Jun 2006 14:10:13 +0000 (14:10 +0000)
committerSimon Marlow <simonmar@microsoft.com>
Wed, 7 Jun 2006 14:10:13 +0000 (14:10 +0000)
rts/Linker.c

index 8a82190..1919618 100644 (file)
@@ -825,7 +825,7 @@ initFreeList(rootEntry *table, nat n, rootEntry *free)
   root_ptr_free = table;
 }
 
   root_ptr_free = table;
 }
 
-void
+static void
 initRootPtrTable(void)
 {
   if (RPT_size > 0)
 initRootPtrTable(void)
 {
   if (RPT_size > 0)
@@ -839,7 +839,7 @@ initRootPtrTable(void)
 }
 
 
 }
 
 
-void
+static void
 enlargeRootPtrTable(void)
 {
   nat old_RPT_size = RPT_size;
 enlargeRootPtrTable(void)
 {
   nat old_RPT_size = RPT_size;