diff --git a/src/GF/System/NoSignal.hs b/src/GF/System/NoSignal.hs index bc0a9fc40..5b7827f32 100644 --- a/src/GF/System/NoSignal.hs +++ b/src/GF/System/NoSignal.hs @@ -14,7 +14,8 @@ module GF.System.NoSignal where -import Control.Exception (Exception) +import Control.Exception (Exception,catch) +import Prelude hiding (catch) {-# NOINLINE runInterruptibly #-} runInterruptibly :: IO a -> IO (Either Exception a)