diff options
Diffstat (limited to 'src/WindowsEnv/Utils.hs')
| -rw-r--r-- | src/WindowsEnv/Utils.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/WindowsEnv/Utils.hs b/src/WindowsEnv/Utils.hs index c852229..4432a95 100644 --- a/src/WindowsEnv/Utils.hs +++ b/src/WindowsEnv/Utils.hs @@ -5,6 +5,8 @@ -- Stability : experimental -- Portability : Windows-only +{-# LANGUAGE CPP #-} + module WindowsEnv.Utils ( notifyEnvironmentUpdate ) where @@ -14,7 +16,9 @@ import qualified Graphics.Win32.GDI.Types as WinAPI import qualified Graphics.Win32.Message as WinAPI import qualified System.Win32.Types as WinAPI -foreign import ccall "Windows.h SendNotifyMessageW" +#include "ccall.h" + +foreign import WINDOWS_ENV_CCALL "Windows.h SendNotifyMessageW" c_SendNotifyMessage :: WinAPI.HWND -> WinAPI.WindowMessage -> WinAPI.WPARAM -> WinAPI.LPARAM -> IO WinAPI.LRESULT notifyEnvironmentUpdate :: IO () |