File tree 1 file changed +6
-3
lines changed 1 file changed +6
-3
lines changed Original file line number Diff line number Diff line change @@ -463,9 +463,10 @@ createProcess_ fun CreateProcess{ cmdspec = cmdsp,
463
463
runInteractiveProcess_lock :: MVar ()
464
464
runInteractiveProcess_lock = unsafePerformIO $ newMVar ()
465
465
466
- -- Following functions are always exported in export list.
467
- -- It should be a no-op function on Windows.
468
- -- see the <https://github.com/haskell/process/pull/21>
466
+ -- The following functions are always present in the export list. For
467
+ -- compatibility with the non-Windows code, we provide the same functions with
468
+ -- matching type signatures, but implemented as no-ops. For details, see:
469
+ -- <https://github.com/haskell/process/pull/21>
469
470
startDelegateControlC :: IO ()
470
471
startDelegateControlC = return ()
471
472
@@ -475,6 +476,8 @@ endDelegateControlC _ = return ()
475
476
stopDelegateControlC :: IO ()
476
477
stopDelegateControlC = return ()
477
478
479
+ -- End no-op functions
480
+
478
481
foreign import ccall unsafe " runInteractiveProcess"
479
482
c_runInteractiveProcess
480
483
:: CWString
You can’t perform that action at this time.
0 commit comments