diff options
author | Duncan Coutts <duncan@well-typed.com> | 2011-10-31 11:39:15 +0000 |
---|---|---|
committer | Duncan Coutts <duncan@well-typed.com> | 2011-10-31 11:39:15 +0000 |
commit | d518e8f1a6f111575aba37bb0b0ba00168ad7fcd (patch) | |
tree | 0178dcd72435ca19dc527807edc97ec4918993e8 /rts | |
parent | c439818a1ac494baeed5706922c4292e44cdaa49 (diff) | |
download | haskell-d518e8f1a6f111575aba37bb0b0ba00168ad7fcd.tar.gz |
Fix recent rts flags changes on windows
I naively assumed that mingw would not have unistd.h or sys/types
but it has both, yet does not have getuid() and friends.
Diffstat (limited to 'rts')
-rw-r--r-- | rts/RtsFlags.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c index c3784ad2ee..bd2bf6748d 100644 --- a/rts/RtsFlags.c +++ b/rts/RtsFlags.c @@ -536,7 +536,7 @@ void setupRtsFlags (int *argc, char *argv[]) static void checkSuid(RtsOptsEnabledEnum enabled) { -#if defined(HAVE_UNISTD_H) && defined(HAVE_SYS_TYPES_H) +#if defined(HAVE_UNISTD_H) && defined(HAVE_SYS_TYPES_H) && !defined(mingw32_HOST_OS) if (enabled == RtsOptsSafeOnly) { /* This doesn't cover linux/posix capabilities like CAP_DAC_OVERRIDE, we'd have to link with -lcap for that. */ |