diff options
author | Joey Hess <id@joeyh.name> | 2013-05-10 16:57:21 -0500 |
---|---|---|
committer | Joey Hess <id@joeyh.name> | 2013-05-10 16:57:21 -0500 |
commit | ae6293ae6710b0a7580bc9a0045c92d1d5b87036 (patch) | |
tree | fbd105bed124fb698fdc5bbdf4eb2d9ccd086979 /Utility/Directory.hs | |
parent | 5d0476bf59674b39fa6bad7e4446b5c741181143 (diff) |
fixup #if 0 stubs to use #ifndef mingw32_HOST_OS
That's needed in files used to build the configure program.
For the other files, I'm keeping my __WINDOWS__ define, as I find that much easier to type.
I may search and replace it to use the mingw32_HOST_OS thing later.
Diffstat (limited to 'Utility/Directory.hs')
-rwxr-xr-x | Utility/Directory.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Utility/Directory.hs b/Utility/Directory.hs index 55d79a825..0dbba0584 100755 --- a/Utility/Directory.hs +++ b/Utility/Directory.hs @@ -10,7 +10,7 @@ module Utility.Directory where import System.IO.Error -#if 0 +#ifndef mingw32_HOST_OS import System.Posix.Files #endif import System.Directory @@ -61,7 +61,7 @@ dirContentsRecursive' (dir:dirs) = unsafeInterleaveIO $ do {- Moves one filename to another. - First tries a rename, but falls back to moving across devices if needed. -} moveFile :: FilePath -> FilePath -> IO () -#if 0 +#ifndef mingw32_HOST_OS moveFile src dest = tryIO (rename src dest) >>= onrename where onrename (Right _) = noop |