[commit: ghc] ghc-8.2: Fix compilation for !HAVE_FLOCK (1a472f1)

[git at git.haskell.org]

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

On branch  : ghc-8.2
Link       : http://ghc.haskell.org/trac/ghc/changeset/1a472f18e2ab446c76c38c9ff3d55f8931369c74/ghc

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

commit 1a472f18e2ab446c76c38c9ff3d55f8931369c74
Author: Herbert Valerio Riedel <hvr at gnu.org>
Date:   Sun Apr 23 15:41:50 2017 +0200

    Fix compilation for !HAVE_FLOCK
    
    (cherry picked from commit 2fa6873faf16a0f3b23742222a00f0647554395b)


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

1a472f18e2ab446c76c38c9ff3d55f8931369c74
 libraries/base/GHC/IO/Handle/Lock.hsc | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/libraries/base/GHC/IO/Handle/Lock.hsc b/libraries/base/GHC/IO/Handle/Lock.hsc
index ebb3ce4..cbef5e4 100644
--- a/libraries/base/GHC/IO/Handle/Lock.hsc
+++ b/libraries/base/GHC/IO/Handle/Lock.hsc
@@ -47,6 +47,10 @@ import GHC.IO.Handle.FD
 import GHC.Ptr
 import GHC.Windows
 
+#else
+
+import GHC.IO (throwIO)
+
 #endif
 
 import Data.Functor