From 6099982b0968a636eeccbafccb9a3593f8841449 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Wed, 16 May 2007 11:23:40 +0000 Subject: [PATCH] later mingw runtimes have gettimeofday, it seems --- rts/Linker.c | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/rts/Linker.c b/rts/Linker.c index e489bed..65305f3 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -256,6 +256,12 @@ typedef struct _RtsSymbolVal { #define RTS_MINGW_EXTRA_SYMS #endif +#if HAVE_GETTIMEOFDAY +#define RTS_MINGW_GETTIMEOFDAY_SYM Sym(gettimeofday) +#else +#define RTS_MINGW_GETTIMEOFDAY_SYM /**/ +#endif + /* These are statically linked from the mingw libraries into the ghc executable, so we have to employ this hack. */ #define RTS_MINGW_ONLY_SYMBOLS \ @@ -339,6 +345,7 @@ typedef struct _RtsSymbolVal { Sym(readdir) \ Sym(rewinddir) \ RTS_MINGW_EXTRA_SYMS \ + RTS_MINGW_GETTIMEOFDAY_SYM \ Sym(closedir) #endif -- 1.7.10.4