Commit 0a7fe9ef authored by Simon Marlow's avatar Simon Marlow
Browse files

fix warning on Windows

parent ea56c486
......@@ -425,10 +425,11 @@ interactiveLoop is_tty show_prompt =
-- the same directory while a process is running.
checkPerms :: String -> IO Bool
checkPerms name =
#ifdef mingw32_HOST_OS
checkPerms _ =
return True
#else
checkPerms name =
Util.handle (\_ -> return False) $ do
st <- getFileStatus name
me <- getRealUserID
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment