[commit: packages/process] master: Fix warnings (577c22d)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/process

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/577c22dc80f7e3e8cb7fe6bb8392146c6b8341f5/process

>---------------------------------------------------------------

commit 577c22dc80f7e3e8cb7fe6bb8392146c6b8341f5
Author: Michael Snoyman <michael at snoyman.com>
Date:   Mon Feb 6 10:44:29 2017 +0200

    Fix warnings


>---------------------------------------------------------------

577c22dc80f7e3e8cb7fe6bb8392146c6b8341f5
 .travis.yml       | 2 +-
 System/Process.hs | 3 ++-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/.travis.yml b/.travis.yml
index c045791..04d0bfc 100644
--- a/.travis.yml
+++ b/.travis.yml
@@ -158,7 +158,7 @@ install:
   set -ex
   case "$BUILD" in
     stack)
-      stack --no-terminal --install-ghc $ARGS test --bench --only-dependencies
+      stack --no-terminal --install-ghc $ARGS test --bench --only-dependencies --pedantic
       ;;
     cabal)
       cabal --version
diff --git a/System/Process.hs b/System/Process.hs
index 81a5788..0112659 100644
--- a/System/Process.hs
+++ b/System/Process.hs
@@ -608,12 +608,13 @@ waitForProcess ph@(ProcessHandle _ delegating_ctlc) = do
         when delegating_ctlc $
           endDelegateControlC e
         return e
-    OpenExtHandle _ job iocp ->
 #if defined(WINDOWS)
+    OpenExtHandle _ job iocp ->
         maybe (ExitFailure (-1)) mkExitCode `fmap` waitForJobCompletion job iocp timeout_Infinite
       where mkExitCode code | code == 0 = ExitSuccess
                             | otherwise = ExitFailure $ fromIntegral code
 #else
+    OpenExtHandle _ _job _iocp ->
         return $ ExitFailure (-1)
 #endif