avoid more build warnings on Windows
This commit is contained in:
parent
fc96861084
commit
a3224ce35b
12 changed files with 29 additions and 20 deletions
|
@ -58,8 +58,8 @@ redirLog logfd = do
|
|||
redirLog _ = error "redirLog TODO"
|
||||
#endif
|
||||
|
||||
#ifndef mingw32_HOST_OS
|
||||
redir :: Fd -> Fd -> IO ()
|
||||
#ifndef mingw32_HOST_OS
|
||||
redir newh h = do
|
||||
closeFd h
|
||||
void $ dupTo newh h
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue