base's FD.hs defines and exports setNonBlockingMode on Windows hosts

1. 11 currently does not compile under Windows due to setNonBlockingMode in base/GHC/IO/FD.hs.

I'm not sure what the behavior of it should be on Windows, perhaps identity on fd:

setNonBlockingMode :: FD -> Bool -> IO FD
#ifndef mingw32_HOST_OS
setNonBlockingMode fd set = do 
  setNonBlockingFD (fdFD fd) set
  return fd{ fdIsNonBlocking = fromEnum set }
#else
setNonBlockingMode fd _ = return fd
#endif

Trac metadata

Trac field	Value
Version	6.11
Type	Bug
TypeOfFailure	OtherFailure
Priority	normal
Resolution	Unresolved
Component	Compiler
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture