[Gtk2hs-commit] gtk2hs/tools/callbackGen Signal.chs-boot2,1.2,1.3

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

Update of /cvsroot/gtk2hs/gtk2hs/tools/callbackGen
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22901/tools/callbackGen

Modified Files:
	Signal.chs-boot2 
Log Message:
Removed support for versions of ghc pre 5.04. ghc 5.04 supports the new FFI
syntax so remove old-style "foreign export dynamic" versions.
Tested with ghc 5.04 & 5.04.3


Index: Signal.chs-boot2
===================================================================
RCS file: /cvsroot/gtk2hs/gtk2hs/tools/callbackGen/Signal.chs-boot2,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- Signal.chs-boot2	17 Jul 2004 04:05:13 -0000	1.2
+++ Signal.chs-boot2	10 Aug 2004 14:51:48 -0000	1.3
@@ -25,16 +25,8 @@
 
 {#pointer GClosureNotify#}
 
-#if __GLASGOW_HASKELL__>=600
-
 foreign import ccall "wrapper" mkDestructor :: IO () -> IO GClosureNotify
 
-#else
-
-foreign export dynamic mkDestructor :: IO () -> IO GClosureNotify
-
-#endif
-
 disconnect :: GObjectClass obj => ConnectId obj -> IO ()
 disconnect (ConnectID handler obj) =
   withForeignPtr  ((unGObject.toGObject) obj) $ \objPtr ->