aboutsummaryrefslogtreecommitdiff
path: root/Utility/LockPool/Windows.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Utility/LockPool/Windows.hs')
-rw-r--r--Utility/LockPool/Windows.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/LockPool/Windows.hs b/Utility/LockPool/Windows.hs
index 2206e05e4..25877d52e 100644
--- a/Utility/LockPool/Windows.hs
+++ b/Utility/LockPool/Windows.hs
@@ -45,5 +45,5 @@ lockExclusive file = tryMakeLockHandle
{- If the initial lock fails, this is a BUSY wait, and does not
- guarentee FIFO order of waiters. In other news, Windows is a POS. -}
-waitToLock :: IO (Maybe LockHandle) -> IO LockHandle
+waitToLock :: IO (Maybe lockhandle) -> IO lockhandle
waitToLock = F.waitToLock