X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=rts%2FLinker.c;h=191961898a994939546cd907f4137e6f8ddb540a;hb=33922e599b8571ec8282fa49c12066cdc704a891;hp=8a82190827cea4d0a534fc89be10f5eb007e5834;hpb=f922f05eea61f167abda6fb53c179190f8cef118;p=ghc-hetmet.git

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