Permalink
Browse files

Use unsafePerformIO from System.IO.Unsafe

Foreign.unsafePerformIO is deprecated as of GHC 7.5
  • Loading branch information...
1 parent f318105 commit a18f44c2a11189a0a96cd29b65c0ac053b2022b4 @bgamari bgamari committed Feb 19, 2012
Showing with 10 additions and 5 deletions.
  1. +2 −1 OpenSSL/DSA.hsc
  2. +2 −1 OpenSSL/EVP/Base64.hsc
  3. +2 −1 OpenSSL/EVP/Digest.hsc
  4. +2 −1 OpenSSL/EVP/Open.hsc
  5. +2 −1 OpenSSL/RSA.hsc
View
@@ -34,7 +34,8 @@ module OpenSSL.DSA
import Control.Monad
import qualified Data.ByteString as BS
import Data.Typeable
-import Foreign
+import Foreign hiding (unsafePerformIO)
+import System.IO.Unsafe (unsafePerformIO)
import Foreign.C (CString)
import Foreign.C.Types
import OpenSSL.BN
View
@@ -22,8 +22,9 @@ import qualified Data.ByteString.Lazy.Internal as L8Internal
import qualified Data.ByteString.Char8 as B8
import qualified Data.ByteString.Lazy.Char8 as L8
import Data.List
-import Foreign
+import Foreign hiding (unsafePerformIO)
import Foreign.C
+import System.IO.Unsafe (unsafePerformIO)
-- On encoding, we keep fetching the next block until we get at least
View
@@ -24,7 +24,8 @@ import Data.ByteString.Unsafe (unsafeUseAsCStringLen)
import qualified Data.ByteString.Char8 as B8
import qualified Data.ByteString.Lazy.Char8 as L8
import Control.Applicative ((<$>))
-import Foreign
+import Foreign hiding (unsafePerformIO)
+import System.IO.Unsafe (unsafePerformIO)
import Foreign.C
import OpenSSL.EVP.Internal
import OpenSSL.Objects
View
@@ -12,7 +12,8 @@ module OpenSSL.EVP.Open
import qualified Data.ByteString.Char8 as B8
import qualified Data.ByteString.Lazy.Char8 as L8
-import Foreign
+import Foreign hiding (unsafePerformIO)
+import System.IO.Unsafe (unsafePerformIO)
import Foreign.C
import OpenSSL.EVP.Cipher hiding (cipher)
import OpenSSL.EVP.PKey
View
@@ -32,7 +32,8 @@ module OpenSSL.RSA
import Control.Monad
import Data.Typeable
-import Foreign
+import Foreign hiding (unsafePerformIO)
+import System.IO.Unsafe (unsafePerformIO)
import Foreign.C
import OpenSSL.BN
import OpenSSL.Utils

0 comments on commit a18f44c

Please sign in to comment.