X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FRtsUtils.c;fp=ghc%2Frts%2FRtsUtils.c;h=8f6579cb740a62a9155fe99e4a5317b0998c1c16;hb=a2c4ea5225783e816f397687e1c15282421d3027;hp=5817a95871e176fdfe56ad67f9387c6f48dc9f4d;hpb=1d87bd263e2d7cbaf08fed9c5ee2edba8124e4ea;p=ghc-hetmet.git diff --git a/ghc/rts/RtsUtils.c b/ghc/rts/RtsUtils.c index 5817a95..8f6579c 100644 --- a/ghc/rts/RtsUtils.c +++ b/ghc/rts/RtsUtils.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: RtsUtils.c,v 1.33 2003/03/31 19:19:34 sof Exp $ + * $Id: RtsUtils.c,v 1.34 2003/04/01 15:40:27 sof Exp $ * * (c) The GHC Team, 1998-2002 * @@ -252,7 +252,9 @@ setNonBlockingFd(int fd) fcntl(fd, F_SETFL, fd_flags | O_NONBLOCK); } #else -/* Don't support non-blocking FDs (yet) on mingw */ +/* Stub defns -- async / non-blocking IO is not done + * via O_NONBLOCK and select() under Win32. + */ void resetNonBlockingFd(int fd STG_UNUSED) {} void setNonBlockingFd(int fd STG_UNUSED) {} #endif