diff options
| author | Isaac Dupree <id@isaac.cedarswampstudios.org> | 2007-06-05 23:53:01 +0000 |
|---|---|---|
| committer | Isaac Dupree <id@isaac.cedarswampstudios.org> | 2007-06-05 23:53:01 +0000 |
| commit | 9f589efb688f22cb0637f9c1164dd9027b4378a3 (patch) | |
| tree | ab52e27e7a773be609b3557dd2f8b5a237424172 /compiler/utils/Panic.lhs | |
| parent | ffd3438020584591b1c73d44bb1f1a731402cfe6 (diff) | |
| download | haskell-9f589efb688f22cb0637f9c1164dd9027b4378a3.tar.gz | |
remove #if branches for pre-ghc-6.0
I skipped utils/hsc2hs/Main.hs since its ifs also involved
checking for old versions of nhc98 (I don't want to figure that out),
but removed everything else I found relating to building with pre-6.0
Diffstat (limited to 'compiler/utils/Panic.lhs')
| -rw-r--r-- | compiler/utils/Panic.lhs | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/compiler/utils/Panic.lhs b/compiler/utils/Panic.lhs index 300e7fcbcc..ffc3c37247 100644 --- a/compiler/utils/Panic.lhs +++ b/compiler/utils/Panic.lhs @@ -28,11 +28,7 @@ import Config import FastTypes #ifndef mingw32_HOST_OS -# if __GLASGOW_HASKELL__ > 504 import System.Posix.Signals -# else -import Posix ( Handler(Catch), installHandler, sigINT, sigQUIT ) -# endif /* GHC > 504 */ #endif /* mingw32_HOST_OS */ #if defined(mingw32_HOST_OS) && __GLASGOW_HASKELL__ >= 603 @@ -171,11 +167,7 @@ tryMost action = do r <- try action; filter r tryUser :: IO a -> IO (Either Exception.Exception a) tryUser action = tryJust tc_errors action where -#if __GLASGOW_HASKELL__ > 504 tc_errors e@(Exception.IOException ioe) | isUserError ioe = Just e -#else - tc_errors e@(Exception.IOException ioe) | isUserError e = Just e -#endif tc_errors _other = Nothing \end{code} |