From bdf50a5e75f9fad6ce9dd318f4bfcaec883514f3 Mon Sep 17 00:00:00 2001 From: Egor Tensin Date: Fri, 26 May 2017 04:51:20 +0300 Subject: add comments to `foreign` imports --- src/WindowsEnv/Registry.hs | 2 ++ src/WindowsEnv/Utils.hs | 2 ++ 2 files changed, 4 insertions(+) diff --git a/src/WindowsEnv/Registry.hs b/src/WindowsEnv/Registry.hs index 6eb52ca..4004734 100644 --- a/src/WindowsEnv/Registry.hs +++ b/src/WindowsEnv/Registry.hs @@ -152,6 +152,8 @@ decodeString (_, bytes) = T.unpack dropLastZero #include "ccall.h" +-- These aren't provided by Win32 (as of version 2.4.0.0). + foreign import WINDOWS_ENV_CCALL unsafe "Windows.h RegQueryValueExW" c_RegQueryValueEx :: WinAPI.PKEY -> WinAPI.LPCTSTR -> WinAPI.LPDWORD -> WinAPI.LPDWORD -> WinAPI.LPBYTE -> WinAPI.LPDWORD -> IO WinAPI.ErrCode diff --git a/src/WindowsEnv/Utils.hs b/src/WindowsEnv/Utils.hs index 4432a95..2dffaef 100644 --- a/src/WindowsEnv/Utils.hs +++ b/src/WindowsEnv/Utils.hs @@ -18,6 +18,8 @@ import qualified System.Win32.Types as WinAPI #include "ccall.h" +-- SendNotifyMessage isn't provided by Win32 (as of version 2.4.0.0). + foreign import WINDOWS_ENV_CCALL "Windows.h SendNotifyMessageW" c_SendNotifyMessage :: WinAPI.HWND -> WinAPI.WindowMessage -> WinAPI.WPARAM -> WinAPI.LPARAM -> IO WinAPI.LRESULT -- cgit v1.2.3