text-icu 0.6.3.4 → 0.6.3.5
raw patch · 10 files changed
+12/−14 lines, 10 filesdep ~basePVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: base
API changes (from Hackage documentation)
- Data.Text.ICU: class Regular r
+ Data.Text.ICU: class Regular r where regFp = reRe . regRe
Files
- Data/Text/ICU/Break.hsc +1/−1
- Data/Text/ICU/Char.hsc +1/−1
- Data/Text/ICU/Collate.hsc +1/−1
- Data/Text/ICU/Convert.hs +1/−1
- Data/Text/ICU/Error/Internal.hsc +1/−1
- Data/Text/ICU/Normalize.hsc +1/−1
- Data/Text/ICU/Regex.hs +2/−3
- Data/Text/ICU/Regex/Internal.hsc +0/−1
- Data/Text/ICU/Regex/Pure.hs +3/−3
- text-icu.cabal +1/−1
Data/Text/ICU/Break.hsc view
@@ -58,7 +58,7 @@ import Data.Text.ICU.Error.Internal (UErrorCode, handleError) import Data.Text.ICU.Internal (LocaleName(..), UBool, UChar, asBool, withLocaleName) import Foreign.C.String (CString, peekCString)-import Foreign.C.Types (CInt)+import Foreign.C.Types (CInt(..)) import Foreign.ForeignPtr (newForeignPtr, withForeignPtr) import Foreign.Marshal.Array (allocaArray, peekArray) import Foreign.Marshal.Utils (with)
Data/Text/ICU/Char.hsc view
@@ -94,7 +94,7 @@ import Data.Typeable (Typeable) import Data.Word (Word8) import Foreign.C.String (CString, peekCStringLen, withCString)-import Foreign.C.Types (CInt)+import Foreign.C.Types (CInt(..)) import Foreign.Ptr (Ptr) import System.IO.Unsafe (unsafePerformIO)
Data/Text/ICU/Collate.hsc view
@@ -51,7 +51,7 @@ import Data.Typeable (Typeable) import Data.Word (Word8) import Foreign.C.String (CString)-import Foreign.C.Types (CInt)+import Foreign.C.Types (CInt(..)) import Foreign.ForeignPtr (withForeignPtr) import Foreign.Marshal.Utils (with) import Foreign.Ptr (Ptr, nullPtr)
Data/Text/ICU/Convert.hs view
@@ -43,7 +43,7 @@ import Data.Text.ICU.Error.Internal (UErrorCode, handleError) import Data.Word (Word16) import Foreign.C.String (CString, peekCString, withCString)-import Foreign.C.Types (CInt)+import Foreign.C.Types (CInt(..)) import Foreign.ForeignPtr (newForeignPtr) import Foreign.Marshal.Array (allocaArray) import Foreign.Ptr (FunPtr, Ptr, castPtr)
Data/Text/ICU/Error/Internal.hsc view
@@ -29,7 +29,7 @@ import Data.Int (Int32) import Data.Typeable (Typeable) import Foreign.C.String (CString, peekCString)-import Foreign.C.Types (CInt)+import Foreign.C.Types (CInt(..)) import Foreign.Storable (Storable(..)) import System.IO.Unsafe (unsafePerformIO)
Data/Text/ICU/Normalize.hsc view
@@ -42,7 +42,7 @@ import Data.Typeable (Typeable) import Data.Int (Int32) import Data.Word (Word32)-import Foreign.C.Types (CInt)+import Foreign.C.Types (CInt(..)) import Foreign.Ptr (Ptr, castPtr) import System.IO.Unsafe (unsafePerformIO) import Prelude hiding (compare)
Data/Text/ICU/Regex.hs view
@@ -51,7 +51,7 @@ ) where import Data.Text.ICU.Regex.Internal-import Control.Exception (catch)+import qualified Control.Exception as E import Data.IORef (newIORef, readIORef, writeIORef) import Data.Text (Text) import qualified Data.Text.Foreign as T@@ -62,7 +62,6 @@ import Foreign.ForeignPtr (ForeignPtr, newForeignPtr, withForeignPtr) import Foreign.Marshal.Alloc (alloca) import Foreign.Storable (peek)-import Prelude hiding (catch) import System.IO.Unsafe (unsafePerformIO) instance Show Regex where@@ -77,7 +76,7 @@ -- | Compile a regular expression with the given options. This is -- safest to use when the pattern is constructed at run time. regex' :: [MatchOption] -> Text -> IO (Either ParseError Regex)-regex' opts pat = (Right `fmap` regex opts pat) `catch` \(err::ParseError) ->+regex' opts pat = (Right `fmap` regex opts pat) `E.catch` \(err::ParseError) -> return (Left err) -- | Set the subject text string upon which the regular expression
Data/Text/ICU/Regex/Internal.hsc view
@@ -55,7 +55,6 @@ import Data.Word (Word16, Word32) import Foreign.ForeignPtr (ForeignPtr, newForeignPtr, touchForeignPtr, withForeignPtr) import Foreign.Ptr (FunPtr, Ptr)-import Prelude hiding (catch) import System.IO.Unsafe (unsafePerformIO) #include <unicode/uregex.h>
Data/Text/ICU/Regex/Pure.hs view
@@ -47,7 +47,7 @@ , suffix ) where -import Control.Exception (catch)+import qualified Control.Exception as E import Data.String (IsString(..)) import Data.Text (Text) import qualified Data.Text as T@@ -60,7 +60,7 @@ import Foreign.Marshal.Alloc (alloca) import Foreign.Marshal.Array (advancePtr) import Foreign.Storable (peek)-import Prelude hiding (catch, span)+import Prelude hiding (span) import System.IO.Unsafe (unsafeInterleaveIO, unsafePerformIO) -- | A compiled regular expression.@@ -114,7 +114,7 @@ -- safest to use when the pattern is constructed at run time. regex' :: [MatchOption] -> Text -> Either ParseError Regex regex' opts pat = unsafePerformIO $- ((Right . Regex) `fmap` Internal.regex opts pat) `catch`+ ((Right . Regex) `fmap` Internal.regex opts pat) `E.catch` \(err::ParseError) -> return (Left err) -- | Return the source form of the pattern used to construct this
text-icu.cabal view
@@ -1,5 +1,5 @@ name: text-icu-version: 0.6.3.4+version: 0.6.3.5 synopsis: Bindings to the ICU library homepage: https://bitbucket.org/bos/text-icu bug-reports: https://bitbucket.org/bos/text-icu/issues