[project @ 2002-10-14 14:44:06 by sof]

make it compile again with 4.08.x

diff --git a/ghc/compiler/utils/Panic.lhs b/ghc/compiler/utils/Panic.lhs
index 1af8ed2..32b19ab 100644 (file)
--- a/ghc/compiler/utils/Panic.lhs
+++ b/ghc/compiler/utils/Panic.lhs
@@ -160,8 +160,8 @@ Compatibility stuff:
 
 \begin{code}
 #if __GLASGOW_HASKELL__ <= 408
-catchJust = catchIO
-ioErrors  = justIoErrors
-throwTo   = raiseInThread
+catchJust = Exception.catchIO
+ioErrors  = Exception.justIoErrors
+throwTo   = Exception.raiseInThread
 #endif
 \end{code}