X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=191961898a994939546cd907f4137e6f8ddb540a;hb=33db60082554c323f66369e02808d3df5970a36d;hp=3cfd2a8f91c76f89a14bcbf21e8d56a43cb0bc99;hpb=e3c55aebd4f9ce7a5b4390d4726612865fd207f2;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index 3cfd2a8..1919618 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -333,6 +333,7 @@ typedef struct _RtsSymbolVal {
       Sym(mktime)                               \
       Sym(_imp___timezone)                      \
       Sym(_imp___tzname)                        \
+      Sym(_imp__tzname)                         \
       Sym(_imp___iob)                           \
       Sym(_imp___osver)                         \
       Sym(localtime)                            \
@@ -824,7 +825,7 @@ initFreeList(rootEntry *table, nat n, rootEntry *free)
   root_ptr_free = table;
 }
 
-void
+static void
 initRootPtrTable(void)
 {
   if (RPT_size > 0)
@@ -838,7 +839,7 @@ initRootPtrTable(void)
 }
 
 
-void
+static void
 enlargeRootPtrTable(void)
 {
   nat old_RPT_size = RPT_size;