Commit 5f3b5b37 authored by simonmar's avatar simonmar
Browse files

Build fix for Windows

parent a72c6fd2
...@@ -98,6 +98,10 @@ import System.Directory (getDirectoryContents, removeDirectory, ...@@ -98,6 +98,10 @@ import System.Directory (getDirectoryContents, removeDirectory,
doesDirectoryExist, doesFileExist, removeFile, doesDirectoryExist, doesFileExist, removeFile,
createDirectory) createDirectory)
#ifndef mingw32_TARGET_OS
import System.Directory (getPermissions,setPermissions)
import Foreign.Marshal (allocaBytes) import Foreign.Marshal (allocaBytes)
#ifndef mingw32_TARGET_OS #ifndef mingw32_TARGET_OS
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