diff options
author | Joachim Breitner <mail@joachim-breitner.de> | 2016-12-27 09:41:19 +0100 |
---|---|---|
committer | Joachim Breitner <mail@joachim-breitner.de> | 2016-12-27 09:41:19 +0100 |
commit | d2788ab551fb9dc17f3d4d67ef843a5f3b56f9c6 (patch) | |
tree | 9778af61aba2c15cbeefbbac8e1c76b2a7745a81 /testsuite/timeout | |
parent | 815099cce8f183d49305c9d40c8ed699c178108c (diff) | |
download | haskell-d2788ab551fb9dc17f3d4d67ef843a5f3b56f9c6.tar.gz |
Expand I/O CP in comments
as suggested by @gracjan at
https://github.com/ghc/ghc/commit/efc4a1661f0fc1004a4b7b0914f3d3a08c2e791a#commitcomment-20284337
Diffstat (limited to 'testsuite/timeout')
-rw-r--r-- | testsuite/timeout/timeout.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/timeout/timeout.hs b/testsuite/timeout/timeout.hs index 4e97c5ce73..d466495fe2 100644 --- a/testsuite/timeout/timeout.hs +++ b/testsuite/timeout/timeout.hs @@ -110,8 +110,8 @@ run secs cmd = when (ioPort == nullPtr) $ errorWin "createCompletionPort, cannot continue." -- We're explicitly turning off handle inheritance to prevent misc handles - -- from being inherited by the child. Notable we don't want the I/O CP and - -- Job handles to be inherited. So we mark them as non-inheritable. + -- from being inherited by the child. Notable we don't want the I/O Completion + -- Ports and Job handles to be inherited. So we mark them as non-inheritable. setHandleInformation job cHANDLE_FLAG_INHERIT 0 setHandleInformation job cHANDLE_FLAG_INHERIT 0 |