diff options
| author | Ian Lynagh <ian@well-typed.com> | 2013-02-16 00:43:14 +0000 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2013-02-16 00:56:29 +0000 |
| commit | 36f2d30d5dfd01f647b09365da84dcbf592aee83 (patch) | |
| tree | 0a8370c7170642af21a47c07606b0ef58894fd46 /libraries/base/Foreign | |
| parent | 25d1eafeb41f046630f978da3655ae578c9c83b1 (diff) | |
| download | haskell-36f2d30d5dfd01f647b09365da84dcbf592aee83.tar.gz | |
Mark DEPRECATED pragmas with when they were added
Diffstat (limited to 'libraries/base/Foreign')
| -rw-r--r-- | libraries/base/Foreign/ForeignPtr.hs | 2 | ||||
| -rw-r--r-- | libraries/base/Foreign/Marshal.hs | 4 | ||||
| -rw-r--r-- | libraries/base/Foreign/Marshal/Error.hs | 2 |
3 files changed, 3 insertions, 5 deletions
diff --git a/libraries/base/Foreign/ForeignPtr.hs b/libraries/base/Foreign/ForeignPtr.hs index 5288ce7718..be6dec0459 100644 --- a/libraries/base/Foreign/ForeignPtr.hs +++ b/libraries/base/Foreign/ForeignPtr.hs @@ -57,7 +57,7 @@ import Foreign.ForeignPtr.Safe import Foreign.Ptr ( Ptr ) import qualified Foreign.ForeignPtr.Unsafe as U -{-# DEPRECATED unsafeForeignPtrToPtr "Use Foreign.ForeignPtr.Unsafe.unsafeForeignPtrToPtr instead; This function will be removed in the next release" #-} +{-# DEPRECATED unsafeForeignPtrToPtr "Use Foreign.ForeignPtr.Unsafe.unsafeForeignPtrToPtr instead; This function will be removed in the next release" #-} -- deprecated in 7.2 {-# INLINE unsafeForeignPtrToPtr #-} unsafeForeignPtrToPtr :: ForeignPtr a -> Ptr a unsafeForeignPtrToPtr = U.unsafeForeignPtrToPtr diff --git a/libraries/base/Foreign/Marshal.hs b/libraries/base/Foreign/Marshal.hs index cb0ef415fe..ef81cec75e 100644 --- a/libraries/base/Foreign/Marshal.hs +++ b/libraries/base/Foreign/Marshal.hs @@ -50,9 +50,7 @@ results in undefined behaviour. It is expected that this operation will be replaced in a future revision of Haskell. -} -{-# DEPRECATED unsafeLocalState - "Please import from Foreign.Marshall.Unsafe instead; This will be removed in the next release" - #-} +{-# DEPRECATED unsafeLocalState "Please import from Foreign.Marshall.Unsafe instead; This will be removed in the next release" #-} -- deprecated in 7.2 unsafeLocalState :: IO a -> a unsafeLocalState = unsafePerformIO diff --git a/libraries/base/Foreign/Marshal/Error.hs b/libraries/base/Foreign/Marshal/Error.hs index 3048ffe063..e26716cfdf 100644 --- a/libraries/base/Foreign/Marshal/Error.hs +++ b/libraries/base/Foreign/Marshal/Error.hs @@ -81,4 +81,4 @@ throwIfNull = throwIf (== nullPtr) . const -- void :: IO a -> IO () void act = act >> return () -{-# DEPRECATED void "use Control.Monad.void instead" #-} +{-# DEPRECATED void "use Control.Monad.void instead" #-} -- deprecated in 7.6 |