Skip to content

Commit 1d2926a

Browse files
committed
rm-old-base: restore older catchIO
This needs to be included so running with older bases and ghcs can be done even while building cabal itself demands recent ghcs.
1 parent 4ec4202 commit 1d2926a

File tree

1 file changed

+4
-0
lines changed

1 file changed

+4
-0
lines changed

templates/Paths_pkg.template.hs

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -38,7 +38,11 @@ import System.Environment (getExecutablePath)
3838
{% if supportsCpp %}
3939
#if defined(VERSION_base)
4040

41+
#if MIN_VERSION_base(4,0,0)
4142
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a
43+
#else
44+
catchIO :: IO a -> (Exception.Exception -> IO a) -> IO a
45+
#endif
4246

4347
#else
4448
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a

0 commit comments

Comments
 (0)