diff options
Diffstat (limited to 'Utility/Batch.hs')
| -rw-r--r-- | Utility/Batch.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Utility/Batch.hs b/Utility/Batch.hs index 38b588b34..c3c34bf27 100644 --- a/Utility/Batch.hs +++ b/Utility/Batch.hs @@ -9,7 +9,7 @@ module Utility.Batch where -#if defined(__LINUX__) || defined(__ANDROID__) +#if defined(linux_HOST_OS) || defined(__ANDROID__) import Control.Concurrent.Async import System.Posix.Process #endif @@ -26,7 +26,7 @@ import System.Posix.Process - systems, the action is simply ran. -} batch :: IO a -> IO a -#if defined(__LINUX__) || defined(__ANDROID__) +#if defined(linux_HOST_OS) || defined(__ANDROID__) batch a = wait =<< batchthread where batchthread = asyncBound $ do |