Repository : ssh://darcs.haskell.org//srv/darcs/packages/haskell2010

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/07f24cea759fae7994c89d77fae199862d9e2acf

>---------------------------------------------------------------

commit 07f24cea759fae7994c89d77fae199862d9e2acf
Author: Simon Marlow <[email protected]>
Date:   Mon Apr 16 16:45:35 2012 +0100

    Add a copy of void, since base's version is now deprecated.

>---------------------------------------------------------------

 Foreign/Marshal/Error.hs |    8 +++++++-
 1 files changed, 7 insertions(+), 1 deletions(-)

diff --git a/Foreign/Marshal/Error.hs b/Foreign/Marshal/Error.hs
index 3527e81..527ab65 100644
--- a/Foreign/Marshal/Error.hs
+++ b/Foreign/Marshal/Error.hs
@@ -17,4 +17,10 @@ module Foreign.Marshal.Error (
   void           -- IO a -> IO ()
 
   ) where
-import "base" Foreign.Marshal.Error
+import "base" Foreign.Marshal.Error hiding (void)
+
+-- |Discard the return value of an 'IO' action
+--
+void     :: IO a -> IO ()
+void act  = act >> return ()
+ -- base's version is deprecated



_______________________________________________
Cvs-libraries mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-libraries

Reply via email to