From 166971ffd5a750dd0b101f208f2ddc624d8d6997 Mon Sep 17 00:00:00 2001 From: Simon Hengel Date: Sat, 23 Nov 2024 05:46:02 +0700 Subject: [PATCH] Fix haddocks of `createPipe` --- System/Process/Internals.hs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/System/Process/Internals.hs b/System/Process/Internals.hs index da578b6c..eb0a2472 100644 --- a/System/Process/Internals.hs +++ b/System/Process/Internals.hs @@ -200,22 +200,22 @@ runGenProcess_ fun c _ _ = createProcess_ fun c -- -- @ -- #if defined(__IO_MANAGER_WINIO__) --- import GHC.IO.SubSystem (()) +-- import GHC.IO.SubSystem ((``)) -- import GHC.IO.Handle.Windows (handleToHANDLE) -- import GHC.Event.Windows (associateHandle') -- #endif -- -- ... -- --- #if defined (__IO_MANAGER_WINIO__) --- return () (do --- associateHandle' =<< handleToHANDLE ) +-- #if defined(__IO_MANAGER_WINIO__) +-- return () \ do +-- associateHandle' =\<\< handleToHANDLE readEnd -- #endif -- @ -- -- Only associate handles that you are in charge of read/writing to. -- Do not associate handles passed to another process. It's the --- process's reponsibility to register the handle if it supports +-- process's responsibility to register the handle if it supports -- async access. -- -- @since 1.2.1.0