regex-applicative-text 0.1.0.0 → 0.1.0.1

raw patch · 2 files changed

+10/−6 lines, 2 filesdep ~base

Dependency ranges changed: base

Files

• regex-applicative-text.cabal +4/−3
• src/Text/Regex/Applicative/Text.hs +6/−3

@@ -1,9 +1,9 @@--- This file has been generated from package.yaml by hpack version 0.5.2.+-- This file has been generated from package.yaml by hpack version 0.8.0. -- -- see: https://github.com/sol/hpack  name:           regex-applicative-text-version:        0.1.0.0+version:        0.1.0.1 synopsis:       regex-applicative on text description:    Wrapped regex-applicative primitives to work with Text category:       Text@@ -13,6 +13,7 @@ maintainer:     Oleg Grenrus <oleg.grenrus@iki.fi> license:        BSD3 license-file:   LICENSE+tested-with:    GHC==7.0.4, GHC==7.2.2, GHC==7.4.2, GHC==7.6.3, GHC==7.8.4, GHC==7.10.3, GHC==8.0.1 build-type:     Simple cabal-version:  >= 1.10 @@ -28,7 +29,7 @@       src   ghc-options: -Wall   build-depends:-      base >= 4.7 && <4.9+      base >= 4.3 && <4.10     , regex-applicative >=0.3 && <0.4     , text   exposed-modules:

@@ -9,8 +9,11 @@ -- -- @Text.Regex.Applicative@ API specialised to 'Char' and 'Text'. --------------------------------------------------------------------+{-# LANGUAGE CPP #-}+#if __GLASGOW_HASKELL__ >=704 {-# LANGUAGE Safe #-}-module Text.Regex.Applicative.Text +#endif+module Text.Regex.Applicative.Text   (   -- * Types     RE'@@ -42,7 +45,7 @@  import           Control.Applicative import           Control.Arrow-import           Data.Monoid+import           Data.Monoid (mappend) import           Data.Text (Text) import qualified Data.Text as T import qualified Text.Regex.Applicative as R@@ -187,7 +190,7 @@         go [] = T.empty         go ys@(x:xs) = case R.findLongestPrefix r ys of                          Nothing              -> T.cons x (go xs)-                         Just (prefix, rest)  -> prefix <> go rest+                         Just (prefix, rest)  -> prefix `mappend` go rest  -- Helpers