diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2007-05-16 11:23:40 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2007-05-16 11:23:40 +0000 |
| commit | 6099982b0968a636eeccbafccb9a3593f8841449 (patch) | |
| tree | 6d8a18d085ee69c6d1f41298d798cc393b147680 /rts | |
| parent | 72fbfd1c72d4b3b331e201289ef2ce98d848d879 (diff) | |
| download | haskell-6099982b0968a636eeccbafccb9a3593f8841449.tar.gz | |
later mingw runtimes have gettimeofday, it seems
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/Linker.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index e489bed818..65305f3d3d 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 |