[Gtk2hs-commit] gtk2hs/compat LocalControl.hs,1.2,1.3 LocalData.hs,1.2,1.3

[Duncan C. <dun...@us...>]

Update of /cvsroot/gtk2hs/gtk2hs/compat
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23926/compat

Modified Files:
	LocalControl.hs LocalData.hs 
Log Message:
Removed support for versions of ghc pre 5.04.


Index: LocalData.hs
===================================================================
RCS file: /cvsroot/gtk2hs/gtk2hs/compat/LocalData.hs,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- LocalData.hs	21 Jul 2002 16:59:05 -0000	1.2
+++ LocalData.hs	10 Aug 2004 14:55:24 -0000	1.3
@@ -30,25 +30,13 @@
 --- TODO ----------------------------------------------------------------------
 
 module LocalData(
-#if __GLASGOW_HASKELL__>=504
   module Data.IORef,
   module Data.Bits,
   module Data.FiniteMap,
   module System.IO.Unsafe
-#else
-  module IOExts,
-  module Bits,
-  module FiniteMap
-#endif
   ) where
 
-#if __GLASGOW_HASKELL__>=504
 import Data.IORef
 import Data.Bits
 import Data.FiniteMap
 import System.IO.Unsafe
-#else
-import IOExts
-import Bits
-import FiniteMap
-#endif

Index: LocalControl.hs
===================================================================
RCS file: /cvsroot/gtk2hs/gtk2hs/compat/LocalControl.hs,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- LocalControl.hs	9 Jul 2003 22:42:43 -0000	1.2
+++ LocalControl.hs	10 Aug 2004 14:55:24 -0000	1.3
@@ -30,22 +30,14 @@
 --- TODO ----------------------------------------------------------------------
 
 module LocalControl(
-#if __GLASGOW_HASKELL__>=504
   module Control.Exception,
   module Control.Concurrent
-#else
-  module Exception,
-  module Concurrent
-#endif
   ) where
 
 #if __GLASGOW_HASKELL__>=600
 import Control.Exception
 import Control.Concurrent  hiding(throwTo)
-#elif __GLASGOW_HASKELL__>=504
+#else
 import Control.Exception
 import Control.Concurrent
-#else
-import Exception
-import Concurrent
 #endif