@@ -106,7 +106,10 @@ checkGetentropy cc lbi = do
106 where cArgs = ["-DHAVE_GETENTROPY"]
106 where cArgs = ["-DHAVE_GETENTROPY"]
108myRawSystemExitCode :: Verbosity -> FilePath -> [String] -> IO ExitCode
108myRawSystemExitCode :: Verbosity -> FilePath -> [String] -> IO ExitCode
109+#if MIN_VERSION_Cabal(3,14,0)
110+myRawSystemExitCode verbosity program arguments =
111+ rawSystemExitCode verbosity Nothing program arguments Nothing
109−#if __GLASGOW_HASKELL__ >= 704
112+#elif __GLASGOW_HASKELL__ >= 704
110-- We know for sure, that if GHC >= 7.4 implies Cabal >= 1.14
113-- We know for sure, that if GHC >= 7.4 implies Cabal >= 1.14
111myRawSystemExitCode = rawSystemExitCode
114myRawSystemExitCode = rawSystemExitCode