pcre-light 0.1 → 0.2

raw patch · 17 files changed

+4538/−28779 lines, 17 filesdep ~basePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: base

API changes (from Hackage documentation)

Files

• Text/Regex/PCRE/Light.hs +66/−36
• Text/Regex/PCRE/Light/Base.hsc +7/−14
• Text/Regex/PCRE/Light/Char8.hs +10/−4
• pcre-light.cabal +10/−5
• tests/Makefile +11/−0
• tests/Unit.hs +4429/−1321
• tests/failure1.hs +5/−0
• tests/testdata/regex1.tests +0/−4838
• tests/testdata/regex10.tests +0/−558
• tests/testdata/regex2.tests +0/−8104
• tests/testdata/regex3.tests +0/−158
• tests/testdata/regex4.tests +0/−963
• tests/testdata/regex5.tests +0/−0
• tests/testdata/regex6.tests +0/−1585
• tests/testdata/regex7.tests +0/−8167
• tests/testdata/regex8.tests +0/−1313
• tests/testdata/regex9.tests +0/−1713

@@ -1,14 +1,13 @@-{-# LANGUAGE ForeignFunctionInterface #-}+{-# LANGUAGE CPP #-} -------------------------------------------------------------------- -- |--- Module    : Text.Regex.PCRE.Light--- Copyright:  Copyright (c) 2006, Christopher Kuklewicz---             Copyright (c) 2007, Don Stewart--- License   : BSD3+-- Module   : Text.Regex.PCRE.Light+-- Copyright: Copyright (c) 2007-2008, Don Stewart+-- License  : BSD3 -- -- Maintainer:  Don Stewart <dons@galois.com> -- Stability :  experimental--- Portability: H98 + FFI+-- Portability: H98 + CPP -- -------------------------------------------------------------------- -- @@ -22,7 +21,7 @@           Regex          -- * ByteString interface-        , compile+        , compile, compileM         , match          -- * Regex types and constructors externally visible@@ -72,9 +71,14 @@ import Text.Regex.PCRE.Light.Base  -- Strings+import qualified Data.ByteString          as S++#if __GLASGOW_HASKELL__ >= 608 import qualified Data.ByteString.Internal as S import qualified Data.ByteString.Unsafe   as S-import qualified Data.ByteString          as S+#else+import qualified Data.ByteString.Base     as S+#endif  import Control.Monad @@ -84,24 +88,24 @@ import Foreign.C.Types import Foreign.C.String import Foreign.Storable+import Foreign.Marshal.Alloc  -- | 'compile' ----- Compile a perl-compatible regular expression, in a strict bytestring.+-- Compile a perl-compatible regular expression stored in a strict bytestring. -- -- An example ----- > let Right r = compile (pack "^(b+|a){1,2}?bc") []+-- > let r = compile (pack "^(b+|a){1,2}?bc") [] -- -- Or using GHC's -XOverloadedStrings flag, and importing -- Data.ByteString.Char8, we can avoid the pack: ----- > let Right r = compile "^(b+|a){1,2}?bc" []------ If the regular expression is invalid, Left is returned,+-- > let r = compile "^(b+|a){1,2}?bc" [] ----- > > compile "*" []--- > Left "nothing to repeat"+-- If the regular expression is invalid, an exception is thrown.+-- If this is unsuitable, 'compileM' is availlable, which returns failure +-- in a monad. -- -- To do case insentive matching, --@@ -162,32 +166,50 @@ -- -- * 'no_utf8_check'   - Do not check the pattern for UTF-8 validity ----- If compilation of the pattern fails, the 'Left' constructor is --- returned with the error string. Otherwise an abstract type--- representing the compiled regular expression is returned. -- The regex is allocated via malloc on the C side, and will be -- deallocated by the runtime when the Haskell value representing it -- goes out of scope. ----- See man pcreapi for more details.+-- See 'man pcreapi for more details. -- -- Caveats: patterns with embedded nulls, such as "\0*" seem to be -- mishandled, as this won't currently match the subject "\0\0\0". ----- Possible improvements: an 'IsString' instance could be defined--- for 'Regex', which would allow the compiler to insert calls to--- 'compile' based on the type:+compile :: S.ByteString -> [PCREOption] -> Regex+compile s o = case compileM s o of+    Just  r -> r+    Nothing -> error ("Text.Regex.PCRE.Light: Error in regex: " ++ show s)++------------------------------------------------------------------------++-- | 'compileM'+-- A generic version of 'compile' with failure lifted into an arbitrary monad. ----- The following would be valid:+-- Examples, illustrating how failure can be propagated to an IO exception, +-- or tagged as 'Nothing': ----- > match "a.*b" "abcdef" []+-- > > compileM ".*" [] :: Maybe Regex+-- > Just (Regex 0x000000004bb5b540 ".*") ----- and equivalent to:+-- > > compileM "*" [] :: Maybe Regex+-- > Nothing ----- > match (either error id (compile "a.*b")) "abcdef" []+-- > > compileM "*" [] :: IO Regex+-- > *** Exception: user error (nothing to repeat) ---compile :: S.ByteString -> [PCREOption] -> Either String Regex-compile str os = unsafePerformIO $+-- > > compileM ".*" [] :: IO Regex+-- > Regex 0x000000004bb5b780 ".*"+--+-- > > :m + Control.Monad.Error+--+-- > > compileM ".*" [] :: Either String Regex+-- > Right (Regex 0x000000004bb5b980 ".*")+--+-- > > compileM "*" [] :: Either String Regex+-- > Left "nothing to repeat"+--+compileM :: Monad m => S.ByteString -> [PCREOption] -> m Regex+compileM str os = unsafePerformIO $   S.useAsCString str $ \pattern -> do     alloca $ \errptr       -> do     alloca $ \erroffset    -> do@@ -195,11 +217,23 @@         if pcre_ptr == nullPtr             then do                 err <- peekCString =<< peek errptr-                return (Left err)+                return (fail err)             else do-                reg <- newForeignPtr c_free pcre_ptr -- release with free()-                return (Right (Regex reg))+                reg <- newForeignPtr finalizerFree pcre_ptr -- release with free()+                return (return (Regex reg str)) +-- Possible improvements: an 'IsString' instance could be defined+-- for 'Regex', which would allow the compiler to insert calls to+-- 'compile' based on the type:+--+-- The following would be valid:+--+-- > match "a.*b" "abcdef" []+--+-- and equivalent to:+--+-- > match (either error id (compile "a.*b")) "abcdef" []+ -- | 'match' -- -- Matches a compiled regular expression against a given subject string,@@ -245,7 +279,7 @@ -- is returned. -- match :: Regex -> S.ByteString -> [PCREExecOption] -> Maybe [S.ByteString]-match (Regex pcre_fp) subject os = unsafePerformIO $ do+match (Regex pcre_fp _) subject os = unsafePerformIO $ do   withForeignPtr pcre_fp $ \pcre_ptr -> do     n_capt <- capturedCount pcre_ptr @@ -310,7 +344,3 @@         alloca $ \n_ptr -> do -- (st :: Ptr CInt)              c_pcre_fullinfo regex_ptr nullPtr info_capturecount n_ptr              return . fromIntegral =<< peek (n_ptr :: Ptr CInt)--foreign import ccall unsafe "&free"-    c_free :: FinalizerPtr a -- FunPtr (Ptr a -> IO ())-

@@ -1,16 +1,16 @@-{-# LANGUAGE GeneralizedNewtypeDeriving, DeriveDataTypeable #-}+{-# LANGUAGE CPP, ForeignFunctionInterface, GeneralizedNewtypeDeriving #-} -------------------------------------------------------------------- -- |--- Module    : Text.Regex.PCRE.Light.Base--- Copyright:  Copyright (c) 2006, Christopher Kuklewicz---             Copyright (c) 2007, Don Stewart+-- Module   : Text.Regex.PCRE.Light.Base+-- Copyright: Copyright (c) 2007-2008, Don Stewart -- -- Documentation based on /man pcreapi/, written by Philip Hazel, 2007. -- -- License   : BSD3 -- Maintainer:  Don Stewart <dons@galois.com> -- Stability :  experimental--- Portability: CPP, FFI, newtype deriving, deriving Data, deriving Typeable+-- Portability: CPP, FFI+-- Tested with: GHC 6.8.2 -- -- Raw FFI bindings to PCRE functions and constants.  --@@ -98,9 +98,7 @@ import Foreign.C.Types import Foreign.C.String -#if __GLASGOW_HASKELL__-import Data.Generics-#endif+import qualified Data.ByteString.Char8 as S  #include <pcre.h> @@ -115,13 +113,8 @@ -- The structure allocated by the PCRE library will be deallocated -- automatically by the Haskell storage manager. ---newtype Regex = Regex (ForeignPtr PCRE)--#if __GLASGOW_HASKELL__-        deriving (Eq, Ord, Show, Typeable, Data)-#else+data Regex = Regex !(ForeignPtr PCRE) !S.ByteString         deriving (Eq, Ord, Show)-#endif  type PCRE = () 

@@ -1,7 +1,7 @@ -------------------------------------------------------------------- -- | -- Module   : Text.Regex.PCRE.Light.Char8--- Copyright: Copyright (c) 2007, Don Stewart+-- Copyright: Copyright (c) 2007-2008, Don Stewart -- License  : BSD3 -- -- Maintainer:  Don Stewart <dons@galois.com>@@ -20,7 +20,7 @@           Regex          -- * String interface-        , compile+        , compile, compileM         , match          -- * Regex types and constructors externally visible@@ -69,7 +69,7 @@  import qualified Data.ByteString.Char8 as S import qualified Text.Regex.PCRE.Light as S-import Text.Regex.PCRE.Light hiding (match, compile)+import Text.Regex.PCRE.Light hiding (match, compile, compileM)  -- | 'compile' --@@ -138,9 +138,15 @@ -- -- See man pcreapi for more details. ---compile :: String -> [PCREOption] -> Either String Regex+compile :: String -> [PCREOption] -> Regex compile str os = S.compile (S.pack str) os {-# INLINE compile #-}++-- | 'compileM'+-- A generic version of 'compile' with failure lifted into an arbitrary monad.+compileM :: Monad m => String -> [PCREOption] -> m Regex+compileM str os = S.compileM (S.pack str) os+{-# INLINE compileM #-}   -- | 'match'

@@ -1,9 +1,9 @@ name:            pcre-light-version:         0.1+version:         0.2 homepage:        http://code.haskell.org/~dons/code/pcre-light-synopsis:        A lightweight binding to PCRE+synopsis:        A small, efficient and portable regex library for Perl 5 compatible regular expressions description:-    A lightweight binding to PCRE+    A small, efficient and portable regex library for Perl 5 compatible regular expressions     .     The PCRE library is a set of functions that implement regular     expression pattern matching using the same syntax and semantics as Perl 5.@@ -19,8 +19,9 @@ maintainer:      Don Stewart <dons@galois.com> cabal-version: >= 1.2.0 build-type:      Configure+tested-with:     GHC ==6.8.2, GHC ==6.6.1, Hugs ==2005 -flag new-base+flag small_base   description: Build with new smaller base library   default:     False @@ -32,5 +33,9 @@     extensions:      CPP, ForeignFunctionInterface     ghc-options:     -Wall -O2 -fvia-C -    build-depends: base >= 3, bytestring >= 0.9+    if flag(small_base)+        build-depends: base >= 3, bytestring >= 0.9+    else+        build-depends: base < 3+     extra-libraries: pcre

@@ -0,0 +1,11 @@+all:+	ghc -Onot -fasm Unit.hs --make && ./Unit+#	runhaskell Unit.hs && echo $$?++test::+	ghc -fhpc --make -i.. Unit.hs -o Unit -O2 -no-recomp+	rm -f *.tix+	./Unit +	hpc report --decl-list       --exclude=Main Unit+	hpc markup --fun-entry-count --exclude=Main Unit+

@@ -13,1324 +13,4432 @@ import Data.Either import qualified Data.Map as M -testRegex :: S.ByteString-     -> [PCREOption]-     -> [S.ByteString]-     -> [Maybe [S.ByteString]]-     -> Test--testRegex regex options inputs outputs = TestLabel (S.unpack regex) $-  TestCase $ do-     assertEqual "Input/Output Length Check" (length inputs) (length outputs)--     assertBool "ByteString regex" =<<-      case compile regex options of-        Left  s -> do hPutStrLn stderr ("ERROR in ByteString: "++ show s)-                      return False-        Right r -> return $-            and [ match r i [] == o-                | (i,o) <- zip inputs outputs ]--     assertBool "String regex" =<<-      case String.compile (S.unpack regex) options of-        Left  s -> do hPutStrLn stderr ("ERROR in String: "++ show s)-                      return False-        Right r -> return $-            and [ String.match r i [] == o-                | (i,o) <- zip (map (S.unpack) inputs)-                               (map (fmap (map S.unpack)) outputs) ]--main = do counts <- runTestTT tests-          when (errors counts > 0 || failures counts > 0) exitFailure--tests = TestList--    [ testRegex "the quick brown fox" []-           [ "the quick brown fox"-           , "The quick brown FOX"-           , "What do you know about the quick brown fox?"-           , "What do you know about THE QUICK BROWN FOX?"-           ]-           [ Just ["the quick brown fox"]-           , Nothing-           , Just ["the quick brown fox"]-           , Nothing-           ]----  , testRegex "\0*" [] -- the embedded null in the pattern seems to be a problem---      ["\0\0\0\0"]---      [Just ["\0\0\0\0"]]--    , testRegex "\1*" [] -- the embedded null in the pattern seems to be a problem-        ["\1\1\1\1"]-        [Just ["\1\1\1\1"]]--    , testRegex "The quick brown fox" [caseless]-           ["the quick brown fox"-           ,"The quick brown FOX"-           ,"What do you know about the quick brown fox?"-           ,"What do you know about THE QUICK BROWN FOX?"-           ]-           [ Just ["the quick brown fox"]-           , Just ["The quick brown FOX"]-           , Just ["the quick brown fox"]-           , Just ["THE QUICK BROWN FOX"]-           ]--     , testRegex "a*abc?xyz+pqr{3}ab{2,}xy{4,5}pq{0,6}AB{0,}zz" []-           ["abxyzpqrrrabbxyyyypqAzz"-           ,"abxyzpqrrrabbxyyyypqAzz"-           ,"aabxyzpqrrrabbxyyyypqAzz"-           ,"aaabxyzpqrrrabbxyyyypqAzz"-           ,"aaaabxyzpqrrrabbxyyyypqAzz"-           ,"abcxyzpqrrrabbxyyyypqAzz"-           ,"aabcxyzpqrrrabbxyyyypqAzz"-           ,"aaabcxyzpqrrrabbxyyyypAzz"-           ,"aaabcxyzpqrrrabbxyyyypqAzz"-           ,"aaabcxyzpqrrrabbxyyyypqqAzz"-           ,"aaabcxyzpqrrrabbxyyyypqqqAzz"-           ,"aaabcxyzpqrrrabbxyyyypqqqqAzz"-           ,"aaabcxyzpqrrrabbxyyyypqqqqqAzz"-           ,"aaabcxyzpqrrrabbxyyyypqqqqqqAzz"-           ,"aaaabcxyzpqrrrabbxyyyypqAzz"-           ,"abxyzzpqrrrabbxyyyypqAzz"-           ,"aabxyzzzpqrrrabbxyyyypqAzz"-           ,"aaabxyzzzzpqrrrabbxyyyypqAzz"-           ,"aaaabxyzzzzpqrrrabbxyyyypqAzz"-           ,"abcxyzzpqrrrabbxyyyypqAzz"-           ,"aabcxyzzzpqrrrabbxyyyypqAzz"-           ,"aaabcxyzzzzpqrrrabbxyyyypqAzz"-           ,"aaaabcxyzzzzpqrrrabbxyyyypqAzz"-           ,"aaaabcxyzzzzpqrrrabbbxyyyypqAzz"-           ,"aaaabcxyzzzzpqrrrabbbxyyyyypqAzz"-           ,"aaabcxyzpqrrrabbxyyyypABzz"-           ,"aaabcxyzpqrrrabbxyyyypABBzz"-           ,">>>aaabxyzpqrrrabbxyyyypqAzz"-           ,">aaaabxyzpqrrrabbxyyyypqAzz"-           ,">>>>abcxyzpqrrrabbxyyyypqAzz"-           ,"abxyzpqrrabbxyyyypqAzz"-           ,"abxyzpqrrrrabbxyyyypqAzz"-           ,"abxyzpqrrrabxyyyypqAzz"-           ,"aaaabcxyzzzzpqrrrabbbxyyyyyypqAzz"-           ,"aaaabcxyzzzzpqrrrabbbxyyypqAzz"-           ,"aaabcxyzpqrrrabbxyyyypqqqqqqqAzz"-           ]--           [ Just ["abxyzpqrrrabbxyyyypqAzz"]-           , Just ["abxyzpqrrrabbxyyyypqAzz"]-           , Just ["aabxyzpqrrrabbxyyyypqAzz"]-           , Just ["aaabxyzpqrrrabbxyyyypqAzz"]-           , Just ["aaaabxyzpqrrrabbxyyyypqAzz"]-           , Just ["abcxyzpqrrrabbxyyyypqAzz"]-           , Just ["aabcxyzpqrrrabbxyyyypqAzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypAzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypqAzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypqqAzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypqqqAzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypqqqqAzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypqqqqqAzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypqqqqqqAzz"]-           , Just ["aaaabcxyzpqrrrabbxyyyypqAzz"]-           , Just ["abxyzzpqrrrabbxyyyypqAzz"]-           , Just ["aabxyzzzpqrrrabbxyyyypqAzz"]-           , Just ["aaabxyzzzzpqrrrabbxyyyypqAzz"]-           , Just ["aaaabxyzzzzpqrrrabbxyyyypqAzz"]-           , Just ["abcxyzzpqrrrabbxyyyypqAzz"]-           , Just ["aabcxyzzzpqrrrabbxyyyypqAzz"]-           , Just ["aaabcxyzzzzpqrrrabbxyyyypqAzz"]-           , Just ["aaaabcxyzzzzpqrrrabbxyyyypqAzz"]-           , Just ["aaaabcxyzzzzpqrrrabbbxyyyypqAzz"]-           , Just ["aaaabcxyzzzzpqrrrabbbxyyyyypqAzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypABzz"]-           , Just ["aaabcxyzpqrrrabbxyyyypABBzz"]-           , Just ["aaabxyzpqrrrabbxyyyypqAzz"]-           , Just ["aaaabxyzpqrrrabbxyyyypqAzz"]-           , Just ["abcxyzpqrrrabbxyyyypqAzz"]-           , Nothing-           , Nothing-           , Nothing-           , Nothing-           , Nothing-           , Nothing-           ]--    , testRegex "^(abc){1,2}zz" []-        ["abczz"-        ,"abcabczz"-        ,"zz"-        ,"abcabcabczz"-        ,">>abczz"]-        [ Just ["abczz","abc"]-        , Just ["abcabczz", "abc"]-        , Nothing-        , Nothing-        , Nothing ]--    , testRegex "^(b+?|a){1,2}?c" []-        ["bc",-         "bbc",-         "bbbc",-         "bac",-         "bbac",-         "aac",-         "abbbbbbbbbbbc",-         "bbbbbbbbbbbac",-         "aaac",-         "abbbbbbbbbbbac"]--        [Just ["bc", "b"],-         Just ["bbc", "b"],-         Just ["bbbc", "bb"],-         Just ["bac", "a"],-         Just ["bbac", "a"],-         Just ["aac", "a"],-         Just ["abbbbbbbbbbbc", "bbbbbbbbbbb"],-         Just ["bbbbbbbbbbbac", "a"],-         Nothing,-         Nothing]--    , testRegex "^(b+|a){1,2}c" []-        ["bc",-         "bbc",-         "bbbc",-         "bac",-         "bbac",-         "aac",-         "abbbbbbbbbbbc",-         "bbbbbbbbbbbac",-         "aaac",-         "abbbbbbbbbbbac"]-        [Just ["bc", "b"],-         Just ["bbc", "bb"],-         Just ["bbbc", "bbb"],-         Just ["bac", "a"],-         Just ["bbac", "a"],-         Just ["aac", "a"],-         Just ["abbbbbbbbbbbc", "bbbbbbbbbbb"],-         Just ["bbbbbbbbbbbac", "a"],-         Nothing,-         Nothing]--    , testRegex "^(b+|a){1,2}?bc" []-        ["bbc"]-        [Just ["bbc", "b"]]--    , testRegex "^(b*|ba){1,2}?bc" []-        ["babc",-         "bbabc",-         "bababc",-         "bababbc",-         "babababc"]-        [Just ["babc","ba"],-         Just ["bbabc","ba"],-         Just ["bababc","ba"],-         Nothing,-         Nothing]--    , testRegex "^(ba|b*){1,2}?bc" []-        ["babc",-         "bbabc",-         "bababc",-         "bababbc",-         "babababc"]-        [Just ["babc","ba"],-         Just ["bbabc","ba"],-         Just ["bababc","ba"],-         Nothing,-         Nothing]--    , testRegex "^[ab\\]cde]" []-        ["athing",-         "bthing",-         "]thing",-         "cthing",-         "dthing",-         "ething",-         "fthing",-         "[thing",-         "\\\\thing"]-        [Just ["a"],-         Just ["b"],-         Just ["]"],-         Just ["c"],-         Just ["d"],-         Just ["e"],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "^[]cde]" []-        ["]thing",-         "cthing",-         "dthing",-         "ething",-         "athing",-         "fthing"]-        [Just ["]"],-         Just ["c"],-         Just ["d"],-         Just ["e"],-         Nothing,-         Nothing]--    , testRegex "^[^ab\\]cde]" []-        ["fthing",-         "[thing",-         "\\\\thing",-         "athing",-         "bthing",-         "]thing",-         "cthing",-         "dthing",-         "ething"]-        [Just ["f"],-         Just ["["],-         Just ["\\"],-         Nothing,-         Nothing,-         Nothing,-         Nothing,-         Nothing,-         Nothing]--    , testRegex "^\129" []-        ["\129"]-        [Just ["\x81"]]--    , testRegex "^\255" []-        ["\255"]-        [Just ["\xff"]]--    , testRegex "^[0-9]+$" []-        ["0",-         "1",-         "2",-         "3",-         "4",-         "5",-         "6",-         "7",-         "8",-         "9",-         "10",-         "100",-         "abc"]-        [Just ["0"],-         Just ["1"],-         Just ["2"],-         Just ["3"],-         Just ["4"],-         Just ["5"],-         Just ["6"],-         Just ["7"],-         Just ["8"],-         Just ["9"],-         Just ["10"],-         Just ["100"],-         Nothing]--    , testRegex "^.*nter" []-        ["enter",-         "inter",-         "uponter"]-        [Just ["enter"],-         Just ["inter"],-         Just ["uponter"]]--    , testRegex "^xxx[0-9]+$" []-        ["xxx0",-         "xxx1234",-         "xxx"]-        [Just ["xxx0"],-         Just ["xxx1234"],-         Nothing]--    , testRegex "^.+[0-9][0-9][0-9]$" []-        ["x123",-         "xx123",-         "123456",-         "123",-         "x1234"]-        [Just ["x123"],-         Just ["xx123"],-         Just ["123456"],-         Nothing,-         Just ["x1234"]]--    , testRegex "^.+?[0-9][0-9][0-9]$" []-        ["x123",-         "xx123",-         "123456",-         "123",-         "x1234"]-        [Just ["x123"],-         Just ["xx123"],-         Just ["123456"],-         Nothing,-         Just ["x1234"]]--    -- test matching more than 1 subpattern-    , testRegex "^([^!]+)!(.+)=apquxz\\.ixr\\.zzz\\.ac\\.uk$" []-        ["abc!pqr=apquxz.ixr.zzz.ac.uk",-         "!pqr=apquxz.ixr.zzz.ac.uk",-         "abc!=apquxz.ixr.zzz.ac.uk",-         "abc!pqr=apquxz:ixr.zzz.ac.uk",-         "abc!pqr=apquxz.ixr.zzz.ac.ukk"]-        [Just ["abc!pqr=apquxz.ixr.zzz.ac.uk", "abc", "pqr"],-         Nothing,-         Nothing,-         Nothing,-         Nothing]--    , testRegex ":" []-        ["Well, we need a colon: somewhere",-         "*** Fail if we don't"]-        [Just [":"],-         Nothing]--    , testRegex "([\\da-f:]+)$" [caseless]-        ["0abc",-         "abc",-         "fed",-         "E",-         "::",-         "5f03:12C0::932e",-         "fed def",-         "Any old stuff",-         "*** Failers",-         "0zzz",-         "gzzz",-         "fed\x20",-         "Any old rubbish"]-        [Just ["0abc", "0abc"],-         Just ["abc", "abc"],-         Just ["fed", "fed"],-         Just ["E", "E"],-         Just ["::", "::"],-         Just ["5f03:12C0::932e", "5f03:12C0::932e"],-         Just ["def", "def"],-         Just ["ff", "ff"],-         Nothing,-         Nothing,-         Nothing,-         Nothing,-         Nothing]--    , testRegex "^.*\\.(\\d{1,3})\\.(\\d{1,3})\\.(\\d{1,3})$" []-        [".1.2.3",-         "A.12.123.0",-         ".1.2.3333",-         "1.2.3",-         "1234.2.3"]-        [Just [".1.2.3", "1", "2", "3"],-         Just ["A.12.123.0", "12", "123", "0"],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "^(\\d+)\\s+IN\\s+SOA\\s+(\\S+)\\s+(\\S+)\\s*\\(\\s*$" []-        ["1 IN SOA non-sp1 non-sp2(",-         "1    IN    SOA    non-sp1    non-sp2   (",-         "1IN SOA non-sp1 non-sp2("]-        [Just ["1 IN SOA non-sp1 non-sp2(", "1", "non-sp1", "non-sp2"],-         Just ["1    IN    SOA    non-sp1    non-sp2   (", "1", "non-sp1", "non-sp2"],-         Nothing]--    , testRegex "^[a-zA-Z\\d][a-zA-Z\\d\\-]*(\\.[a-zA-Z\\d][a-zA-z\\d\\-]*)*\\.$" []-        ["a.",-         "Z.",-         "2.",-         "ab-c.pq-r.",-         "sxk.zzz.ac.uk.",-         "x-.y-.",-         "*** Failers",-         "-abc.peq."]-        [Just ["a."],-         Just ["Z."],-         Just ["2."],-         Just ["ab-c.pq-r.", ".pq-r"],-         Just ["sxk.zzz.ac.uk.", ".uk"],-         Just ["x-.y-.", ".y-"],-         Nothing,-         Nothing]--    , testRegex "^\\*\\.[a-z]([a-z\\-\\d]*[a-z\\d]+)?(\\.[a-z]([a-z\\-\\d]*[a-z\\d]+)?)*$" []-        ["*.a",-         "*.b0-a",-         "*.c3-b.c",-         "*.c-a.b-c",-         "*** Failers",-         "*.0",-         "*.a-",-         "*.a-b.c-",-         "*.c-a.0-c"]-        [Just ["*.a"],-         Just ["*.b0-a", "0-a"],-         Just ["*.c3-b.c", "3-b", ".c"],-         Just ["*.c-a.b-c", "-a", ".b-c", "-c"],-         Nothing,-         Nothing,-         Nothing,-         Nothing,-         Nothing]--    , testRegex "^(?=ab(de))(abd)(e)" []-        ["abde"]-        [Just ["abde", "de", "abd", "e"]]--    , testRegex "^(?!(ab)de|x)(abd)(f)" []-        ["abdf"]-        [Just ["abdf", "", "abd", "f"]]--    , testRegex "^(?=(ab(cd)))(ab)" []-        ["abcd"]-        [Just ["ab", "abcd", "cd", "ab"]]--    , testRegex "^[\\da-f](\\.[\\da-f])*$" [caseless]-        ["a.b.c.d",-         "A.B.C.D",-         "a.b.c.1.2.3.C"]-        [Just ["a.b.c.d", ".d"],-         Just ["A.B.C.D", ".D"],-         Just ["a.b.c.1.2.3.C", ".C"]]--    , testRegex "^\".*\"\\s*(;.*)?$" []-        ["\"1234\"",-         "\"abcd\" ;",-         "\"\" ; rhubarb",-         "*** Failers",-         "\\\"1234\\\" : things"]-        [Just ["\"1234\""],-         Just ["\"abcd\" ;", ";"],-         Just ["\"\" ; rhubarb", "; rhubarb"],-         Nothing,-         Nothing]--    , testRegex "^$" []-        ["",-         "*** Failers"]-        [Just [""],-         Nothing]--    , testRegex "   ^    a   (?# begins with a)  b\\sc (?# then b c) $ (?# then end)" [extended]-        ["ab c",-         "*** Failers",-         "abc",-         "ab cde"]-        [Just ["ab c"],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "(?x)   ^    a   (?# begins with a)  b\\sc (?# then b c) $ (?# then end)" []-        ["ab c",-         "*** Failers",-         "abc",-         "ab cde"]-        [Just ["ab c"],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "^   a\\ b[c ]d       $" [extended]-        ["a bcd",-         "a b d",-         "*** Failers",-         "abcd",-         "ab d"]-        [Just ["a bcd"],-         Just ["a b d"],-         Nothing,-         Nothing,-         Nothing]--    , TestLabel "compile failure" $-            TestCase $ (assertBool "compile failure" $ Left "nothing to repeat"== compile "*" [])--    , testRegex "^(a(b(c)))(d(e(f)))(h(i(j)))(k(l(m)))$" []-        ["abcdefhijklm"]-        [Just ["abcdefhijklm",-               "abc", "bc",-               "c", "def",-               "ef", "f",-               "hij", "ij",-               "j", "klm",-               "lm", "m"]]--    , testRegex "^(?:a(b(c)))(?:d(e(f)))(?:h(i(j)))(?:k(l(m)))$" []-        ["abcdefhijklm"]-        [Just ["abcdefhijklm",-             "bc", "c", "ef", "f", "ij", "j", "lm", "m"]]--    , testRegex "^[.^$|()*+?{,}]+" []-        [".^$(*+)|{?,?}"]-        [Just [".^$(*+)|{?,?}"]]--    , testRegex "^a*\\w" []-        ["z",-         "az",-         "aaaz",-         "a",-         "aa",-         "aaaa",-         "a+",-         "aa+"]-        [Just ["z"],-         Just ["az"],-         Just ["aaaz"],-         Just ["a"],-         Just ["aa"],-         Just ["aaaa"],-         Just ["a"],-         Just ["aa"]]--    , testRegex "^a*?\\w" []-        ["z",-         "az",-         "aaaz",-         "a",-         "aa",-         "aaaa",-         "a+",-         "aa+"]-        [Just ["z"],-         Just ["a"],-         Just ["a"],-         Just ["a"],-         Just ["a"],-         Just ["a"],-         Just ["a"],-         Just ["a"]]--    , testRegex "^a+\\w" []-        ["az",-         "aaaz",-         "aa",-         "aaaa",-         "aa+"]-        [Just ["az"],-         Just ["aaaz"],-         Just ["aa"],-         Just ["aaaa"],-         Just ["aa"]]--    , testRegex "^a+?\\w" []-        ["az",-         "aaaz",-         "aa",-         "aaaa",-         "aa+"]-        [Just ["az"],-         Just ["aa"],-         Just ["aa"],-         Just ["aa"],-         Just ["aa"]]--    , testRegex "^\\d{8}\\w{2,}" []-        ["1234567890",-         "12345678ab",-         "12345678__",-         "*** Failers",-         "1234567"]-        [Just ["1234567890"],-         Just ["12345678ab"],-         Just ["12345678__"],-         Nothing,-         Nothing]--    , testRegex "^[aeiou\\d]{4,5}$" []-        ["uoie",-         "1234",-         "12345",-         "aaaaa",-         "*** Failers",-         "123456"]-        [Just ["uoie"],-         Just ["1234"],-         Just ["12345"],-         Just ["aaaaa"],-         Nothing,-         Nothing]--    , testRegex "^[aeiou\\d]{4,5}?" []-        ["uoie",-         "1234",-         "12345",-         "aaaaa",-         "123456"]-        [Just ["uoie"],-         Just ["1234"],-         Just ["1234"],-         Just ["aaaa"],-         Just ["1234"]]--    , testRegex "\\A(abc|def)=(\\1){2,3}\\Z" []-        ["abc=abcabc",-         "def=defdefdef",-         "*** Failers",-         "abc=defdef"]-        [Just ["abc=abcabc", "abc", "abc"],-         Just ["def=defdefdef", "def", "def"],-         Nothing,-         Nothing]--    , testRegex "^(a)(b)(c)(d)(e)(f)(g)(h)(i)(j)(k)\\11*(\\3\\4)\\1(?#)2$" []-        ["abcdefghijkcda2",-         "abcdefghijkkkkcda2"]-        [Just ["abcdefghijkcda2", "a", "b",-         "c", "d", "e", "f", "g", "h", "i", "j", "k", "cd"],--         Just ["abcdefghijkkkkcda2", "a", "b", "c", "d",-             "e", "f", "g", "h", "i", "j", "k", "cd"]]--    , testRegex "(cat(a(ract|tonic)|erpillar)) \\1()2(3)" []-        ["cataract cataract23",-         "catatonic catatonic23",-         "caterpillar caterpillar23"]--        [Just ["cataract cataract23", "cataract", "aract", "ract", "", "3"],--         Just ["catatonic catatonic23", "catatonic", "atonic", "tonic", "", "3"],--         Just ["caterpillar caterpillar23", "caterpillar", "erpillar", "", "", "3"]]--    , testRegex "^From +([^ ]+) +[a-zA-Z][a-zA-Z][a-zA-Z] +[a-zA-Z][a-zA-Z][a-zA-Z] +[0-9]?[0-9] +[0-9][0-9]:[0-9][0-9]" []-        ["From abcd  Mon Sep 01 12:33:02 1997"]-        [Just ["From abcd  Mon Sep 01 12:33", "abcd"]]--    , testRegex "^From\\s+\\S+\\s+([a-zA-Z]{3}\\s+){2}\\d{1,2}\\s+\\d\\d:\\d\\d" []-        ["From abcd  Mon Sep 01 12:33:02 1997",-         "From abcd  Mon Sep  1 12:33:02 1997",-         "*** Failers",-         "From abcd  Sep 01 12:33:02 1997"]-        [Just ["From abcd  Mon Sep 01 12:33", "Sep "],-         Just ["From abcd  Mon Sep  1 12:33", "Sep  "],-         Nothing,-         Nothing]--    , testRegex "\\w+(?=\t)" []-        ["the quick brown\t fox"]-        [Just ["brown"]]--    , testRegex "foo(?!bar)(.*)" []-        ["foobar is foolish see?"]-        [Just ["foolish see?", "lish see?"]]--    , testRegex "(?:(?!foo)...|^.{0,2})bar(.*)" []-        ["foobar crowbar etc",-         "barrel",-         "2barrel",-         "A barrel"]-        [Just ["rowbar etc", " etc"],-         Just ["barrel",     "rel"],-         Just ["2barrel",    "rel"],-         Just ["A barrel",   "rel"]]--    , testRegex "^(\\D*)(?=\\d)(?!123)" []-        ["abc456",-         "*** Failers",-         "abc123"]-        [Just ["abc", "abc"],-         Nothing,-         Nothing]--    , testRegex "^(a)\\1{2,3}(.)" []-        ["aaab",-         "aaaab",-         "aaaaab",-         "aaaaaab"]-        [Just ["aaab", "a","b"],-         Just ["aaaab","a","b"],-         Just ["aaaaa","a","a"],-         Just ["aaaaa","a","a"]]--    , testRegex "(?!^)abc" []-        ["the abc",-         "*** Failers",-         "abc"]-        [Just ["abc"],-         Nothing,-         Nothing]--    , testRegex "(?=^)abc" []-        ["abc",-         "*** Failers",-         "the abc"]-        [Just ["abc"],-         Nothing,-         Nothing]--    , testRegex "^[ab]{1,3}(ab*|b)" []-        ["aabbbbb"]-        [Just ["aabb", "b"]]--    , testRegex "^[ab]{1,3}?(ab*|b)" []-        ["aabbbbb"]-        [Just ["aabbbbb", "abbbbb"]]--    , testRegex "^[ab]{1,3}?(ab*?|b)" []-        ["aabbbbb"]-        [Just ["aa", "a"]]--    , testRegex "^[ab]{1,3}(ab*?|b)" []-        ["aabbbbb"]-        [Just ["aabb", "b"]]--    , testRegex "^(cow|)\\1(bell)" []-        ["cowcowbell",-         "bell",-         "*** Failers",-         "cowbell"]-        [Just ["cowcowbell", "cow", "bell"],-         Just ["bell", "", "bell"],-         Nothing,-         Nothing]--    , testRegex "^\\s" []-        ["\o40abc",-         "\nabc",-         "\rabc",-         "\tabc",-         "abc"]-        [Just [" "],-         Just ["\x0a"],-         Just ["\x0d"],-         Just ["\x09"],-         Nothing]--    , testRegex "^(a|)\\1*b" []-        ["ab",-         "aaaab",-         "b",-         "acb"]-        [Just ["ab", "a"],-         Just ["aaaab", "a"],-         Just ["b", ""],-         Nothing]--    , testRegex "^(a|)\\1+b" []-        ["aab",-         "aaaab",-         "b",-         "*** Failers",-         "ab"]-        [Just ["aab", "a"],-         Just ["aaaab", "a"],-         Just ["b", ""],-         Nothing,-         Nothing]--    , testRegex "^(a|)\\1?b" []-        ["ab",-         "aab",-         "b",-         "acb"]-        [Just ["ab", "a"],-         Just ["aab", "a"],-         Just ["b", ""],-         Nothing]--    , testRegex "^(a|)\\1{2}b" []-        ["aaab",-         "b",-         "ab",-         "aab",-         "aaaab"]-        [Just ["aaab", "a"],-         Just ["b", ""],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "^(a|)\\1{2,3}b" []-        ["aaab",-         "aaaab",-         "b",-         "ab",-         "aab",-         "aaaaab"]-        [Just ["aaab", "a"],-         Just ["aaaab", "a"],-         Just ["b", ""],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "ab{1,3}bc" []-        ["abbbbc",-         "abbbc",-         "abbc",-         "abc",-         "abbbbbc"]-        [Just ["abbbbc"],-         Just ["abbbc"],-         Just ["abbc"],-         Nothing,-         Nothing]--    , testRegex "([^.]*)\\.([^:]*):[T ]+(.*)" []-        ["track1.title:TBlah blah blah"]-        [Just ["track1.title:TBlah blah blah", "track1", "title", "Blah blah blah"]]--    , testRegex "([^.]*)\\.([^:]*):[T ]+(.*)" [caseless]-        ["track1.title:TBlah blah blah"]-        [Just ["track1.title:TBlah blah blah", "track1", "title", "Blah blah blah"]]--    , testRegex "([^.]*)\\.([^:]*):[t ]+(.*)" [caseless]-        ["track1.title:TBlah blah blah"]-        [Just ["track1.title:TBlah blah blah", "track1", "title", "Blah blah blah"]]--    , testRegex "^[W-c]+$" []-        ["WXY_^abc",-         "wxy"]-        [Just ["WXY_^abc"],-         Nothing]--    , testRegex "^[W-c]+$" [caseless]-        ["WXY_^abc",-         "wxy_^ABC"]-        [Just ["WXY_^abc"],-         Just ["wxy_^ABC"]]--    , testRegex "^[\\x3f-\\x5F]+$" [caseless]-        ["WXY_^abc",-         "wxy_^ABC"]-        [Just ["WXY_^abc"],-         Just ["wxy_^ABC"]]--    , testRegex "^abc$" []-        ["abc",-         "qqq\\nabc",-         "abc\\nzzz",-         "qqq\\nabc\\nzzz"]-        [Just ["abc"],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "(?:b)|(?::+)" []-        ["b::c",-         "c::b"]-        [Just ["b"],-         Just ["::"]]--    , testRegex "[-az]+" []-        ["az-",-         "*** Failers",-         "b"]-        [Just ["az-"],-         Just ["a"],-         Nothing]--    , testRegex "[az-]+" []-        ["za-",-         "*** Failers",-         "b"]-        [Just ["za-"],-         Just ["a"],-         Nothing]--    , testRegex "[a\\-z]+" []-        ["a-z",-         "*** Failers",-         "b"]-        [Just ["a-z"],-         Just ["a"],-         Nothing]--    , testRegex "[a-z]+" []-        ["abcdxyz"]-        [Just ["abcdxyz"]]--    , testRegex "[\\d-]+" []-        ["12-34",-         "aaa"]-        [Just ["12-34"],-         Nothing]-    , testRegex "[\\d-z]+" []-        ["12-34z",-         "aaa"]-        [Just ["12-34z"],-         Nothing]--    , testRegex "\\x20Z" []-        ["the Zoo",-         "*** Failers",-         "Zulu"]-        [Just [" Z"],-         Nothing,-         Nothing]--    , testRegex "(abc)\\1" [caseless]-        ["abcabc",-         "ABCabc",-         "abcABC"]-        [Just ["abcabc", "abc"],-         Just ["ABCabc", "ABC"],-         Just ["abcABC", "abc"]]--    , testRegex "ab{3cd" []-        ["ab{3cd"]-        [Just ["ab{3cd"]]--    , testRegex "ab{3,cd" []-        ["ab{3,cd"]-        [Just ["ab{3,cd"]]--    , testRegex "ab{3,4a}cd" []-        ["ab{3,4a}cd"]-        [Just ["ab{3,4a}cd"]]--    , testRegex "{4,5a}bc" []-        ["{4,5a}bc"]-        [Just ["{4,5a}bc"]]--    , testRegex "abc$" []-        ["abc",-         "abc\n",-         "*** Failers",-         "abc\ndef"]-        [Just ["abc"],-         Just ["abc"],-         Nothing,-         Nothing]--    , testRegex "(abc)\\123" []-        ["abc\x53"]-        [Just ["abcS", "abc"]]--    , testRegex "(abc)\\223" []-        ["abc\x93"]-        [Just ["abc\x93", "abc"]]--    , testRegex "(abc)\\323" []-        ["abc\xd3"]-        [Just ["abc\xd3", "abc"]]--    , testRegex "(abc)\\100" []-        ["abc\x40",-         "abc\o100"]-        [Just ["abc@", "abc"],-         Just ["abc@", "abc"]]--    , testRegex "(a)(b)(c)(d)(e)(f)(g)(h)(i)(j)(k)(l)\\12\\123" []-        ["abcdefghijkllS"]-        [Just ["abcdefghijkllS",-             "a",-             "b",-             "c",-             "d",-             "e",-             "f",-             "g",-             "h",-             "i",-             "j",-             "k",-             "l"]]--     , testRegex "(a)(b)(c)(d)(e)(f)(g)(h)(i)(j)(k)\\12\\123" []-        ["abcdefghijk\o12S"]-        [Just ["abcdefghijk\x0aS",-             "a",-             "b",-             "c",-             "d",-             "e",-             "f",-             "g",-             "h",-             "i",-             "j",-             "k"]]--    , testRegex "ab\\idef" []-        ["abidef"]-        [Just ["abidef"]]--    , testRegex "a{0}bc" []-        ["bc"]-        [Just ["bc"]]--    , testRegex "(a|(bc)){0,0}?xyz" []-        ["xyz"]-        [Just ["xyz"]]--    , testRegex "(?s)a.b" []-        ["a\nb"]-        [Just ["a\nb"]]--    , testRegex "^([^a])([^\\b])([^c]*)([^d]{3,4})" []-        ["baNOTccccd",-         "baNOTcccd",-         "baNOTccd",-         "bacccd",-         "anything",-         "b\bc   ",-         "baccd"]-        [Just ["baNOTcccc", "b", "a", "NOT", "cccc"],-         Just ["baNOTccc", "b", "a", "NOT", "ccc"],-         Just ["baNOTcc", "b", "a", "NO", "Tcc"],-         Just ["baccc", "b", "a", "", "ccc"],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "^\\d{8,}\\@.+[^k]$" []-        ["12345678@a.b.c.d",-         "123456789@x.y.z",-         "*** Failers",-         "12345678@x.y.uk",-         "1234567@a.b.c.d       "]-        [Just ["12345678@a.b.c.d"],-         Just ["123456789@x.y.z"],-         Nothing,-         Nothing,-         Nothing]--    , testRegex "(a)\\1{8,}" []-        ["aaaaaaaaa",-         "aaaaaaaaaa",-         "*** Failers",-         "aaaaaaa   "]-        [Just ["aaaaaaaaa", "a"],-         Just ["aaaaaaaaaa", "a"],-         Nothing,-         Nothing]--    , testRegex "[^a]" []-        ["aaaabcd",-         "aaAabcd "]-        [Just ["b"],-         Just ["A"]]--    , testRegex "[^a]" [caseless]-        ["aaaabcd",-         "aaAabcd "]-        [Just ["b"],-         Just ["b"]]--    , testRegex "[^az]" []-        ["aaaabcd",-         "aaAabcd "]-        [Just ["b"],-         Just ["A"]]--    , testRegex "[^az]" [caseless]-        ["aaaabcd",-         "aaAabcd "]-        [Just ["b"],-         Just ["b"]]--    , testRegex "P[^*]TAIRE[^*]{1,6}?LL" []-        ["xxxxxxxxxxxPSTAIREISLLxxxxxxxxx"]-        [Just ["PSTAIREISLL"]]--    , testRegex "P[^*]TAIRE[^*]{1,}?LL" []-        ["xxxxxxxxxxxPSTAIREISLLxxxxxxxxx"]-        [Just ["PSTAIREISLL"]]--    , testRegex "(.*?)(\\d+)" []-        ["I have 2 numbers: 53147"]-        [Just ["I have 2", "I have ", "2"]]--    , testRegex "(.*)(\\d+)$" []-        ["I have 2 numbers: 53147"]-        [Just ["I have 2 numbers: 53147", "I have 2 numbers: 5314", "7"]]--    , testRegex "(.*?)(\\d+)$" []-        ["I have 2 numbers: 53147"]-        [Just ["I have 2 numbers: 53147", "I have 2 numbers: ", "53147"]]--    , testRegex "(.*)\\b(\\d+)$" []-        ["I have 2 numbers: 53147"]-        [Just ["I have 2 numbers: 53147", "I have 2 numbers: ", "53147"]]--    , testRegex "(.*\\D)(\\d+)$" []-        ["I have 2 numbers: 53147"]-        [Just ["I have 2 numbers: 53147", "I have 2 numbers: ", "53147"]]--    , testRegex "word (?:[a-zA-Z0-9]+ ){0,10}otherword" []-        ["word cat dog elephant mussel cow horse canary baboon snake shark otherword",-         "word cat dog elephant mussel cow horse canary baboon snake shark"]-        [Just ["word cat dog elephant mussel cow horse canary baboon snake shark otherword"],-         Nothing]--    , testRegex "word (?:[a-zA-Z0-9]+ ){0,300}otherword" []-        ["word cat dog elephant mussel cow horse canary baboon snake shark the quick brown fox and the lazy dog and several other words getting close to thirty by now I hope"]-        [Nothing]-    , testRegex "^(a){0,0}" []-        ["bcd",-         "abc",-         "aab     "]-        [Just [""],-         Just [""],-         Just [""]]--    , testRegex "^(a){0,1}" []-        ["bcd",-         "abc",-         "aab  "]-        [Just [""],-         Just ["a", "a"],-         Just ["a", "a"]]--    , testRegex "^(a){0,2}" []-        ["bcd",-         "abc",-         "aab  "]-        [Just [""],-         Just ["a", "a"],-         Just ["aa", "a"]]--    , testRegex "^(a){0,3}" []-        ["bcd",-         "abc",-         "aab",-         "aaa   "]-        [Just [""],-         Just ["a", "a"],-         Just ["aa", "a"],-         Just ["aaa", "a"]]--    , testRegex "^(a){0,3}" []-        ["bcd",-         "abc",-         "aab",-         "aaa   "]-        [Just [""],-         Just ["a", "a"],-         Just ["aa", "a"],-         Just ["aaa", "a"]]--    , testRegex "^(a){0,}" []-        ["bcd",-         "abc",-         "aab",-         "aaa",-         "aaaaaaaa    "]-        [Just [""],-         Just ["a", "a"],-         Just ["aa", "a"],-         Just ["aaa", "a"],-         Just ["aaaaaaaa", "a"]]--    , testRegex "^(a){1,1}" []-        ["bcd",-         "abc",-         "aab  "]-        [Nothing,-         Just ["a", "a"],-         Just ["a", "a"]]--    , testRegex "^(a){1,2}" []-        ["bcd",-         "abc",-         "aab  "]-        [Nothing,-         Just ["a", "a"],-         Just ["aa", "a"]]--    , testRegex "^(a){1,3}" []-        ["bcd",-         "abc",-         "aab",-         "aaa   "]-        [Nothing,-         Just ["a", "a"],-         Just ["aa", "a"],-         Just ["aaa", "a"]]--    , testRegex ".*\\.gif" []-        ["borfle\nbib.gif\nno"]-        [Just ["bib.gif"]]--    , testRegex ".{0,}\\.gif" []-        ["borfle\nbib.gif\nno"]-        [Just ["bib.gif"]]--    , testRegex ".*\\.gif" [multiline]-        ["borfle\nbib.gif\nno"]-        [Just ["bib.gif"]]--    , testRegex ".*\\.gif" [dotall]-        ["borfle\nbib.gif\nno"]-        [Just ["borfle\nbib.gif"]]--    , testRegex ".*$" [multiline]-        ["borfle\nbib.gif\nno"]-        [Just ["borfle"]]--    , testRegex ".*$" [dotall]-        ["borfle\nbib.gif\nno"]-        [Just ["borfle\nbib.gif\nno"]]--    , testRegex ".*$" [multiline]-        ["borfle\nbib.gif\nno\\n"]-        [Just ["borfle"]]--    , testRegex "(?ms)^B" []-        ["abc\nB"]-        [Just ["B"]]--    , testRegex "(?s)B$" []-        ["B\n"]-        [Just ["B"]]--    , testRegex "^[abcdefghijklmnopqrstuvwxy0123456789]" []-        ["n",-         "z "]-        [Just ["n"],-         Nothing]--    , testRegex "abcde{0,0}" []-        ["abcd",-         "abce  "]-        [Just ["abcd"],-         Nothing]--    , testRegex "^(b+?|a){1,2}?c" []-        ["bac",-         "bbac",-         "bbbac",-         "bbbbac",-         "bbbbbac "]-        [Just ["bac","a"],-         Just ["bbac","a"],-         Just ["bbbac","a"],-         Just ["bbbbac","a"],-         Just ["bbbbbac","a"]]--    , testRegex "(AB)*?\\1" []-        ["ABABAB"]-        [Just ["ABAB", "AB"]]--    , testRegex "(.*(.)?)*" []-        ["abcd"]-        [Just ["abcd", ""]]--{--    , testRegex "(?:a|)*\\d" []-        ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa",-         "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]-        [Nothing,-         Just ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]]--}--    , testRegex "^(?:a(?:(?:))+)+" []-        ["aaaa"]-        [Just ["aaaa"]]--    , testRegex "^(a()+)+" []-        ["aaaa"]-        [Just ["aaaa", "a", ""]]--    , testRegex "^(?:a(?:(?:))*)*" []-        ["aaaa"]-        [Just ["aaaa"]]--    , testRegex "^(a()*)*" []-        ["aaaa"]-        [Just ["aaaa", "a", ""]]--  ]+import System.IO.Unsafe+import Control.Exception+import Control.Monad.Error++testRegex :: S.ByteString+     -> [PCREOption]+     -> [S.ByteString]+     -> [Maybe [S.ByteString]]+     -> Test++testRegex regex options inputs outputs = TestLabel (S.unpack regex) $+  TestCase $ do+     assertEqual "Input/Output Length Check" (length inputs) (length outputs)++     assertBool "ByteString regex compile" =<<+      case compile regex options of+        r -> return $+            and [ match r i [] == o+                | (i,o) <- zip inputs outputs ]++     assertBool "ByteString regex compileM" =<<+      case compileM regex options of+        Left s -> do hPutStrLn stderr ("ERROR in ByteString in compileM: " ++ s)+                     return False+        Right r -> return $+            and [ match r i [] == o+                | (i,o) <- zip inputs outputs ]++     assertBool "String regex" =<<+      case String.compile (S.unpack regex) options of+        r -> return $+            and [ String.match r i [] == o+                | (i,o) <- zip (map (S.unpack) inputs)+                               (map (fmap (map S.unpack)) outputs) ]++     assertBool "String regex" =<<+      case String.compileM (S.unpack regex) options of+        Left s -> do hPutStrLn stderr ("ERROR in String compileM: "  ++ s)+                     return False+        Right r -> return $+            and [ String.match r i [] == o+                | (i,o) <- zip (map (S.unpack) inputs)+                               (map (fmap (map S.unpack)) outputs) ]++main = do counts <- runTestTT tests+          when (errors counts > 0 || failures counts > 0) exitFailure++tests = TestList++    [ testRegex "the quick brown fox" []+           [ "the quick brown fox"+           , "The quick brown FOX"+           , "What do you know about the quick brown fox?"+           , "What do you know about THE QUICK BROWN FOX?"+           ]+           [ Just ["the quick brown fox"]+           , Nothing+           , Just ["the quick brown fox"]+           , Nothing+           ]++    , TestLabel "compile failure" $+            TestCase $ (assertBool "compile failure" $+                Left ("nothing to repeat"::String) == compileM "*" [])++    , TestLabel "compile failure" $+            TestCase $ (assertBool "compile failure" =<< (return $+                    (Just ("Text.Regex.PCRE.Light: Error in regex: \"*\""::String))+                    ==+                    (unsafePerformIO $ do+                        handle (\e -> return (Just (show e)))+                               (compile "*" [] `seq` return Nothing))))++--  , testRegex "\0*" [] -- the embedded null in the pattern seems to be a problem+--      ["\0\0\0\0"]+--      [Just ["\0\0\0\0"]]++    , testRegex "\1*" [] -- the embedded null in the pattern seems to be a problem+        ["\1\1\1\1"]+        [Just ["\1\1\1\1"]]++    , testRegex "The quick brown fox" [caseless]+           ["the quick brown fox"+           ,"The quick brown FOX"+           ,"What do you know about the quick brown fox?"+           ,"What do you know about THE QUICK BROWN FOX?"+           ]+           [ Just ["the quick brown fox"]+           , Just ["The quick brown FOX"]+           , Just ["the quick brown fox"]+           , Just ["THE QUICK BROWN FOX"]+           ]++     , testRegex "a*abc?xyz+pqr{3}ab{2,}xy{4,5}pq{0,6}AB{0,}zz" []+           ["abxyzpqrrrabbxyyyypqAzz"+           ,"abxyzpqrrrabbxyyyypqAzz"+           ,"aabxyzpqrrrabbxyyyypqAzz"+           ,"aaabxyzpqrrrabbxyyyypqAzz"+           ,"aaaabxyzpqrrrabbxyyyypqAzz"+           ,"abcxyzpqrrrabbxyyyypqAzz"+           ,"aabcxyzpqrrrabbxyyyypqAzz"+           ,"aaabcxyzpqrrrabbxyyyypAzz"+           ,"aaabcxyzpqrrrabbxyyyypqAzz"+           ,"aaabcxyzpqrrrabbxyyyypqqAzz"+           ,"aaabcxyzpqrrrabbxyyyypqqqAzz"+           ,"aaabcxyzpqrrrabbxyyyypqqqqAzz"+           ,"aaabcxyzpqrrrabbxyyyypqqqqqAzz"+           ,"aaabcxyzpqrrrabbxyyyypqqqqqqAzz"+           ,"aaaabcxyzpqrrrabbxyyyypqAzz"+           ,"abxyzzpqrrrabbxyyyypqAzz"+           ,"aabxyzzzpqrrrabbxyyyypqAzz"+           ,"aaabxyzzzzpqrrrabbxyyyypqAzz"+           ,"aaaabxyzzzzpqrrrabbxyyyypqAzz"+           ,"abcxyzzpqrrrabbxyyyypqAzz"+           ,"aabcxyzzzpqrrrabbxyyyypqAzz"+           ,"aaabcxyzzzzpqrrrabbxyyyypqAzz"+           ,"aaaabcxyzzzzpqrrrabbxyyyypqAzz"+           ,"aaaabcxyzzzzpqrrrabbbxyyyypqAzz"+           ,"aaaabcxyzzzzpqrrrabbbxyyyyypqAzz"+           ,"aaabcxyzpqrrrabbxyyyypABzz"+           ,"aaabcxyzpqrrrabbxyyyypABBzz"+           ,">>>aaabxyzpqrrrabbxyyyypqAzz"+           ,">aaaabxyzpqrrrabbxyyyypqAzz"+           ,">>>>abcxyzpqrrrabbxyyyypqAzz"+           ,"abxyzpqrrabbxyyyypqAzz"+           ,"abxyzpqrrrrabbxyyyypqAzz"+           ,"abxyzpqrrrabxyyyypqAzz"+           ,"aaaabcxyzzzzpqrrrabbbxyyyyyypqAzz"+           ,"aaaabcxyzzzzpqrrrabbbxyyypqAzz"+           ,"aaabcxyzpqrrrabbxyyyypqqqqqqqAzz"+           ]++           [ Just ["abxyzpqrrrabbxyyyypqAzz"]+           , Just ["abxyzpqrrrabbxyyyypqAzz"]+           , Just ["aabxyzpqrrrabbxyyyypqAzz"]+           , Just ["aaabxyzpqrrrabbxyyyypqAzz"]+           , Just ["aaaabxyzpqrrrabbxyyyypqAzz"]+           , Just ["abcxyzpqrrrabbxyyyypqAzz"]+           , Just ["aabcxyzpqrrrabbxyyyypqAzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypAzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypqAzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypqqAzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypqqqAzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypqqqqAzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypqqqqqAzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypqqqqqqAzz"]+           , Just ["aaaabcxyzpqrrrabbxyyyypqAzz"]+           , Just ["abxyzzpqrrrabbxyyyypqAzz"]+           , Just ["aabxyzzzpqrrrabbxyyyypqAzz"]+           , Just ["aaabxyzzzzpqrrrabbxyyyypqAzz"]+           , Just ["aaaabxyzzzzpqrrrabbxyyyypqAzz"]+           , Just ["abcxyzzpqrrrabbxyyyypqAzz"]+           , Just ["aabcxyzzzpqrrrabbxyyyypqAzz"]+           , Just ["aaabcxyzzzzpqrrrabbxyyyypqAzz"]+           , Just ["aaaabcxyzzzzpqrrrabbxyyyypqAzz"]+           , Just ["aaaabcxyzzzzpqrrrabbbxyyyypqAzz"]+           , Just ["aaaabcxyzzzzpqrrrabbbxyyyyypqAzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypABzz"]+           , Just ["aaabcxyzpqrrrabbxyyyypABBzz"]+           , Just ["aaabxyzpqrrrabbxyyyypqAzz"]+           , Just ["aaaabxyzpqrrrabbxyyyypqAzz"]+           , Just ["abcxyzpqrrrabbxyyyypqAzz"]+           , Nothing+           , Nothing+           , Nothing+           , Nothing+           , Nothing+           , Nothing+           ]++    , testRegex "^(abc){1,2}zz" []+        ["abczz"+        ,"abcabczz"+        ,"zz"+        ,"abcabcabczz"+        ,">>abczz"]+        [ Just ["abczz","abc"]+        , Just ["abcabczz", "abc"]+        , Nothing+        , Nothing+        , Nothing ]++    , testRegex "^(b+?|a){1,2}?c" []+        ["bc",+         "bbc",+         "bbbc",+         "bac",+         "bbac",+         "aac",+         "abbbbbbbbbbbc",+         "bbbbbbbbbbbac",+         "aaac",+         "abbbbbbbbbbbac"]++        [Just ["bc", "b"],+         Just ["bbc", "b"],+         Just ["bbbc", "bb"],+         Just ["bac", "a"],+         Just ["bbac", "a"],+         Just ["aac", "a"],+         Just ["abbbbbbbbbbbc", "bbbbbbbbbbb"],+         Just ["bbbbbbbbbbbac", "a"],+         Nothing,+         Nothing]++    , testRegex "^(b+|a){1,2}c" []+        ["bc",+         "bbc",+         "bbbc",+         "bac",+         "bbac",+         "aac",+         "abbbbbbbbbbbc",+         "bbbbbbbbbbbac",+         "aaac",+         "abbbbbbbbbbbac"]+        [Just ["bc", "b"],+         Just ["bbc", "bb"],+         Just ["bbbc", "bbb"],+         Just ["bac", "a"],+         Just ["bbac", "a"],+         Just ["aac", "a"],+         Just ["abbbbbbbbbbbc", "bbbbbbbbbbb"],+         Just ["bbbbbbbbbbbac", "a"],+         Nothing,+         Nothing]++    , testRegex "^(b+|a){1,2}?bc" []+        ["bbc"]+        [Just ["bbc", "b"]]++    , testRegex "^(b*|ba){1,2}?bc" []+        ["babc",+         "bbabc",+         "bababc",+         "bababbc",+         "babababc"]+        [Just ["babc","ba"],+         Just ["bbabc","ba"],+         Just ["bababc","ba"],+         Nothing,+         Nothing]++    , testRegex "^(ba|b*){1,2}?bc" []+        ["babc",+         "bbabc",+         "bababc",+         "bababbc",+         "babababc"]+        [Just ["babc","ba"],+         Just ["bbabc","ba"],+         Just ["bababc","ba"],+         Nothing,+         Nothing]++    , testRegex "^[ab\\]cde]" []+        ["athing",+         "bthing",+         "]thing",+         "cthing",+         "dthing",+         "ething",+         "fthing",+         "[thing",+         "\\\\thing"]+        [Just ["a"],+         Just ["b"],+         Just ["]"],+         Just ["c"],+         Just ["d"],+         Just ["e"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^[]cde]" []+        ["]thing",+         "cthing",+         "dthing",+         "ething",+         "athing",+         "fthing"]+        [Just ["]"],+         Just ["c"],+         Just ["d"],+         Just ["e"],+         Nothing,+         Nothing]++    , testRegex "^[^ab\\]cde]" []+        ["fthing",+         "[thing",+         "\\\\thing",+         "athing",+         "bthing",+         "]thing",+         "cthing",+         "dthing",+         "ething"]+        [Just ["f"],+         Just ["["],+         Just ["\\"],+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^\129" []+        ["\129"]+        [Just ["\x81"]]++    , testRegex "^\255" []+        ["\255"]+        [Just ["\xff"]]++    , testRegex "^[0-9]+$" []+        ["0",+         "1",+         "2",+         "3",+         "4",+         "5",+         "6",+         "7",+         "8",+         "9",+         "10",+         "100",+         "abc"]+        [Just ["0"],+         Just ["1"],+         Just ["2"],+         Just ["3"],+         Just ["4"],+         Just ["5"],+         Just ["6"],+         Just ["7"],+         Just ["8"],+         Just ["9"],+         Just ["10"],+         Just ["100"],+         Nothing]++    , testRegex "^.*nter" []+        ["enter",+         "inter",+         "uponter"]+        [Just ["enter"],+         Just ["inter"],+         Just ["uponter"]]++    , testRegex "^xxx[0-9]+$" []+        ["xxx0",+         "xxx1234",+         "xxx"]+        [Just ["xxx0"],+         Just ["xxx1234"],+         Nothing]++    , testRegex "^.+[0-9][0-9][0-9]$" []+        ["x123",+         "xx123",+         "123456",+         "123",+         "x1234"]+        [Just ["x123"],+         Just ["xx123"],+         Just ["123456"],+         Nothing,+         Just ["x1234"]]++    , testRegex "^.+?[0-9][0-9][0-9]$" []+        ["x123",+         "xx123",+         "123456",+         "123",+         "x1234"]+        [Just ["x123"],+         Just ["xx123"],+         Just ["123456"],+         Nothing,+         Just ["x1234"]]++    -- test matching more than 1 subpattern+    , testRegex "^([^!]+)!(.+)=apquxz\\.ixr\\.zzz\\.ac\\.uk$" []+        ["abc!pqr=apquxz.ixr.zzz.ac.uk",+         "!pqr=apquxz.ixr.zzz.ac.uk",+         "abc!=apquxz.ixr.zzz.ac.uk",+         "abc!pqr=apquxz:ixr.zzz.ac.uk",+         "abc!pqr=apquxz.ixr.zzz.ac.ukk"]+        [Just ["abc!pqr=apquxz.ixr.zzz.ac.uk", "abc", "pqr"],+         Nothing,+         Nothing,+         Nothing,+         Nothing]++    , testRegex ":" []+        ["Well, we need a colon: somewhere",+         "*** Fail if we don't"]+        [Just [":"],+         Nothing]++    , testRegex "([\\da-f:]+)$" [caseless]+        ["0abc",+         "abc",+         "fed",+         "E",+         "::",+         "5f03:12C0::932e",+         "fed def",+         "Any old stuff",+         "*** Failers",+         "0zzz",+         "gzzz",+         "fed\x20",+         "Any old rubbish"]+        [Just ["0abc", "0abc"],+         Just ["abc", "abc"],+         Just ["fed", "fed"],+         Just ["E", "E"],+         Just ["::", "::"],+         Just ["5f03:12C0::932e", "5f03:12C0::932e"],+         Just ["def", "def"],+         Just ["ff", "ff"],+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^.*\\.(\\d{1,3})\\.(\\d{1,3})\\.(\\d{1,3})$" []+        [".1.2.3",+         "A.12.123.0",+         ".1.2.3333",+         "1.2.3",+         "1234.2.3"]+        [Just [".1.2.3", "1", "2", "3"],+         Just ["A.12.123.0", "12", "123", "0"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^(\\d+)\\s+IN\\s+SOA\\s+(\\S+)\\s+(\\S+)\\s*\\(\\s*$" []+        ["1 IN SOA non-sp1 non-sp2(",+         "1    IN    SOA    non-sp1    non-sp2   (",+         "1IN SOA non-sp1 non-sp2("]+        [Just ["1 IN SOA non-sp1 non-sp2(", "1", "non-sp1", "non-sp2"],+         Just ["1    IN    SOA    non-sp1    non-sp2   (", "1", "non-sp1", "non-sp2"],+         Nothing]++    , testRegex "^[a-zA-Z\\d][a-zA-Z\\d\\-]*(\\.[a-zA-Z\\d][a-zA-z\\d\\-]*)*\\.$" []+        ["a.",+         "Z.",+         "2.",+         "ab-c.pq-r.",+         "sxk.zzz.ac.uk.",+         "x-.y-.",+         "*** Failers",+         "-abc.peq."]+        [Just ["a."],+         Just ["Z."],+         Just ["2."],+         Just ["ab-c.pq-r.", ".pq-r"],+         Just ["sxk.zzz.ac.uk.", ".uk"],+         Just ["x-.y-.", ".y-"],+         Nothing,+         Nothing]++    , testRegex "^\\*\\.[a-z]([a-z\\-\\d]*[a-z\\d]+)?(\\.[a-z]([a-z\\-\\d]*[a-z\\d]+)?)*$" []+        ["*.a",+         "*.b0-a",+         "*.c3-b.c",+         "*.c-a.b-c",+         "*** Failers",+         "*.0",+         "*.a-",+         "*.a-b.c-",+         "*.c-a.0-c"]+        [Just ["*.a"],+         Just ["*.b0-a", "0-a"],+         Just ["*.c3-b.c", "3-b", ".c"],+         Just ["*.c-a.b-c", "-a", ".b-c", "-c"],+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^(?=ab(de))(abd)(e)" []+        ["abde"]+        [Just ["abde", "de", "abd", "e"]]++    , testRegex "^(?!(ab)de|x)(abd)(f)" []+        ["abdf"]+        [Just ["abdf", "", "abd", "f"]]++    , testRegex "^(?=(ab(cd)))(ab)" []+        ["abcd"]+        [Just ["ab", "abcd", "cd", "ab"]]++    , testRegex "^[\\da-f](\\.[\\da-f])*$" [caseless]+        ["a.b.c.d",+         "A.B.C.D",+         "a.b.c.1.2.3.C"]+        [Just ["a.b.c.d", ".d"],+         Just ["A.B.C.D", ".D"],+         Just ["a.b.c.1.2.3.C", ".C"]]++    , testRegex "^\".*\"\\s*(;.*)?$" []+        ["\"1234\"",+         "\"abcd\" ;",+         "\"\" ; rhubarb",+         "*** Failers",+         "\\\"1234\\\" : things"]+        [Just ["\"1234\""],+         Just ["\"abcd\" ;", ";"],+         Just ["\"\" ; rhubarb", "; rhubarb"],+         Nothing,+         Nothing]++    , testRegex "^$" []+        ["",+         "*** Failers"]+        [Just [""],+         Nothing]++    , testRegex "   ^    a   (?# begins with a)  b\\sc (?# then b c) $ (?# then end)" [extended]+        ["ab c",+         "*** Failers",+         "abc",+         "ab cde"]+        [Just ["ab c"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "(?x)   ^    a   (?# begins with a)  b\\sc (?# then b c) $ (?# then end)" []+        ["ab c",+         "*** Failers",+         "abc",+         "ab cde"]+        [Just ["ab c"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^   a\\ b[c ]d       $" [extended]+        ["a bcd",+         "a b d",+         "*** Failers",+         "abcd",+         "ab d"]+        [Just ["a bcd"],+         Just ["a b d"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^(a(b(c)))(d(e(f)))(h(i(j)))(k(l(m)))$" []+        ["abcdefhijklm"]+        [Just ["abcdefhijklm",+               "abc", "bc",+               "c", "def",+               "ef", "f",+               "hij", "ij",+               "j", "klm",+               "lm", "m"]]++    , testRegex "^(?:a(b(c)))(?:d(e(f)))(?:h(i(j)))(?:k(l(m)))$" []+        ["abcdefhijklm"]+        [Just ["abcdefhijklm",+             "bc", "c", "ef", "f", "ij", "j", "lm", "m"]]++    , testRegex "^[.^$|()*+?{,}]+" []+        [".^$(*+)|{?,?}"]+        [Just [".^$(*+)|{?,?}"]]++    , testRegex "^a*\\w" []+        ["z",+         "az",+         "aaaz",+         "a",+         "aa",+         "aaaa",+         "a+",+         "aa+"]+        [Just ["z"],+         Just ["az"],+         Just ["aaaz"],+         Just ["a"],+         Just ["aa"],+         Just ["aaaa"],+         Just ["a"],+         Just ["aa"]]++    , testRegex "^a*?\\w" []+        ["z",+         "az",+         "aaaz",+         "a",+         "aa",+         "aaaa",+         "a+",+         "aa+"]+        [Just ["z"],+         Just ["a"],+         Just ["a"],+         Just ["a"],+         Just ["a"],+         Just ["a"],+         Just ["a"],+         Just ["a"]]++    , testRegex "^a+\\w" []+        ["az",+         "aaaz",+         "aa",+         "aaaa",+         "aa+"]+        [Just ["az"],+         Just ["aaaz"],+         Just ["aa"],+         Just ["aaaa"],+         Just ["aa"]]++    , testRegex "^a+?\\w" []+        ["az",+         "aaaz",+         "aa",+         "aaaa",+         "aa+"]+        [Just ["az"],+         Just ["aa"],+         Just ["aa"],+         Just ["aa"],+         Just ["aa"]]++    , testRegex "^\\d{8}\\w{2,}" []+        ["1234567890",+         "12345678ab",+         "12345678__",+         "*** Failers",+         "1234567"]+        [Just ["1234567890"],+         Just ["12345678ab"],+         Just ["12345678__"],+         Nothing,+         Nothing]++    , testRegex "^[aeiou\\d]{4,5}$" []+        ["uoie",+         "1234",+         "12345",+         "aaaaa",+         "*** Failers",+         "123456"]+        [Just ["uoie"],+         Just ["1234"],+         Just ["12345"],+         Just ["aaaaa"],+         Nothing,+         Nothing]++    , testRegex "^[aeiou\\d]{4,5}?" []+        ["uoie",+         "1234",+         "12345",+         "aaaaa",+         "123456"]+        [Just ["uoie"],+         Just ["1234"],+         Just ["1234"],+         Just ["aaaa"],+         Just ["1234"]]++    , testRegex "\\A(abc|def)=(\\1){2,3}\\Z" []+        ["abc=abcabc",+         "def=defdefdef",+         "*** Failers",+         "abc=defdef"]+        [Just ["abc=abcabc", "abc", "abc"],+         Just ["def=defdefdef", "def", "def"],+         Nothing,+         Nothing]++    , testRegex "^(a)(b)(c)(d)(e)(f)(g)(h)(i)(j)(k)\\11*(\\3\\4)\\1(?#)2$" []+        ["abcdefghijkcda2",+         "abcdefghijkkkkcda2"]+        [Just ["abcdefghijkcda2", "a", "b",+         "c", "d", "e", "f", "g", "h", "i", "j", "k", "cd"],++         Just ["abcdefghijkkkkcda2", "a", "b", "c", "d",+             "e", "f", "g", "h", "i", "j", "k", "cd"]]++    , testRegex "(cat(a(ract|tonic)|erpillar)) \\1()2(3)" []+        ["cataract cataract23",+         "catatonic catatonic23",+         "caterpillar caterpillar23"]++        [Just ["cataract cataract23", "cataract", "aract", "ract", "", "3"],++         Just ["catatonic catatonic23", "catatonic", "atonic", "tonic", "", "3"],++         Just ["caterpillar caterpillar23", "caterpillar", "erpillar", "", "", "3"]]++    , testRegex "^From +([^ ]+) +[a-zA-Z][a-zA-Z][a-zA-Z] +[a-zA-Z][a-zA-Z][a-zA-Z] +[0-9]?[0-9] +[0-9][0-9]:[0-9][0-9]" []+        ["From abcd  Mon Sep 01 12:33:02 1997"]+        [Just ["From abcd  Mon Sep 01 12:33", "abcd"]]++    , testRegex "^From\\s+\\S+\\s+([a-zA-Z]{3}\\s+){2}\\d{1,2}\\s+\\d\\d:\\d\\d" []+        ["From abcd  Mon Sep 01 12:33:02 1997",+         "From abcd  Mon Sep  1 12:33:02 1997",+         "*** Failers",+         "From abcd  Sep 01 12:33:02 1997"]+        [Just ["From abcd  Mon Sep 01 12:33", "Sep "],+         Just ["From abcd  Mon Sep  1 12:33", "Sep  "],+         Nothing,+         Nothing]++    , testRegex "\\w+(?=\t)" []+        ["the quick brown\t fox"]+        [Just ["brown"]]++    , testRegex "foo(?!bar)(.*)" []+        ["foobar is foolish see?"]+        [Just ["foolish see?", "lish see?"]]++    , testRegex "(?:(?!foo)...|^.{0,2})bar(.*)" []+        ["foobar crowbar etc",+         "barrel",+         "2barrel",+         "A barrel"]+        [Just ["rowbar etc", " etc"],+         Just ["barrel",     "rel"],+         Just ["2barrel",    "rel"],+         Just ["A barrel",   "rel"]]++    , testRegex "^(\\D*)(?=\\d)(?!123)" []+        ["abc456",+         "*** Failers",+         "abc123"]+        [Just ["abc", "abc"],+         Nothing,+         Nothing]++    , testRegex "^(a)\\1{2,3}(.)" []+        ["aaab",+         "aaaab",+         "aaaaab",+         "aaaaaab"]+        [Just ["aaab", "a","b"],+         Just ["aaaab","a","b"],+         Just ["aaaaa","a","a"],+         Just ["aaaaa","a","a"]]++    , testRegex "(?!^)abc" []+        ["the abc",+         "*** Failers",+         "abc"]+        [Just ["abc"],+         Nothing,+         Nothing]++    , testRegex "(?=^)abc" []+        ["abc",+         "*** Failers",+         "the abc"]+        [Just ["abc"],+         Nothing,+         Nothing]++    , testRegex "^[ab]{1,3}(ab*|b)" []+        ["aabbbbb"]+        [Just ["aabb", "b"]]++    , testRegex "^[ab]{1,3}?(ab*|b)" []+        ["aabbbbb"]+        [Just ["aabbbbb", "abbbbb"]]++    , testRegex "^[ab]{1,3}?(ab*?|b)" []+        ["aabbbbb"]+        [Just ["aa", "a"]]++    , testRegex "^[ab]{1,3}(ab*?|b)" []+        ["aabbbbb"]+        [Just ["aabb", "b"]]++    , testRegex "^(cow|)\\1(bell)" []+        ["cowcowbell",+         "bell",+         "*** Failers",+         "cowbell"]+        [Just ["cowcowbell", "cow", "bell"],+         Just ["bell", "", "bell"],+         Nothing,+         Nothing]++    , testRegex "^\\s" []+        ["\o40abc",+         "\nabc",+         "\rabc",+         "\tabc",+         "abc"]+        [Just [" "],+         Just ["\x0a"],+         Just ["\x0d"],+         Just ["\x09"],+         Nothing]++    , testRegex "^(a|)\\1*b" []+        ["ab",+         "aaaab",+         "b",+         "acb"]+        [Just ["ab", "a"],+         Just ["aaaab", "a"],+         Just ["b", ""],+         Nothing]++    , testRegex "^(a|)\\1+b" []+        ["aab",+         "aaaab",+         "b",+         "*** Failers",+         "ab"]+        [Just ["aab", "a"],+         Just ["aaaab", "a"],+         Just ["b", ""],+         Nothing,+         Nothing]++    , testRegex "^(a|)\\1?b" []+        ["ab",+         "aab",+         "b",+         "acb"]+        [Just ["ab", "a"],+         Just ["aab", "a"],+         Just ["b", ""],+         Nothing]++    , testRegex "^(a|)\\1{2}b" []+        ["aaab",+         "b",+         "ab",+         "aab",+         "aaaab"]+        [Just ["aaab", "a"],+         Just ["b", ""],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^(a|)\\1{2,3}b" []+        ["aaab",+         "aaaab",+         "b",+         "ab",+         "aab",+         "aaaaab"]+        [Just ["aaab", "a"],+         Just ["aaaab", "a"],+         Just ["b", ""],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "ab{1,3}bc" []+        ["abbbbc",+         "abbbc",+         "abbc",+         "abc",+         "abbbbbc"]+        [Just ["abbbbc"],+         Just ["abbbc"],+         Just ["abbc"],+         Nothing,+         Nothing]++    , testRegex "([^.]*)\\.([^:]*):[T ]+(.*)" []+        ["track1.title:TBlah blah blah"]+        [Just ["track1.title:TBlah blah blah", "track1", "title", "Blah blah blah"]]++    , testRegex "([^.]*)\\.([^:]*):[T ]+(.*)" [caseless]+        ["track1.title:TBlah blah blah"]+        [Just ["track1.title:TBlah blah blah", "track1", "title", "Blah blah blah"]]++    , testRegex "([^.]*)\\.([^:]*):[t ]+(.*)" [caseless]+        ["track1.title:TBlah blah blah"]+        [Just ["track1.title:TBlah blah blah", "track1", "title", "Blah blah blah"]]++    , testRegex "^[W-c]+$" []+        ["WXY_^abc",+         "wxy"]+        [Just ["WXY_^abc"],+         Nothing]++    , testRegex "^[W-c]+$" [caseless]+        ["WXY_^abc",+         "wxy_^ABC"]+        [Just ["WXY_^abc"],+         Just ["wxy_^ABC"]]++    , testRegex "^[\\x3f-\\x5F]+$" [caseless]+        ["WXY_^abc",+         "wxy_^ABC"]+        [Just ["WXY_^abc"],+         Just ["wxy_^ABC"]]++    , testRegex "^abc$" []+        ["abc",+         "qqq\\nabc",+         "abc\\nzzz",+         "qqq\\nabc\\nzzz"]+        [Just ["abc"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "(?:b)|(?::+)" []+        ["b::c",+         "c::b"]+        [Just ["b"],+         Just ["::"]]++    , testRegex "[-az]+" []+        ["az-",+         "*** Failers",+         "b"]+        [Just ["az-"],+         Just ["a"],+         Nothing]++    , testRegex "[az-]+" []+        ["za-",+         "*** Failers",+         "b"]+        [Just ["za-"],+         Just ["a"],+         Nothing]++    , testRegex "[a\\-z]+" []+        ["a-z",+         "*** Failers",+         "b"]+        [Just ["a-z"],+         Just ["a"],+         Nothing]++    , testRegex "[a-z]+" []+        ["abcdxyz"]+        [Just ["abcdxyz"]]++    , testRegex "[\\d-]+" []+        ["12-34",+         "aaa"]+        [Just ["12-34"],+         Nothing]+    , testRegex "[\\d-z]+" []+        ["12-34z",+         "aaa"]+        [Just ["12-34z"],+         Nothing]++    , testRegex "\\x20Z" []+        ["the Zoo",+         "*** Failers",+         "Zulu"]+        [Just [" Z"],+         Nothing,+         Nothing]++    , testRegex "(abc)\\1" [caseless]+        ["abcabc",+         "ABCabc",+         "abcABC"]+        [Just ["abcabc", "abc"],+         Just ["ABCabc", "ABC"],+         Just ["abcABC", "abc"]]++    , testRegex "ab{3cd" []+        ["ab{3cd"]+        [Just ["ab{3cd"]]++    , testRegex "ab{3,cd" []+        ["ab{3,cd"]+        [Just ["ab{3,cd"]]++    , testRegex "ab{3,4a}cd" []+        ["ab{3,4a}cd"]+        [Just ["ab{3,4a}cd"]]++    , testRegex "{4,5a}bc" []+        ["{4,5a}bc"]+        [Just ["{4,5a}bc"]]++    , testRegex "abc$" []+        ["abc",+         "abc\n",+         "*** Failers",+         "abc\ndef"]+        [Just ["abc"],+         Just ["abc"],+         Nothing,+         Nothing]++    , testRegex "(abc)\\123" []+        ["abc\x53"]+        [Just ["abcS", "abc"]]++    , testRegex "(abc)\\223" []+        ["abc\x93"]+        [Just ["abc\x93", "abc"]]++    , testRegex "(abc)\\323" []+        ["abc\xd3"]+        [Just ["abc\xd3", "abc"]]++    , testRegex "(abc)\\100" []+        ["abc\x40",+         "abc\o100"]+        [Just ["abc@", "abc"],+         Just ["abc@", "abc"]]++    , testRegex "(a)(b)(c)(d)(e)(f)(g)(h)(i)(j)(k)(l)\\12\\123" []+        ["abcdefghijkllS"]+        [Just ["abcdefghijkllS",+             "a",+             "b",+             "c",+             "d",+             "e",+             "f",+             "g",+             "h",+             "i",+             "j",+             "k",+             "l"]]++     , testRegex "(a)(b)(c)(d)(e)(f)(g)(h)(i)(j)(k)\\12\\123" []+        ["abcdefghijk\o12S"]+        [Just ["abcdefghijk\x0aS",+             "a",+             "b",+             "c",+             "d",+             "e",+             "f",+             "g",+             "h",+             "i",+             "j",+             "k"]]++    , testRegex "ab\\idef" []+        ["abidef"]+        [Just ["abidef"]]++    , testRegex "a{0}bc" []+        ["bc"]+        [Just ["bc"]]++    , testRegex "(a|(bc)){0,0}?xyz" []+        ["xyz"]+        [Just ["xyz"]]++    , testRegex "(?s)a.b" []+        ["a\nb"]+        [Just ["a\nb"]]++    , testRegex "^([^a])([^\\b])([^c]*)([^d]{3,4})" []+        ["baNOTccccd",+         "baNOTcccd",+         "baNOTccd",+         "bacccd",+         "anything",+         "b\bc   ",+         "baccd"]+        [Just ["baNOTcccc", "b", "a", "NOT", "cccc"],+         Just ["baNOTccc", "b", "a", "NOT", "ccc"],+         Just ["baNOTcc", "b", "a", "NO", "Tcc"],+         Just ["baccc", "b", "a", "", "ccc"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^\\d{8,}\\@.+[^k]$" []+        ["12345678@a.b.c.d",+         "123456789@x.y.z",+         "*** Failers",+         "12345678@x.y.uk",+         "1234567@a.b.c.d       "]+        [Just ["12345678@a.b.c.d"],+         Just ["123456789@x.y.z"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "(a)\\1{8,}" []+        ["aaaaaaaaa",+         "aaaaaaaaaa",+         "*** Failers",+         "aaaaaaa   "]+        [Just ["aaaaaaaaa", "a"],+         Just ["aaaaaaaaaa", "a"],+         Nothing,+         Nothing]++    , testRegex "[^a]" []+        ["aaaabcd",+         "aaAabcd "]+        [Just ["b"],+         Just ["A"]]++    , testRegex "[^a]" [caseless]+        ["aaaabcd",+         "aaAabcd "]+        [Just ["b"],+         Just ["b"]]++    , testRegex "[^az]" []+        ["aaaabcd",+         "aaAabcd "]+        [Just ["b"],+         Just ["A"]]++    , testRegex "[^az]" [caseless]+        ["aaaabcd",+         "aaAabcd "]+        [Just ["b"],+         Just ["b"]]++    , testRegex "P[^*]TAIRE[^*]{1,6}?LL" []+        ["xxxxxxxxxxxPSTAIREISLLxxxxxxxxx"]+        [Just ["PSTAIREISLL"]]++    , testRegex "P[^*]TAIRE[^*]{1,}?LL" []+        ["xxxxxxxxxxxPSTAIREISLLxxxxxxxxx"]+        [Just ["PSTAIREISLL"]]++    , testRegex "(.*?)(\\d+)" []+        ["I have 2 numbers: 53147"]+        [Just ["I have 2", "I have ", "2"]]++    , testRegex "(.*)(\\d+)$" []+        ["I have 2 numbers: 53147"]+        [Just ["I have 2 numbers: 53147", "I have 2 numbers: 5314", "7"]]++    , testRegex "(.*?)(\\d+)$" []+        ["I have 2 numbers: 53147"]+        [Just ["I have 2 numbers: 53147", "I have 2 numbers: ", "53147"]]++    , testRegex "(.*)\\b(\\d+)$" []+        ["I have 2 numbers: 53147"]+        [Just ["I have 2 numbers: 53147", "I have 2 numbers: ", "53147"]]++    , testRegex "(.*\\D)(\\d+)$" []+        ["I have 2 numbers: 53147"]+        [Just ["I have 2 numbers: 53147", "I have 2 numbers: ", "53147"]]++    , testRegex "word (?:[a-zA-Z0-9]+ ){0,10}otherword" []+        ["word cat dog elephant mussel cow horse canary baboon snake shark otherword",+         "word cat dog elephant mussel cow horse canary baboon snake shark"]+        [Just ["word cat dog elephant mussel cow horse canary baboon snake shark otherword"],+         Nothing]++    , testRegex "word (?:[a-zA-Z0-9]+ ){0,300}otherword" []+        ["word cat dog elephant mussel cow horse canary baboon snake shark the quick brown fox and the lazy dog and several other words getting close to thirty by now I hope"]+        [Nothing]+    , testRegex "^(a){0,0}" []+        ["bcd",+         "abc",+         "aab     "]+        [Just [""],+         Just [""],+         Just [""]]++    , testRegex "^(a){0,1}" []+        ["bcd",+         "abc",+         "aab  "]+        [Just [""],+         Just ["a", "a"],+         Just ["a", "a"]]++    , testRegex "^(a){0,2}" []+        ["bcd",+         "abc",+         "aab  "]+        [Just [""],+         Just ["a", "a"],+         Just ["aa", "a"]]++    , testRegex "^(a){0,3}" []+        ["bcd",+         "abc",+         "aab",+         "aaa   "]+        [Just [""],+         Just ["a", "a"],+         Just ["aa", "a"],+         Just ["aaa", "a"]]++    , testRegex "^(a){0,3}" []+        ["bcd",+         "abc",+         "aab",+         "aaa   "]+        [Just [""],+         Just ["a", "a"],+         Just ["aa", "a"],+         Just ["aaa", "a"]]++    , testRegex "^(a){0,}" []+        ["bcd",+         "abc",+         "aab",+         "aaa",+         "aaaaaaaa    "]+        [Just [""],+         Just ["a", "a"],+         Just ["aa", "a"],+         Just ["aaa", "a"],+         Just ["aaaaaaaa", "a"]]++    , testRegex "^(a){1,1}" []+        ["bcd",+         "abc",+         "aab  "]+        [Nothing,+         Just ["a", "a"],+         Just ["a", "a"]]++    , testRegex "^(a){1,2}" []+        ["bcd",+         "abc",+         "aab  "]+        [Nothing,+         Just ["a", "a"],+         Just ["aa", "a"]]++    , testRegex "^(a){1,3}" []+        ["bcd",+         "abc",+         "aab",+         "aaa   "]+        [Nothing,+         Just ["a", "a"],+         Just ["aa", "a"],+         Just ["aaa", "a"]]++    , testRegex ".*\\.gif" []+        ["borfle\nbib.gif\nno"]+        [Just ["bib.gif"]]++    , testRegex ".{0,}\\.gif" []+        ["borfle\nbib.gif\nno"]+        [Just ["bib.gif"]]++    , testRegex ".*\\.gif" [multiline]+        ["borfle\nbib.gif\nno"]+        [Just ["bib.gif"]]++    , testRegex ".*\\.gif" [dotall]+        ["borfle\nbib.gif\nno"]+        [Just ["borfle\nbib.gif"]]++    , testRegex ".*$" [multiline]+        ["borfle\nbib.gif\nno"]+        [Just ["borfle"]]++    , testRegex ".*$" [dotall]+        ["borfle\nbib.gif\nno"]+        [Just ["borfle\nbib.gif\nno"]]++    , testRegex ".*$" [multiline]+        ["borfle\nbib.gif\nno\\n"]+        [Just ["borfle"]]++    , testRegex "(?ms)^B" []+        ["abc\nB"]+        [Just ["B"]]++    , testRegex "(?s)B$" []+        ["B\n"]+        [Just ["B"]]++    , testRegex "^[abcdefghijklmnopqrstuvwxy0123456789]" []+        ["n",+         "z "]+        [Just ["n"],+         Nothing]++    , testRegex "abcde{0,0}" []+        ["abcd",+         "abce  "]+        [Just ["abcd"],+         Nothing]++    , testRegex "^(b+?|a){1,2}?c" []+        ["bac",+         "bbac",+         "bbbac",+         "bbbbac",+         "bbbbbac "]+        [Just ["bac","a"],+         Just ["bbac","a"],+         Just ["bbbac","a"],+         Just ["bbbbac","a"],+         Just ["bbbbbac","a"]]++    , testRegex "(AB)*?\\1" []+        ["ABABAB"]+        [Just ["ABAB", "AB"]]++    , testRegex "(.*(.)?)*" []+        ["abcd"]+        [Just ["abcd", ""]]++{-+    , testRegex "(?:a|)*\\d" []+        ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa",+         "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]+        [Nothing,+         Just ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]]+-}++    , testRegex "^(?:a(?:(?:))+)+" []+        ["aaaa"]+        [Just ["aaaa"]]++    , testRegex "^(a()+)+" []+        ["aaaa"]+        [Just ["aaaa", "a", ""]]++    , testRegex "^(?:a(?:(?:))*)*" []+        ["aaaa"]+        [Just ["aaaa"]]++    , testRegex "^(a()*)*" []+        ["aaaa"]+        [Just ["aaaa", "a", ""]]++    , testRegex "^(a){1,}" []+        ["bcd",+         "abc",+         "aab",+         "aaa",+         "aaaaaaaa    "]+        [Nothing,+         Just ["a", "a"],+         Just ["aa", "a"],+         Just ["aaa", "a"],+         Just ["aaaaaaaa", "a"]]++    , testRegex "(?s)(.*X|^B)" []+        ["abcde\n1234Xyz",+         "BarFoo ",+         "*** Failers ",+         "abcde\nBar  "]+        [Just ["abcde\n1234X", "abcde\n1234X"],+         Just ["B", "B"],+         Nothing,+         Nothing]++    , testRegex "(?s:.*X|^B)" []+        ["abcde\n1234Xyz",+         "BarFoo ",+         "*** Failers ",+         "abcde\nBar  "]+        [Just ["abcde\n1234X"],+         Just ["B"],+         Nothing,+         Nothing]++    , testRegex "\\w{3}(?<!bar)foo" []+        ["catfood",+         "*** Failers",+         "foo",+         "barfoo",+         "towbarfoo"]+        [Just ["catfoo"],+         Nothing,+         Nothing,+         Nothing,+         Nothing]++    , testRegex "(?>(\\.\\d\\d[1-9]?))\\d+" []+        ["1.230003938",+         "1.875000282",+         "1.235 "]+        [Just [".230003938", ".23"],+         Just [".875000282", ".875"],+         Nothing]++    , testRegex "^((?>\\w+)|(?>\\s+))*$" []+        ["now is the time for all good men to come to the aid of the party",+         "this is not a line with only words and spaces!"]+        [Just ["now is the time for all good men to come to the aid of the party", "party"],+         Nothing]++    , testRegex "((?>\\d+))(\\w)" []+        ["12345a",+         "12345+ "]+        [Just ["12345a", "12345", "a"],+         Nothing]++    , testRegex "(?>a+)b" []+        ["aaab"]+        [Just ["aaab"]]++    , testRegex "((?>a+)b)" []+        ["aaab"]+        [Just ["aaab", "aaab"]]++    , testRegex "(?>(a+))b" []+        ["aaab"]+        [Just ["aaab", "aaa"]]+    , testRegex "(?>b)+" []+        ["aaabbbccc"]+        [Just ["bbb"]]++    , testRegex "(?>a+|b+|c+)*c" []+        ["aaabbbbccccd"]+        [Just ["aaabbbbc"]]++    , testRegex "(?:(a)|b)(?(1)A|B)" []+        ["aA",+         "bB",+         "aB",+         "bA    "]+        [Just ["aA", "a"],+         Just ["bB"],+         Nothing,+         Nothing]++    , testRegex "^(a)?(?(1)a|b)+$" []+        ["aa",+         "b",+--       "bb  ", -- ?+         "ab   "]+        [Just ["aa", "a"],+         Just ["b"],+--       Just ["bb"],+         Nothing]++    , testRegex "^(?(?=abc)\\w{3}:|\\d\\d)$" []+        ["abc:",+         "12",+         "123",+         "xyz    "]+        [Just ["abc:"],+         Just ["12"],+         Nothing,+         Nothing]++    , testRegex "(?(?<!foo)cat|bar)" []+        ["foobar",+         "cat",+         "fcat",+         "focat   ",+         "foocat  "]+        [Just ["bar"],+         Just ["cat"],+         Just ["cat"],+         Just ["cat"],+         Nothing]++    , testRegex "^(?(2)a|(1)(2))+$" []+        ["12",+         "12a",+         "12aa",+         "*** Failers",+         "1234    "]+        [Just ["12", "1", "2"],+         Just ["12a", "1", "2"],+         Just ["12aa", "1", "2"],+         Nothing,+         Nothing]++    , testRegex "(?<=foo\\n)^bar" [multiline]+        ["foo\nbar",+         "*** Failers",+         "bar",+         "baz\nbar   "]+        [Just ["bar"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "(?<=(?<!foo)bar)baz" []+        ["barbaz",+         "barbarbaz ",+         "koobarbaz ",+         "*** Failers",+         "baz",+         "foobarbaz "]+        [Just ["baz"],+         Just ["baz"],+         Just ["baz"],+         Nothing,+         Nothing,+         Nothing]++    , testRegex "^(a\\1?){4}$" []+        ["a",+         "aa",+         "aaa",+         "aaaa",+         "aaaaa",+         "aaaaaaa",+         "aaaaaaaa",+         "aaaaaaaaa",+         "aaaaaaaaaa",+         "aaaaaaaaaaa",+         "aaaaaaaaaaaa",+         "aaaaaaaaaaaaa",+         "aaaaaaaaaaaaaa",+         "aaaaaaaaaaaaaaa",+         "aaaaaaaaaaaaaaaa               "]+        [Nothing,+         Nothing,+         Nothing,+         Just ["aaaa", "a"],+         Just ["aaaaa", "a"],+         Just ["aaaaaaa", "a"],+         Nothing,+         Nothing,+         Just ["aaaaaaaaaa", "aaaa"],+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing]++    , testRegex "abc" []+        ["abc",+         "xabcy",+         "ababc",+         "*** Failers",+         "xbc",+         "axc",+         "abx"]+        [Just ["abc"],+         Just ["abc"],+         Just ["abc"],+         Nothing,+         Nothing,+         Nothing,+         Nothing]++    , testRegex "ab*c" []+        ["abc"]+        [Just ["abc"]]+    , testRegex "ab*bc" []+        ["abc",+         "abbc",+         "abbbbc"]+        [Just ["abc"],+         Just ["abbc"],+         Just ["abbbbc"]]++    , testRegex ".{1}" []+        ["abbbbc"]+        [Just ["a"]]++    , testRegex ".{3,4}" []+        ["abbbbc"]+        [Just ["abbb"]]++    , testRegex "ab{0,}bc" []+        ["abbbbc"]+        [Just ["abbbbc"]]++    , testRegex "ab+bc" []+        ["abbc",+         "abc",+         "abq"]+        [Just ["abbc"],+         Nothing,+         Nothing]++    , testRegex "ab{1,}bc" []+        []+        []++    , testRegex "ab+bc" []+        ["abbbbc"]+        [Just ["abbbbc"]]++    , testRegex "ab{1,}bc" []+        ["abbbbc"]+        [Just ["abbbbc"]]++    , testRegex "ab{1,3}bc" []+        ["abbbbc"]+        [Just ["abbbbc"]]++    , testRegex "ab{3,4}bc" []+        ["abbbbc"]+        [Just ["abbbbc"]]++    , testRegex "ab{4,5}bc" []+        ["*** Failers",+         "abq",+         "abbbbc"]+        [Nothing,+         Nothing,+         Nothing]++    , testRegex "ab?bc" []+        ["abbc",+         "abc"]+        [Just ["abbc"],+         Just ["abc"]]++    , testRegex "ab{0,1}bc" []+        ["abc"]+        [Just ["abc"]]++    , testRegex "ab?bc" []+        []+        []++    , testRegex "ab?c" []+        ["abc"]+        [Just ["abc"]]++    , testRegex "ab{0,1}c" []+        ["abc"]+        [Just ["abc"]]++    , testRegex "^abc$" []+        ["abc",+         "abbbbc",+         "abcc"]+        [Just ["abc"],+         Nothing,+         Nothing]++    , testRegex "^abc" []+        ["abcc"]+        [Just ["abc"]]++    , testRegex "^abc$" []+        []+        []++    , testRegex "abc$" []+        ["aabc",+         "*** Failers",+         "aabc",+         "aabcd"]+        [Just ["abc"],+         Nothing,+         Just ["abc"],+         Nothing]++    , testRegex "^" []+        ["abc"]+        [Just [""]]+    ,++    testRegex "$" []+        ["abc"]+        [Just [""]]+    ,++    testRegex "a.c" []+        ["abc",+         "axc"]+        [Just ["abc"],+         Just ["axc"]]+    ,++    testRegex "a.*c" []+        ["axyzc"]+        [Just ["axyzc"]]+    ,++    testRegex "a[bc]d" []+        ["abd",+         "*** Failers",+         "axyzd",+         "abc"]+        [Just ["abd"],+         Nothing,+         Nothing,+         Nothing]+    ,++    testRegex "a[b-d]e" []+        ["ace"]+        [Just ["ace"]]+    ,++    testRegex "a[b-d]" []+        ["aac"]+        [Just ["ac"]]+    ,++    testRegex "a[-b]" []+        ["a-"]+        [Just ["a-"]]+    ,++    testRegex "a[b-]" []+        ["a-"]+        [Just ["a-"]]+    ,+++    testRegex "a]" []+        ["a]"]+        [Just ["a]"]]+    ,+++    testRegex "a[]]b" []+        ["a]b"]+        [Just ["a]b"]]+    ,++    testRegex "a[^bc]d" []+        ["aed",+         "*** Failers",+         "abd",+         "abd"]+        [Just ["aed"],+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "a[^-b]c" []+        ["adc"]+        [Just ["adc"]]+    ,++    testRegex "a[^]b]c" []+        ["adc",+         "*** Failers",+         "a-c",+         "a]c"]+        [Just ["adc"],+         Nothing,+         Just ["a-c"],+         Nothing]+    ,+++    testRegex "\\ba\\b" []+        ["a-",+         "-a",+         "-a-"]+        [Just ["a"],+         Just ["a"],+         Just ["a"]]+    ,+++    testRegex "\\by\\b" []+        ["*** Failers",+         "xy",+         "yz",+         "xyz"]+        [Nothing,+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "\\Ba\\B" []+        ["*** Failers",+         "a-",+         "-a",+         "-a-"]+        [Just ["a"],+         Nothing,+         Nothing,+         Nothing]+    ,++    testRegex "\\By\\b" []+        ["xy"]+        [Just ["y"]]+    ,+++    testRegex "\\by\\B" []+        ["yz"]+        [Just ["y"]]+    ,+++    testRegex "\\By\\B" []+        ["xyz"]+        [Just ["y"]]+    ,++    testRegex "\\w" []+        ["a"]+        [Just ["a"]]+    ,+++    testRegex "\\W" []+        ["-",+         "*** Failers",+         "-",+         "a"]+        [Just ["-"],+         Just ["*"],+         Just ["-"],+         Nothing]+    ,+++    testRegex "a\\sb" []+        ["a b"]+        [Just ["a b"]]+    ,+++    testRegex "a\\Sb" []+        ["a-b",+         "*** Failers",+         "a-b",+         "a b"]+        [Just ["a-b"],+         Nothing,+         Just ["a-b"],+         Nothing]+    ,+++    testRegex "\\d" []+        ["1"]+        [Just ["1"]]+    ,+++    testRegex "\\D" []+        ["-",+         "*** Failers",+         "-",+         "1"]+        [Just ["-"],+         Just ["*"],+         Just ["-"],+         Nothing]+    ,+++    testRegex "[\\w]" []+        ["a"]+        [Just ["a"]]+    ,+++    testRegex "[\\W]" []+        ["-",+         "*** Failers",+         "-",+         "a"]+        [Just ["-"],+         Just ["*"],+         Just ["-"],+         Nothing]+    ,+++    testRegex "a[\\s]b" []+        ["a b"]+        [Just ["a b"]]+    ,+++    testRegex "a[\\S]b" []+        ["a-b",+         "*** Failers",+         "a-b",+         "a b"]+        [Just ["a-b"],+         Nothing,+         Just ["a-b"],+         Nothing]+    ,++    testRegex "[\\d]" []+        ["1"]+        [Just ["1"]]+    ,+++    testRegex "[\\D]" []+        ["-",+         "*** Failers",+         "-",+         "1"]+        [Just ["-"],+         Just ["*"],+         Just ["-"],+         Nothing]+    ,+++    testRegex "ab|cd" []+        ["abc",+         "abcd"]+        [Just ["ab"],+         Just ["ab"]]+    ,++++    testRegex "$b" []+        []+        []+    ,+++    testRegex "a\\(b" []+        ["a(b"]+        [Just ["a(b"]]+    ,+++    testRegex "a\\(*b" []+        ["ab",+         "a((b"]+        [Just ["ab"],+         Just ["a((b"]]+    ,+++    testRegex "((a))" []+        ["abc"]+        [Just ["a", "a", "a"]]+    ,+++    testRegex "(a)b(c)" []+        ["abc"]+        [Just ["abc", "a", "c"]]++    ,+    testRegex "a+b+c" []+        ["aabbabc"]+        [Just ["abc"]]+    ,+++    testRegex "a{1,}b{1,}c" []+        ["aabbabc"]+        [Just ["abc"]]+    ,+++    testRegex "a.+?c" []+        ["abcabc"]+        [Just ["abc"]]+    ,+++    testRegex "(a+|b)*" []+        ["ab"]+        [Just ["ab", "b"]]+    ,+++    testRegex "(a+|b){0,}" []+        ["ab"]+        [Just ["ab", "b"]]+    ,+++    testRegex "(a+|b)+" []+        ["ab"]+        [Just ["ab","b"]]+    ,+++    testRegex "(a+|b){1,}" []+        ["ab"]+        [Just ["ab", "b"]]+    ,+++    testRegex "(a+|b)?" []+        ["ab"]+        [Just ["a", "a"]]+    ,+++    testRegex "(a+|b){0,1}" []+        ["ab"]+        [Just ["a", "a"]]+    ,+++    testRegex "[^ab]*" []+        ["cde"]+        [Just ["cde"]]++    ,++    testRegex "abc" []+        ["b"]+        [Nothing]+    ,+++    testRegex "a*" []+        [""]+        [Just [""]]+    ,+++    testRegex "([abc])*d" []+        ["abbbcd"]+        [Just ["abbbcd", "c"]]+    ,+++    testRegex "([abc])*bcd" []+        ["abcd"]+        [Just ["abcd", "a"]]+    ,+++    testRegex "a|b|c|d|e" []+        ["e"]+        [Just ["e"]]+    ,+++    testRegex "(a|b|c|d|e)f" []+        ["ef"]+        [Just ["ef", "e"]]+    ,+++    testRegex "abcd*efg" []+        ["abcdefg"]+        [Just ["abcdefg"]]+    ,+++    testRegex "ab*" []+        ["xabyabbbz",+         "xayabbbz"]+        [Just ["ab"],+         Just ["a"]]+    ,+++    testRegex "(ab|cd)e" []+        ["abcde"]+        [Just ["cde", "cd"]]+    ,+++    testRegex "[abhgefdc]ij" []+        ["hij"]+        [Just ["hij"]]++    , testRegex "^(ab|cd)e" []+        []+        []+    ,++    testRegex "(abc|)ef" []+        ["abcdef"]+        [Just ["ef", ""]]+    ,+++    testRegex "(a|b)c*d" []+        ["abcd"]+        [Just ["bcd", "b"]]+    ,+++    testRegex "(ab|ab*)bc" []+        ["abc"]+        [Just ["abc", "a"]]+    ,+++    testRegex "a([bc]*)c*" []+        ["abc"]+        [Just ["abc", "bc"]]+    ,+++    testRegex "a([bc]*)(c*d)" []+        ["abcd"]+        [Just ["abcd", "bc", "d"]]+    ,+++    testRegex "a([bc]+)(c*d)" []+        ["abcd"]+        [Just ["abcd", "bc", "d"]]+    ,+++    testRegex "a([bc]*)(c+d)" []+        ["abcd"]+        [Just ["abcd", "b", "cd"]]+    ,+++    testRegex "a[bcd]*dcdcde" []+        ["adcdcde"]+        [Just ["adcdcde"]]+    ,+++    testRegex "a[bcd]+dcdcde" []+        ["*** Failers",+         "abcde",+         "adcdcde"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(ab|a)b*c" []+        ["abc"]+        [Just ["abc", "ab"]]++    ,++    testRegex "((a)(b)c)(d)" []+        ["abcd"]+        [Just ["abcd", "abc", "a", "b", "d"]]+    ,+++    testRegex "[a-zA-Z_][a-zA-Z0-9_]*" []+        ["alpha"]+        [Just ["alpha"]]+    ,+++    testRegex "^a(bc+|b[eh])g|.h$" []+        ["abh"]+        [Just ["bh"]]+    ,+++    testRegex "(bc+d$|ef*g.|h?i(j|k))" []+        ["effgz",+         "ij",+         "reffgz",+         "*** Failers",+         "effg",+         "bcdd"]+        [Just ["effgz", "effgz"],+         Just ["ij", "ij", "j"],+         Just ["effgz", "effgz"],+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "((((((((((a))))))))))" []+        ["a"]+        [Just ["a", "a", "a", "a", "a", "a", "a", "a", "a", "a", "a"]]+    ,+++    testRegex "((((((((((a))))))))))\\10" []+        ["aa"]+        [Just ["aa", "a", "a", "a", "a", "a", "a", "a", "a", "a", "a"]]+    ,+++    testRegex "(((((((((a)))))))))" []+        ["a"]+        [Just ["a", "a", "a", "a", "a", "a", "a", "a", "a", "a"]]+    ,+++    testRegex "multiple words of text" []+        ["*** Failers",+         "aa",+         "uh-uh"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "multiple words" []+        ["multiple words, yeah"]+        [Just ["multiple words"]]+    ,+++    testRegex "(.*)c(.*)" []+        ["abcde"]+        [Just ["abcde", "ab", "de"]]+    ,++    testRegex "\\((.*), (.*)\\)" []+        ["(a, b)"]+        [Just ["(a, b)", "a", "b"]]+    ,+++    testRegex "[k]" []+        []+        []+    ,+++    testRegex "abcd" []+        ["abcd"]+        [Just ["abcd"]]+    ,+++    testRegex "a(bc)d" []+        ["abcd"]+        [Just ["abcd", "bc"]]+    ,+++    testRegex "a[-]?c" []+        ["ac"]+        [Just ["ac"]]+    ,+++    testRegex "(abc)\\1" []+        ["abcabc"]+        [Just ["abcabc", "abc"]]+    ,+++    testRegex "([a-c]*)\\1" []+        ["abcabc"]+        [Just ["abcabc", "abc"]]+    ,+++    testRegex "(a)|\\1" []+        ["a",+         "*** Failers",+         "ab",+         "x"]+        [Just ["a", "a"],+         Just ["a", "a"],+         Just ["a", "a"],+         Nothing]+    ,+++    testRegex "(([a-c])b*?\\2)*" []+        ["ababbbcbc"]+        [Just ["ababb", "bb", "b"]]+    ,+++    testRegex "(([a-c])b*?\\2){3}" []+        ["ababbbcbc"]+        [Just ["ababbbcbc", "cbc", "c"]]+    ,+    testRegex "((\\3|b)\\2(a)x)+" []+        ["aaaxabaxbaaxbbax"]+        [Just ["bbax", "bbax", "b", "a"]]+    ,+++    testRegex "((\\3|b)\\2(a)){2,}" []+        ["bbaababbabaaaaabbaaaabba"]+        [Just ["bbaaaabba", "bba", "b", "a"]]+    ,+++    testRegex "abc" [caseless]+        ["ABC",+         "XABCY",+         "ABABC",+         "*** Failers",+         "aaxabxbaxbbx",+         "XBC",+         "AXC",+         "ABX"]+        [Just ["ABC"],+         Just ["ABC"],+         Just ["ABC"],+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "ab*c" [caseless]+        ["ABC"]+        [Just ["ABC"]]+    ,+++    testRegex "ab*bc" [caseless]+        ["ABC",+         "ABBC"]+        [Just ["ABC"],+         Just ["ABBC"]]+    ,+++    testRegex "ab*?bc" [caseless]+        ["ABBBBC"]+        [Just ["ABBBBC"]]+    ,+++    testRegex "ab{0,}?bc" [caseless]+        ["ABBBBC"]+        [Just ["ABBBBC"]]+    ,+++    testRegex "ab+?bc" [caseless]+        ["ABBC"]+        [Just ["ABBC"]]+    ,+++    testRegex "ab+bc" [caseless]+        ["*** Failers",+         "ABC",+         "ABQ"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "ab{1,}bc" [caseless]+        []+        []+    ,++    testRegex "ab+bc" [caseless]+        ["ABBBBC"]+        [Just ["ABBBBC"]]+    ,+++    testRegex "ab{1,}?bc" [caseless]+        ["ABBBBC"]+        [Just ["ABBBBC"]]+    ,+++    testRegex "ab{1,3}?bc" [caseless]+        ["ABBBBC"]+        [Just ["ABBBBC"]]+    ,+++    testRegex "ab{3,4}?bc" [caseless]+        ["ABBBBC"]+        [Just ["ABBBBC"]]+    ,+++    testRegex "ab{4,5}?bc" [caseless]+        ["*** Failers",+         "ABQ",+         "ABBBBC"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "ab??bc" [caseless]+        ["ABBC",+         "ABC"]+        [Just ["ABBC"],+         Just ["ABC"]]+    ,+++    testRegex "ab{0,1}?bc" [caseless]+        ["ABC"]+        [Just ["ABC"]]+    ,+++    testRegex "ab??bc" [caseless]+        []+        []+    ,+++    testRegex "ab??c" [caseless]+        ["ABC"]+        [Just ["ABC"]]+    ,++    testRegex "ab{0,1}?c" [caseless]+        ["ABC"]+        [Just ["ABC"]]+    ,+    testRegex "^abc$" [caseless]+        ["ABC",+         "*** Failers",+         "ABBBBC",+         "ABCC"]+        [Just ["ABC"],+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "^abc" [caseless]+        ["ABCC"]+        [Just ["ABC"]]+    ,+++    testRegex "^abc$" [caseless]+        []+        []+    ,+++    testRegex "abc$" [caseless]+        ["AABC"]+        [Just ["ABC"]]+    ,+++    testRegex "^" [caseless]+        ["ABC"]+        [Just [""]]+    ,+++    testRegex "$" [caseless]+        ["ABC"]+        [Just [""]]+    ,+++    testRegex "a.c" [caseless]+        ["ABC",+         "AXC"]+        [Just ["ABC"],+         Just ["AXC"]]+    ,+++    testRegex "a.*?c" [caseless]+        ["AXYZC"]+        [Just ["AXYZC"]]+    ,+++    testRegex "a.*c" [caseless]+        ["*** Failers",+         "AABC",+         "AXYZD"]+        [Nothing,+         Just ["AABC"],+         Nothing]+    ,+++    testRegex "a[bc]d" [caseless]+        ["ABD"]+        [Just ["ABD"]]+    ,++    testRegex "a[b-d]e" [caseless]+        ["ACE",+         "ABC",+         "ABD"]+        [Just ["ACE"],+         Nothing,+         Nothing]+    ,+++    testRegex "a[b-d]" [caseless]+        ["AAC"]+        [Just ["AC"]]+    ,+++    testRegex "a[-b]" [caseless]+        ["A-"]+        [Just ["A-"]]+    ,+++    testRegex "a[b-]" [caseless]+        ["A-"]+        [Just ["A-"]]+    ,+++    testRegex "a]" [caseless]+        ["A]"]+        [Just ["A]"]]+    ,+++    testRegex "a[]]b" [caseless]+        ["A]B"]+        [Just ["A]B"]]+    ,+++    testRegex "a[^bc]d" [caseless]+        ["AED"]+        [Just ["AED"]]+    ,+++    testRegex "a[^-b]c" [caseless]+        ["ADC",+         "ABD",+         "A-C"]+        [Just ["ADC"],+         Nothing,+         Nothing]+    ,+++    testRegex "a[^]b]c" [caseless]+        ["ADC"]+        [Just ["ADC"]]+    ,+++    testRegex "ab|cd" [caseless]+        ["ABC",+         "ABCD"]+        [Just ["AB"],+         Just ["AB"]]++    ,+    testRegex "()ef" [caseless]+        ["DEF"]+        [Just ["EF", ""]]+    ,+++    testRegex "$b" [caseless]+        ["A]C",+         "B"]+        [Nothing,+         Nothing]+    ,+++    testRegex "a\\(b" [caseless]+        ["A(B"]+        [Just ["A(B"]]+    ,+++    testRegex "a\\(*b" [caseless]+        ["AB",+         "A((B"]+        [Just ["AB"],+         Just ["A((B"]]+    ,++++    testRegex "((a))" [caseless]+        ["ABC"]+        [Just ["A", "A", "A"]]+    ,+++    testRegex "(a)b(c)" [caseless]+        ["ABC"]+        [Just ["ABC", "A", "C"]]+    ,+++    testRegex "a+b+c" [caseless]+        ["AABBABC"]+        [Just ["ABC"]]+    ,+++    testRegex "a{1,}b{1,}c" [caseless]+        ["AABBABC"]+        [Just ["ABC"]]+    ,+++    testRegex "a.+?c" [caseless]+        ["ABCABC"]+        [Just ["ABC"]]+    ,++    testRegex "a.*?c" [caseless]+        ["ABCABC"]+        [Just ["ABC"]]+    ,+++    testRegex "a.{0,5}?c" [caseless]+        ["ABCABC"]+        [Just ["ABC"]]+    ,+++    testRegex "(a+|b)*" [caseless]+        ["AB"]+        [Just ["AB", "B"]]+    ,+++    testRegex "(a+|b){0,}" [caseless]+        ["AB"]+        [Just ["AB", "B"]]+    ,+++    testRegex "(a+|b)+" [caseless]+        ["AB"]+        [Just ["AB","B"]]+    ,+++    testRegex "(a+|b){1,}" [caseless]+        ["AB"]+        [Just ["AB", "B"]]+    ,+++    testRegex "(a+|b)?" [caseless]+        ["AB"]+        [Just ["A", "A"]]+    ,+++    testRegex "(a+|b){0,1}" [caseless]+        ["AB"]+        [Just ["A", "A"]]+    ,+++    testRegex "(a+|b){0,1}?" [caseless]+        ["AB"]+        [Just [""]]+    ,+++    testRegex "[^ab]*" [caseless]+        ["CDE"]+        [Just ["CDE"]]+    ,++    testRegex "abc" [caseless]+        []+        []+    ,+++    testRegex "a*" [caseless]+        [""]+        [Just [""]]+    ,+++    testRegex "([abc])*d" [caseless]+        ["ABBBCD"]+        [Just ["ABBBCD", "C"]]+    ,+++    testRegex "([abc])*bcd" [caseless]+        ["ABCD"]+        [Just ["ABCD","A"]]+    ,+++    testRegex "a|b|c|d|e" [caseless]+        ["E"]+        [Just ["E"]]+    ,+++    testRegex "(a|b|c|d|e)f" [caseless]+        ["EF"]+        [Just ["EF", "E"]]+    ,+++    testRegex "abcd*efg" [caseless]+        ["ABCDEFG"]+        [Just ["ABCDEFG"]]+    ,+++    testRegex "ab*" [caseless]+        ["XABYABBBZ",+         "XAYABBBZ"]+        [Just ["AB"],+         Just ["A"]]+    ,+++    testRegex "(ab|cd)e" [caseless]+        ["ABCDE"]+        [Just ["CDE", "CD"]]+    ,+++    testRegex "[abhgefdc]ij" [caseless]+        ["HIJ"]+        [Just ["HIJ"]]+    ,+++    testRegex "^(ab|cd)e" [caseless]+        ["ABCDE"]+        [Nothing]+    ,+++    testRegex "(abc|)ef" [caseless]+        ["ABCDEF"]+        [Just ["EF", ""]]+    ,+++    testRegex "(a|b)c*d" [caseless]+        ["ABCD"]+        [Just ["BCD", "B"]]+    ,+++    testRegex "(ab|ab*)bc" [caseless]+        ["ABC"]+        [Just ["ABC", "A"]]+    ,+++    testRegex "a([bc]*)c*" [caseless]+        ["ABC"]+        [Just ["ABC", "BC"]]+    ,+++    testRegex "a([bc]*)(c*d)" [caseless]+        ["ABCD"]+        [Just ["ABCD","BC","D"]]+    ,+++    testRegex "a([bc]+)(c*d)" [caseless]+        ["ABCD"]+        [Just ["ABCD","BC","D"]]+    ,+++    testRegex "a([bc]*)(c+d)" [caseless]+        ["ABCD"]+        [Just ["ABCD","B","CD"]]+    ,+++    testRegex "a[bcd]*dcdcde" [caseless]+        ["ADCDCDE"]+        [Just ["ADCDCDE"]]+    ,++    testRegex "a[bcd]+dcdcde" [caseless]+        []+        []+    ,++    testRegex "(ab|a)b*c" [caseless]+        ["ABC"]+        [Just ["ABC", "AB"]]+    ,+++    testRegex "((a)(b)c)(d)" [caseless]+        ["ABCD"]+        [Just ["ABCD", "ABC", "A", "B", "D"]]+    ,+++    testRegex "[a-zA-Z_][a-zA-Z0-9_]*" [caseless]+        ["ALPHA"]+        [Just ["ALPHA"]]+    ,+++    testRegex "^a(bc+|b[eh])g|.h$" [caseless]+        ["ABH"]+        [Just ["BH"]]+    ,+++    testRegex "(bc+d$|ef*g.|h?i(j|k))" [caseless]+        ["EFFGZ",+         "IJ",+         "REFFGZ",+         "*** Failers",+         "ADCDCDE",+         "EFFG",+         "BCDD"]+        [Just ["EFFGZ", "EFFGZ"],+         Just ["IJ", "IJ", "J"],+         Just ["EFFGZ", "EFFGZ"],+         Nothing,+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "((((((((((a))))))))))" [caseless]+        ["A"]+        [Just ["A", "A", "A", "A", "A", "A", "A", "A", "A", "A", "A"]]+    ,+++    testRegex "((((((((((a))))))))))\\10" [caseless]+        ["AA"]+        [Just ["AA", "A", "A", "A", "A", "A", "A", "A", "A", "A", "A"]]+    ,+++    testRegex "(((((((((a)))))))))" [caseless]+        ["A"]+        [Just ["A", "A", "A", "A", "A", "A", "A", "A", "A", "A"]]+    ,+++    testRegex "(?:(?:(?:(?:(?:(?:(?:(?:(?:(a))))))))))" [caseless]+        ["A"]+        [Just ["A", "A"]]+    ,+++    testRegex "(?:(?:(?:(?:(?:(?:(?:(?:(?:(a|b|c))))))))))" [caseless]+        ["C"]+        [Just ["C", "C"]]+    ,+++    testRegex "multiple words of text" [caseless]+        ["AA",+         "UH-UH"]+        [Nothing,+         Nothing]+    ,+++    testRegex "multiple words" [caseless]+        ["MULTIPLE WORDS, YEAH"]+        [Just ["MULTIPLE WORDS"]]+    ,+++    testRegex "(.*)c(.*)" [caseless]+        ["ABCDE"]+        [Just ["ABCDE", "AB", "DE"]]+    ,+++    testRegex "\\((.*), (.*)\\)" [caseless]+        ["(A, B)"]+        [Just ["(A, B)", "A", "B"]]+    ,+++    testRegex "[k]" [caseless]+        []+        []+    ,+++    testRegex "abcd" [caseless]+        ["ABCD"]+        [Just ["ABCD"]]+    ,+++    testRegex "a(bc)d" [caseless]+        ["ABCD"]+        [Just ["ABCD", "BC"]]+    ,+++    testRegex "a[-]?c" [caseless]+        ["AC"]+        [Just ["AC"]]+    ,+++    testRegex "(abc)\\1" [caseless]+        ["ABCABC"]+        [Just ["ABCABC", "ABC"]]+    ,+++    testRegex "([a-c]*)\\1" [caseless]+        ["ABCABC"]+        [Just ["ABCABC", "ABC"]]+    ,++    testRegex "a(?!b)." []+        ["abad"]+        [Just ["ad"]]+    ,+++    testRegex "a(?=d)." []+        ["abad"]+        [Just ["ad"]]+    ,+++    testRegex "a(?=c|d)." []+        ["abad"]+        [Just ["ad"]]+    ,+++    testRegex "a(?:b|c|d)(.)" []+        ["ace"]+        [Just ["ace", "e"]]+    ,+++    testRegex "a(?:b|c|d)*(.)" []+        ["ace"]+        [Just ["ace", "e"]]+    ,+++    testRegex "a(?:b|c|d)+?(.)" []+        ["ace",+         "acdbcdbe"]+        [Just ["ace", "e"],+         Just ["acd", "d"]]+    ,+++    testRegex "a(?:b|c|d)+(.)" []+        ["acdbcdbe"]+        [Just ["acdbcdbe", "e"]]+    ,+++    testRegex "a(?:b|c|d){2}(.)" []+        ["acdbcdbe"]+        [Just ["acdb", "b"]]+    ,+++    testRegex "a(?:b|c|d){4,5}(.)" []+        ["acdbcdbe"]+        [Just ["acdbcdb", "b"]]+    ,+++    testRegex "a(?:b|c|d){4,5}?(.)" []+        ["acdbcdbe"]+        [Just ["acdbcd", "d"]]+    ,+++    testRegex "((foo)|(bar))*" []+        ["foobar"]+        [Just ["foobar", "bar", "foo", "bar"]]+    ,+++    testRegex "a(?:b|c|d){6,7}(.)" []+        ["acdbcdbe"]+        [Just ["acdbcdbe", "e"]]+    ,+++    testRegex "a(?:b|c|d){6,7}?(.)" []+        ["acdbcdbe"]+        [Just ["acdbcdbe", "e"]]+    ,+++    testRegex "a(?:b|c|d){5,6}(.)" []+        ["acdbcdbe"]+        [Just ["acdbcdbe", "e"]]+    ,+++    testRegex "a(?:b|c|d){5,6}?(.)" []+        ["acdbcdbe"]+        [Just ["acdbcdb", "b"]]+    ,+++    testRegex "a(?:b|c|d){5,7}(.)" []+        ["acdbcdbe"]+        [Just ["acdbcdbe", "e"]]+    ,+++    testRegex "a(?:b|c|d){5,7}?(.)" []+        ["acdbcdbe"]+        [Just ["acdbcdb", "b"]]+    ,+++    testRegex "a(?:b|(c|e){1,2}?|d)+?(.)" []+        ["ace"]+        [Just ["ace", "c", "e"]]+    ,+++    testRegex "^(.+)?B" []+        ["AB"]+        [Just ["AB", "A"]]+    ,+++    testRegex "^([^a-z])|(\\^)$" []+        ["."]+        [Just [".", "."]]+    ,++    testRegex "^[<>]&" []+        ["<&OUT"]+        [Just ["<&"]]+    ,+++    testRegex "^(a\\1?){4}$" []+        ["aaaaaaaaaa",+         "*** Failers",+         "AB",+         "aaaaaaaaa",+         "aaaaaaaaaaa"]+        [Just ["aaaaaaaaaa", "aaaa"],+         Nothing,+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "^(a(?(1)\\1)){4}$" []+        ["aaaaaaaaaa",+         "*** Failers",+         "aaaaaaaaa",+         "aaaaaaaaaaa"]+        [Just ["aaaaaaaaaa", "aaaa"],+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(?:(f)(o)(o)|(b)(a)(r))*" []+        ["foobar"]+        [Just ["foobar", "f", "o", "o", "b", "a", "r"]]+    ,+++    testRegex "(?<=a)b" []+        ["ab",+         "*** Failers",+         "cb",+         "b"]+        [Just ["b"],+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(?<!c)b" []+        ["ab",+         "b",+         "b"]+        [Just ["b"],+         Just ["b"],+         Just ["b"]]+    ,+++    testRegex "(?:..)*a" []+        ["aba"]+        [Just ["aba"]]+    ,+++    testRegex "(?:..)*?a" []+        ["aba"]+        [Just ["a"]]+    ,+++    testRegex "^(?:b|a(?=(.)))*\\1" []+        ["abc"]+        [Just ["ab", "b"]]+    ,+++    testRegex "^(){3,5}" []+        ["abc"]+        [Just ["", ""]]+    ,+++    testRegex "^(a+)*ax" []+        ["aax"]+        [Just ["aax", "a"]]+    ,+++    testRegex "^((a|b)+)*ax" []+        ["aax"]+        [Just ["aax", "a", "a"]]+    ,+++    testRegex "^((a|bc)+)*ax" []+        ["aax"]+        [Just ["aax", "a", "a"]]+    ,+++    testRegex "(a|x)*ab" []+        ["cab"]+        [Just ["ab"]]+    ,+++    testRegex "(a)*ab" []+        ["cab"]+        [Just ["ab"]]+    ,+++    testRegex "(?:(?i)a)b" []+        ["ab"]+        [Just ["ab"]]+    ,+++    testRegex "((?i)a)b" []+        ["ab"]+        [Just ["ab", "a"]]+    ,+++    testRegex "(?:(?i)a)b" []+        ["Ab"]+        [Just ["Ab"]]+    ,+++    testRegex "((?i)a)b" []+        ["Ab"]+        [Just ["Ab", "A"]]+    ,+++    testRegex "(?:(?i)a)b" []+        ["*** Failers",+         "cb",+         "aB"]+        [Nothing,+         Nothing,+         Nothing]+    ,+    testRegex "((?i)a)b" []+        []+        []+    ,+++    testRegex "(?i:a)b" []+        ["ab"]+        [Just ["ab"]]+    ,+++    testRegex "((?i:a))b" []+        ["ab"]+        [Just ["ab", "a"]]+    ,+++    testRegex "(?i:a)b" []+        ["Ab"]+        [Just ["Ab"]]+    ,+++    testRegex "((?i:a))b" []+        ["Ab"]+        [Just ["Ab", "A"]]+    ,+++    testRegex "(?i:a)b" []+        ["*** Failers",+         "aB",+         "aB"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "((?i:a))b" []+        []+        []+    ,+++    testRegex "(?:(?-i)a)b" [caseless]+        ["ab"]+        [Just ["ab"]]+    ,+++    testRegex "((?-i)a)b" [caseless]+        ["ab"]+        [Just ["ab", "a"]]+    ,+++    testRegex "(?:(?-i)a)b" [caseless]+        ["aB"]+        [Just ["aB"]]+    ,+++    testRegex "((?-i)a)b" [caseless]+        ["aB"]+        [Just ["aB", "a"]]+    ,+++    testRegex "(?:(?-i)a)b" [caseless]+        ["*** Failers",+         "aB",+         "Ab"]+        [Nothing,+         Just ["aB"],+         Nothing]+    ,+++    testRegex "((?-i)a)b" [caseless]+        []+        []+    ,+++    testRegex "(?:(?-i)a)b" [caseless]+        ["aB"]+        [Just ["aB"]]+    ,+++    testRegex "((?-i)a)b" [caseless]+        ["aB"]+        [Just ["aB", "a"]]+    ,+++    testRegex "(?:(?-i)a)b" [caseless]+        ["*** Failers",+         "Ab",+         "AB"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "((?-i)a)b" [caseless]+        []+        []+    ,+++    testRegex "(?-i:a)b" [caseless]+        ["ab"]+        [Just ["ab"]]+    ,+++    testRegex "((?-i:a))b" [caseless]+        ["ab"]+        [Just ["ab", "a"]]+    ,+++    testRegex "(?-i:a)b" [caseless]+        ["aB"]+        [Just ["aB"]]+    ,+++    testRegex "((?-i:a))b" [caseless]+        ["aB"]+        [Just ["aB", "a"]]+    ,+++    testRegex "(?-i:a)b" [caseless]+        ["*** Failers",+         "AB",+         "Ab"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "((?-i:a))b" [caseless]+        []+        []+    ,+++    testRegex "(?-i:a)b" [caseless]+        ["aB"]+        [Just ["aB"]]+    ,+++    testRegex "((?-i:a))b" [caseless]+        ["aB"]+        [Just ["aB", "a"]]+    ,+++    testRegex "(?-i:a)b" [caseless]+        ["*** Failers",+         "Ab",+         "AB"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "((?-i:a))b" [caseless]+        []+        []+    ,+++    testRegex "((?-i:a.))b" [caseless]+        ["*** Failers",+         "AB",+         "a\nB"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "((?s-i:a.))b" [caseless]+        ["a\nB"]+        [Just ["a\nB", "a\n"]]+    ,+++    testRegex "(?:c|d)(?:)(?:a(?:)(?:b)(?:b(?:))(?:b(?:)(?:b)))" []+        ["cabbbb"]+        [Just ["cabbbb"]]+    ,++    testRegex "(?:c|d)(?:)(?:aaaaaaaa(?:)(?:bbbbbbbb)(?:bbbbbbbb(?:))(?:bbbbbbbb(?:)(?:bbbbbbbb)))" []+        ["caaaaaaaabbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb"]+        [Just ["caaaaaaaabbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb"]]+    ,+++    testRegex "(ab)\\d\\1" [caseless]+        ["Ab4ab",+         "ab4Ab"]+        [Just ["Ab4ab", "Ab"],+         Just ["ab4Ab", "ab"]]+    ,+++    testRegex "foo\\w*\\d{4}baz" []+        ["foobar1234baz"]+        [Just ["foobar1234baz"]]+    ,+++    testRegex "x(~~)*(?:(?:F)?)?" []+        ["x~~"]+        [Just ["x~~", "~~"]]+    ,+++    testRegex "^a(?#xxx){3}c" []+        ["aaac"]+        [Just ["aaac"]]+    ,+++    testRegex "^a (?#xxx) (?#yyy) {3}c" [extended]+        ["aaac"]+        [Just ["aaac"]]+    ,+++    testRegex "(?<![cd])b" []+        ["*** Failers",+         "B\nB",+         "dbcb"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(?<![cd])[ab]" []+        ["dbaacb"]+        [Just ["a"]]+    ,+++    testRegex "(?<!(c|d))b" []+        []+        []+    ,+++    testRegex "(?<!(c|d))[ab]" []+        ["dbaacb"]+        [Just ["a"]]+    ,+++    testRegex "(?<!cd)[ab]" []+        ["cdaccb"]+        [Just ["b"]]+    ,++{-+    testRegex "^(?:a?b?)*$" []+        ["a",+         "ab",+         "aaa   ",+         "*** Failers",+         "dbcb",+         "a--",+         "aa-- "]+        [Just ["a"],+         Just ["ab"],+         Just ["aaa"],+         Nothing,+         Nothing,+         Nothing,+         Nothing]+    ,+    -}+++    testRegex "((?s)^a(.))((?m)^b$)" []+        ["a\nb\nc\n"]+        [Just ["a\nb", "a\n", "\n", "b"]]+    ,+++    testRegex "((?m)^b$)" []+        ["a\nb\nc\n"]+        [Just ["b", "b"]]+    ,+++    testRegex "(?m)^b" []+        ["a\nb\n"]+        [Just ["b"]]+    ,+++    testRegex "(?m)^(b)" []+        ["a\nb\n"]+        [Just ["b", "b"]]+    ,+++    testRegex "((?m)^b)" []+        ["a\nb\n"]+        [Just ["b", "b"]]+    ,+++    testRegex "\\n((?m)^b)" []+        ["a\nb\n"]+        [Just ["\nb", "b"]]+    ,+++    testRegex "((?s).)c(?!.)" []+        ["a\nb\nc\n",+         "a\nb\nc\n"]+        [Just ["\nc", "\n"],+         Just ["\nc", "\n"]]+    ,+++    testRegex "((?s)b.)c(?!.)" []+        ["a\nb\nc\n",+         "a\nb\nc\n"]+        [Just ["b\nc", "b\n"],+         Just ["b\nc", "b\n"]]+    ,+++    testRegex "^b" []+        []+        []+    ,+++    testRegex "()^b" []+        ["*** Failers",+         "a\nb\nc\n",+         "a\nb\nc\n"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "((?m)^b)" []+        ["a\nb\nc\n"]+        [Just ["b", "b"]]+    ,+++    testRegex "(?(1)a|b)" []+        []+        []+    ,+++    testRegex "(?(1)b|a)" []+        ["a"]+        [Just ["a"]]+    ,+++    testRegex "(x)?(?(1)a|b)" []+        ["*** Failers",+         "a",+         "a"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(x)?(?(1)b|a)" []+        ["a"]+        [Just ["a"]]+    ,+++    testRegex "()?(?(1)b|a)" []+        ["a"]+        [Just ["a"]]+    ,+++    testRegex "()(?(1)b|a)" []+        []+        []+    ,+++    testRegex "()?(?(1)a|b)" []+        ["a"]+        [Just ["a", ""]]+    ,+++    testRegex "^(\\()?blah(?(1)(\\)))$" []+        ["(blah)",+         "blah",+         "a",+         "blah)",+         "(blah"]+        [Just ["(blah)", "(", ")"],+         Just ["blah"],+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "^(\\(+)?blah(?(1)(\\)))$" []+        ["(blah)",+         "blah",+         "*** Failers",+         "blah)",+         "(blah"]+        [Just ["(blah)", "(", ")"], +         Just ["blah"],+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(?(?!a)a|b)" []+        []+        []+    ,+++    testRegex "(?(?!a)b|a)" []+        ["a"]+        [Just ["a"]]+    ,+++    testRegex "(?(?=a)b|a)" []+        ["*** Failers",+         "a",+         "a"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(?(?=a)a|b)" []+        ["a"]+        [Just ["a"]]+    ,+++    testRegex "(?=(a+?))(\\1ab)" []+        ["aaab"]+        [Just ["aab", "a", "aab"]]+    ,+++    testRegex "^(?=(a+?))\\1ab" []+        []+        []+    ,+++    testRegex "(\\w+:)+" []+        ["one:"]+        [Just ["one:", "one:"]]+    ,+++    testRegex "$(?<=^(a))" []+        ["a"]+        [Just ["", "a"]]+    ,+++    testRegex "(?=(a+?))(\\1ab)" []+        ["aaab"]+        [Just ["aab", "a", "aab"]]+    ,+++    testRegex "^(?=(a+?))\\1ab" []+        ["*** Failers",+         "aaab",+         "aaab"]+        [Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "([\\w:]+::)?(\\w+)$" []+        ["abcd",+         "xy:z:::abcd"]+        [Just ["abcd", "", "abcd"],+         Just ["xy:z:::abcd", "xy:z:::", "abcd"]]+    ,+++    testRegex "^[^bcd]*(c+)" []+        ["aexycd"]+        [Just ["aexyc", "c"]]+    ,+++    testRegex "(a*)b+" []+        ["caab"]+        [Just ["aab", "aa"]]+    ,+++    testRegex "([\\w:]+::)?(\\w+)$" []+        ["abcd",+         "xy:z:::abcd",+         "*** Failers",+         "abcd:",+         "abcd:"]+        [Just ["abcd", "", "abcd"],+         Just ["xy:z:::abcd", "xy:z:::", "abcd"],+         Just ["Failers", "", "Failers"],+         Nothing,+         Nothing]+    ,+++    testRegex "^[^bcd]*(c+)" []+        ["aexycd"]+        [Just ["aexyc", "c"]]+    ,+++    testRegex "(>a+)ab" []+        []+        []+    ,+++    testRegex "(?>a+)b" []+        ["aaab"]+        [Just ["aaab"]]+    ,+++    testRegex "([[:]+)" []+        ["a:[b]:"]+        [Just [":[", ":["]]++    ,+    testRegex "([[=]+)" []+        ["a=[b]="]+        [Just ["=[", "=["]]+    ,+++    testRegex "([[.]+)" []+        ["a.[b]."]+        [Just [".[", ".["]]+    ,+++    testRegex "((?>a+)b)" []+        ["aaab"]+        [Just ["aaab", "aaab"]]+    ,+++    testRegex "(?>(a+))b" []+        ["aaab"]+        [Just ["aaab", "aaa"]]+    ,+++    testRegex "((?>[^()]+)|\\([^()]*\\))+" []+        ["((abc(ade)ufh()()x"]+        [Just ["abc(ade)ufh()()x", "x"]]+    ,+++    testRegex "a\\Z" []+        ["aaab",+         "a\nb\n"]+        [Nothing,+         Nothing]+    ,+++    testRegex "b\\Z" []+        ["a\nb\n"]+        [Just ["b"]]+    ,+++    testRegex "b\\z" []+        []+        []+    ,+++    testRegex "b\\Z" []+        ["a\\nb"]+        [Just ["b"]]+    ,++    testRegex "(?>.*)(?<=(abcd|wxyz))" []+        ["alphabetabcd",+         "endingwxyz",+         "*** Failers",+         "a rather long string that doesn't end with one of them"]+        [Just ["alphabetabcd", "abcd"],+         Just ["endingwxyz", "wxyz"],+         Nothing,+         Nothing]+    ,+++    testRegex "word (?>(?:(?!otherword)[a-zA-Z0-9]+ ){0,30})otherword" []+        ["word cat dog elephant mussel cow horse canary baboon snake shark otherword",+         "word cat dog elephant mussel cow horse canary baboon snake shark"+         ]+        [Just ["word cat dog elephant mussel cow horse canary baboon snake shark otherword"],+         Nothing]+    ,++    testRegex "((Z)+|A)*" []+        ["ZABCDEFG"]+        [Just ["ZA", "A", "Z"]]+    ,+++    testRegex "(Z()|A)*" []+        ["ZABCDEFG"]+        [Just ["ZA", "A", ""]]+    ,+++    testRegex "(Z(())|A)*" []+        ["ZABCDEFG"]+        [Just ["ZA", "A", "", ""]]+    ,++    testRegex "((?>Z)+|A)*" []+        ["ZABCDEFG"]+        [Just ["ZA", "A"]]+    ,+++    testRegex "((?>)+|A)*" []+        ["ZABCDEFG"]+        [Just ["", ""]]+    ,++++    testRegex "^[a-\\d]" []+        ["abcde",+         "-things",+         "0digit",+         "*** Failers",+         "bcdef    "]+        [Just ["a"],+         Just ["-"],+         Just ["0"],+         Nothing,+         Nothing]+    ,++    testRegex "\\Qabc\\$xyz\\E" []+        ["abc\\$xyz"]+        [Just ["abc\\$xyz"]]+    ,+    testRegex "\\Qabc\\E\\$\\Qxyz\\E" []+        ["abc$xyz"]+        [Just ["abc$xyz"]]+    ,+    testRegex "\\Gabc" []+        ["abc",+         "*** Failers",+         "xyzabc  "]+        [Just ["abc"],+         Nothing,+         Nothing]+    ,++    testRegex "a(?x: b c )d" []+        ["XabcdY",+         "*** Failers ",+         "Xa b c d Y "]+        [Just ["abcd"],+         Nothing,+         Nothing]+    ,+++    testRegex "((?x)x y z | a b c)" []+        ["XabcY",+         "AxyzB "]+        [Just ["abc", "abc"],+         Just ["xyz", "xyz"]]+    ,+++    testRegex "(?i)AB(?-i)C" []+        ["XabCY",+         "*** Failers",+         "XabcY  "]+        [Just ["abC"],+         Nothing,+         Nothing]+    ,+++    testRegex "((?i)AB(?-i)C|D)E" []+        ["abCE",+         "DE",+         "*** Failers",+         "abcE",+         "abCe  ",+         "dE",+         "De    "]+        [Just ["abCE", "abC"],+         Just ["DE", "D"],+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(.*)\\d+\\1" []+        ["abc123abc",+         "abc123bc "]+        [Just ["abc123abc", "abc"],+         Just ["bc123bc", "bc"]]+    ,++    testRegex "[z\\Qa-d]\\E]" []+        ["z",+         "a",+         "-",+         "d",+         "] ",+         "*** Failers",+         "b     "]+        [Just ["z"],+         Just ["a"],+         Just ["-"],+         Just ["d"],+         Just ["]"],+         Just ["a"],+         Nothing]++    , testRegex "(?<=Z)X." []+        ["\\x84XAZXB"]+        [Just ["XB"]]+    ,++    testRegex "ab cd (?x) de fg" []+        ["ab cd defg"]+        [Just ["ab cd defg"]]+    ,+++    testRegex "ab cd(?x) de fg" []+        ["ab cddefg",+         "** Failers ",+         "abcddefg"]+        [Just ["ab cddefg"],+         Nothing,+         Nothing]+    ,+++    testRegex "(?<![^f]oo)(bar)" []+        ["foobarX ",+         "** Failers ",+         "boobarX"]+        [Just ["bar", "bar"],+         Nothing,+         Nothing]+    ,+++    testRegex "(?<![^f])X" []+        ["offX",+         "** Failers",+         "onyX  "]+        [Just ["X"],+         Nothing,+         Nothing]+    ,+++    testRegex "(?<=[^f])X" []+        ["onyX",+         "** Failers",+         "offX "]+        [Just ["X"],+         Nothing,+         Nothing]+    ,++++    testRegex "(?:(?(1)a|b)(X))+" []+        ["bXaX"]+        [Just ["bXaX", "X"]]+    ,++    testRegex "(?:(?(1)\\1a|b)(X|Y))+" []+        ["bXXaYYaY",+         "bXYaXXaX  "]+        [Just ["bXXaYYaY", "Y"],+         Just ["bX", "X"]]+    ,+++    testRegex "()()()()()()()()()(?:(?(10)\\10a|b)(X|Y))+" []+        ["bXXaYYaY"]+        [Just ["bX", "", "", "", "", "", "", "", "", "", "X"]]+    ,+++    testRegex "[[,abc,]+]" []+        ["abc]",+         "a,b]",+         "[a,b,c]  "]+        [Just ["abc]"],+         Just ["a,b]"],+         Just ["[a,b,c]"]]+    ,+++++    testRegex "a*b*\\w" []+        ["aaabbbb",+         "aaaa",+         "a"]+        [Just ["aaabbbb"],+         Just ["aaaa"],+         Just ["a"]]+    ,+++    testRegex "a*b?\\w" []+        ["aaabbbb",+         "aaaa",+         "a"]+        [Just ["aaabb"],+         Just ["aaaa"],+         Just ["a"]]+    ,+++    testRegex "a*b{0,4}\\w" []+        ["aaabbbb",+         "aaaa",+         "a"]+        [Just ["aaabbbb"],+         Just ["aaaa"],+         Just ["a"]]+    ,+++    testRegex "(?=(\\w+))\\1:" []+        ["abcd:"]+        [Just ["abcd:", "abcd"]]+    ,+++    testRegex "^(?=(\\w+))\\1:" []+        ["abcd:"]+        [Just ["abcd:", "abcd"]]+    ,++++    testRegex "^[a\\E\\E-\\Ec]" []+        ["b",+         "** Failers",+         "-",+         "E    "]+        [Just ["b"],+         Nothing,+         Nothing,+         Nothing]+    ,+++    testRegex "(a){0,3}(?(1)b|(c|))*D" []+        ["abbD",+         "ccccD",+         "D  "]+        [Just ["abbD", "a"],+         Just ["ccccD", "", ""],+         Just ["D", "", ""]]+    ,+++    -- WARNING: at around this point, the file starts segfaulting ghci....+    testRegex "(a|)*\\d" []+        ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa",+         "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]+        [Nothing,+         Just ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4", ""]]++    ,+    testRegex "(?>a|)*\\d" []+        ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa",+         "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]+        [Nothing,+         Just ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]]++    ,++    testRegex "(?=(\\w+))\\1:" []+        ["abcd:"]+        [Just ["abcd:", "abcd"]]+    ,+++    testRegex "^(?=(\\w+))\\1:" []+        ["abcd:"]+        [Just ["abcd:", "abcd"]]+    ,++++    testRegex "^[a\\E\\E-\\Ec]" []+        ["b",+         "** Failers",+         "-",+         "E    "]+        [Just ["b"],+         Nothing,+         Nothing,+         Nothing]+    ,++++++++    testRegex "(a){0,3}(?(1)b|(c|))*D" []+        ["abbD",+         "ccccD",+         "D  "]+        [Just ["abbD", "a"],+         Just ["ccccD", "", ""],+         Just ["D", "", ""]]+    ,+++    testRegex "(a|)*\\d" []+        ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa",+         "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]+        [Nothing,+         Just ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4", ""]]+    ,+++    testRegex "(?>a|)*\\d" []+        ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa",+         "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]+        [Nothing,+         Just ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]]+    ,++    testRegex "( (A | (?(1)0|) )*   )" [extended]+        ["abcd"]+        [Just ["", "", ""]]++    ,+    testRegex "^[\\w]+" []+        ["*** Failers",+         "\201cole"]+        [Nothing,+         Nothing]++++    ,+    testRegex "^[\\w]+" []+        ["*** Failers",+         "\201cole"]+        [Nothing,+         Nothing]++{-+    ,++    testRegex "(a.b(?s)c.d|x.y)p.q" []+        ["a+bc+dp+q",+         "a+bc\ndp+q",+         "x\nyp+q ",+         "a\nbc\ndp+q",+         "a+bc\ndp\nq",+         "x\nyp\nq "+         ]+        [Just ["a+bc+dp+q"],+         Just ["a+bc\ndp+q"],+         Just ["x\nyp+q"],+         Nothing,+         Nothing,+         Nothing+         ]+         -}++    ,+    testRegex "a\\d\\z" []+        ["ba0",+         "*** Failers",+         "ba0\n",+         "ba0\ncd   "]+        [Just ["a0"],+         Nothing,+         Nothing,+         Nothing]++    ,+    testRegex "a\\d\\Z" []+        ["ba0",+         "ba0\n",+         "ba0\ncd   "]+        [Just ["a0"],+         Just ["a0"],+         Nothing]++    ,+    testRegex "a\\d$" []+        ["ba0",+         "ba0\n",+         "*** Failers",+         "ba0\ncd   "]+        [Just ["a0"],+         Just ["a0"],+         Nothing,+         Nothing]+    ,+    testRegex "a+" []+        ["aaaa"]+        [Just ["aaaa"]]++++    ,+    testRegex "^\\d{2,3}X" []+        ["12X",+         "123X",+         "*** Failers",+         "X",+         "1X",+         "1234X     "]+        [Just ["12X"],+         Just ["123X"],+         Nothing,+         Nothing,+         Nothing,+         Nothing]+++    ,+    testRegex "^[abcd]\\d" []+        ["a45",+         "b93",+         "c99z",+         "d04",+         "*** Failers",+         "e45",+         "abcd      ",+         "abcd1234",+         "1234  "]+        [Just ["a4"],+         Just ["b9"],+         Just ["c9"],+         Just ["d0"],+         Nothing,+         Nothing,+         Nothing,+         Nothing,+         Nothing]+++{-+    ,+    testRegex "^(a*\\w|ab)=(a*\\w|ab)" []+        ["ab=ab"]+        [Just ["ab=ab", "ab"]]+        -}+++    ,+    testRegex "^(a*\\w|ab)=(?1)" []+        ["ab=ab"]+        [Just ["ab=ab", "ab"]]+++{-+    ,+    testRegex "^([^()]|\\((?1)*\\))*$" []+        ["abc",+         "a(b)c",+         "a(b(c))d  ",+         "*** Failers)",+         "a(b(c)d  "]+        [Just ["abc"],+         Just ["a(b)c"],+         Just ["a(b(c))d"],+         Nothing,+         Nothing]++    ,+    testRegex "^>abc>([^()]|\\((?1)*\\))*<xyz<$" []+        [">abc>123<xyz<",+         ">abc>1(2)3<xyz<",+         ">abc>(1(2)3)<xyz<"]+        [Just [">abc>123<xyz<"],+         Just [">abc>1(2)3<xyz<"],+         Just [">abc>(1(2)3)<xyz<"]]++-}++    ,+    testRegex "^(?>a*)\\d" []+        ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa9876",+         "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"]+        [Just ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa9"],+         Nothing]++++++    ,+    testRegex "(?<=abc|xy)123" []+        ["abc12345",+         "wxy123z",+         "*** Failers",+         "123abc"]+        [Just ["123"],+         Just ["123"],+         Nothing,+         Nothing]+++    ,+    testRegex "(?<!abc|xy)123" []+        ["123abc",+         "mno123456 ",+         "*** Failers",+         "abc12345",+         "wxy123z"]+        [Just ["123"],+         Just ["123"],+         Nothing,+         Nothing,+         Nothing]++    ,+    testRegex "abc(?C1)xyz" []+        ["abcxyz",+         "123abcxyz999 "]+        [ Just ["abcxyz"],+         Just ["abcxyz"]]++++++{-+    ,+    testRegex "\\Gabc" []+        ["abcdef",+         "defabcxyz\\>3 ",+         "defabcxyz"]+        [Just ["abc"],+         Just ["abc"],+         Nothing]+         -}++    ,++    testRegex "[\\xFF]" []+        [">\xff<"]+        [Just ["\xff"]]++    ,+    testRegex "[^\\xFF]" []+        ["XYZ"]+        [Just ["X"]]+++    ,+    testRegex "^\\pN{2,3}X" []+        ["12X",+         "123X",+         "*** Failers",+         "X",+         "1X",+         "1234X     "]+        [Just ["12X"],+         Just ["123X"],+         Nothing,+         Nothing,+         Nothing,+         Nothing]+++ ]

@@ -0,0 +1,5 @@+import Text.Regex.PCRE.Light.Char8++main = do+    let r = compile "(a|)*\\d" []+    print (match r "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" [])

@@ -1,4838 +0,0 @@---testRegex "^(a){1,}" []-    ["bcd",-     "abc",-     "aab",-     "aaa",-     "aaaaaaaa    "]-    [Nothing,-     Just [" 0: a"],-     Just [" 1: a"],-     Just [" 0: aa"],-     Just [" 1: a"],-     Just [" 0: aaa"],-     Just [" 1: a"],-     Just [" 0: aaaaaaaa"],-     Just [" 1: a"]]-,------------testRegex ".*$" [ERROR]-    ["borfle\\nbib.gif\\nno\\n"]-    [Just [" 0: borfle\\x0abib.gif\\x0ano\\x0a"]]-,---testRegex ".*$" [ERROR]-    ["borfle\\nbib.gif\\nno\\n",-     "",-     "/(.*X|^B)/",-     "abcde\\n1234Xyz",-     "BarFoo ",-     "*** Failers",-     "abcde\\nBar  "]-    [Just [" 0: borfle\\x0abib.gif\\x0ano\\x0a"],-     Just ["/(.*X|^B)/"],-     Just [" 0: 1234X"],-     Just [" 1: 1234X"],-     Just [" 0: B"],-     Just [" 1: B"],-     Nothing,-     Nothing]-,---testRegex "(.*X|^B)" [ERROR]-    ["abcde\\n1234Xyz",-     "BarFoo ",-     "abcde\\nBar  "]-    [Just [" 0: 1234X"],-     Just [" 1: 1234X"],-     Just [" 0: B"],-     Just [" 1: B"],-     Just [" 0: B"],-     Just [" 1: B"]]-,---testRegex "(.*X|^B)" [ERROR]-    ["abcde\\n1234Xyz",-     "BarFoo ",-     "*** Failers",-     "abcde\\nBar  "]-    [Just [" 0: abcde\\x0a1234X"],-     Just [" 1: abcde\\x0a1234X"],-     Just [" 0: B"],-     Just [" 1: B"],-     Nothing,-     Nothing]-,---testRegex "(.*X|^B)" [ERROR]-    ["abcde\\n1234Xyz",-     "BarFoo ",-     "abcde\\nBar  "]-    [Just [" 0: abcde\\x0a1234X"],-     Just [" 1: abcde\\x0a1234X"],-     Just [" 0: B"],-     Just [" 1: B"],-     Just [" 0: B"],-     Just [" 1: B"]]-,---testRegex "(?s)(.*X|^B)" []-    ["abcde\\n1234Xyz",-     "BarFoo ",-     "*** Failers ",-     "abcde\\nBar  "]-    [Just [" 0: abcde\\x0a1234X"],-     Just [" 1: abcde\\x0a1234X"],-     Just [" 0: B"],-     Just [" 1: B"],-     Nothing,-     Nothing]-,---testRegex "(?s:.*X|^B)" []-    ["abcde\\n1234Xyz",-     "BarFoo ",-     "*** Failers ",-     "abcde\\nBar  "]-    [Just [" 0: abcde\\x0a1234X"],-     Just [" 0: B"],-     Nothing,-     Nothing]-,---testRegex "^.*B" []-    ["**** Failers",-     "abc\\nB",-     "",-     "/(?s)^.*B/",-     "abc\\nB"]-    [Nothing,-     Nothing,-     Just ["/(?s)^.*B/"],-     Just [" 0: abc\\x0aB"]]-,---testRegex "(?m)^.*B" []-    ["abc\\nB",-     "",-     "/(?ms)^.*B/",-     "abc\\nB"]-    [Just [" 0: B"],-     Just ["/(?ms)^.*B/"],-     Just [" 0: abc\\x0aB"]]-,-----testRegex "^[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]" []-    ["123456654321",-     "",-     "/^\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d/",-     "123456654321 "]-    [Just [" 0: 123456654321"],-     Just ["/^\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d/"],-     Just [" 0: 123456654321"]]-,---testRegex "^[\\d][\\d][\\d][\\d][\\d][\\d][\\d][\\d][\\d][\\d][\\d][\\d]" []-    ["123456654321",-     "",-     "/^[abc]{12}/",-     "abcabcabcabc",-     "",-     "/^[a-c]{12}/",-     "abcabcabcabc",-     "",-     "/^(a|b|c){12}/",-     "abcabcabcabc "]-    [Just [" 0: 123456654321"],-     Just ["/^[abc]{12}/"],-     Just [" 0: abcabcabcabc"],-     Just ["/^[a-c]{12}/"],-     Just [" 0: abcabcabcabc"],-     Just ["/^(a|b|c){12}/"],-     Just [" 0: abcabcabcabc"],-     Just [" 1: c"]]-,------testRegex "" [ERROR]-    ["abc"]-    [Just [" 0: "],-     Just [" 0: "],-     Just [" 0: "],-     Just [" 0: "]]-,---testRegex "<tr([\\w\\W\\s\\d][^<>]{0,})><TD([\\w\\W\\s\\d][^<>]{0,})>([\\d]{0,}\\.)(.*)((<BR>([\\w\\W\\s\\d][^<>]{0,})|[\\s]{0,}))<\\/a><\\/TD><TD([\\w\\W\\s\\d][^<>]{0,})>([\\w\\W\\s\\d][^<>]{0,})<\\/TD><TD([\\w\\W\\s\\d][^<>]{0,})>([\\w\\W\\s\\d][^<>]{0,})<\\/TD><\\/TR>" [ERROR]-    ["<TR BGCOLOR='#DBE9E9'><TD align=left valign=top>43.<a href='joblist.cfm?JobID=94 6735&Keyword='>Word Processor<BR>(N-1286)</a></TD><TD align=left valign=top>Lega lstaff.com</TD><TD align=left valign=top>CA - Statewide</TD></TR>"]-    [Just [" 0: <TR BGCOLOR='#DBE9E9'><TD align=left valign=top>43.<a href='joblist.cfm?JobID=94 6735&Keyword='>Word Processor<BR>(N-1286)</a></TD><TD align=left valign=top>Lega lstaff.com</TD><TD align=left valign=top>CA - Statewide</TD></TR>"],-     Just [" 1:  BGCOLOR='#DBE9E9'"],-     Just [" 2:  align=left valign=top"],-     Just [" 3: 43."],-     Just [" 4: <a href='joblist.cfm?JobID=94 6735&Keyword='>Word Processor<BR>(N-1286)"],-     Just [" 5: "],-     Just [" 6: "],-     Just [" 7: <unset>"],-     Just [" 8:  align=left valign=top"],-     Just [" 9: Lega lstaff.com"],-     Just ["10:  align=left valign=top"],-     Just ["11: CA - Statewide"]]-,---testRegex "a[^a]b" []-    ["acb",-     "a\\nb",-     "",-     "/a.b/",-     "acb",-     "*** Failers ",-     "a\\nb   ",-     "",-     "/a[^a]b/s",-     "acb",-     "a\\nb  ",-     "",-     "/a.b/s",-     "acb",-     "a\\nb  "]-    [Just [" 0: acb"],-     Just [" 0: a\\x0ab"],-     Just ["/a.b/"],-     Just [" 0: acb"],-     Nothing,-     Nothing,-     Just ["/a[^a]b/s"],-     Just [" 0: acb"],-     Just [" 0: a\\x0ab"],-     Just ["/a.b/s"],-     Just [" 0: acb"],-     Just [" 0: a\\x0ab"]]-,----testRegex "^(b+|a){1,2}?c" []-    ["bac",-     "bbac",-     "bbbac",-     "bbbbac",-     "bbbbbac ",-     "",-     "/(?!\\A)x/m",-     "x\\nb\\n",-     "a\\bx\\n  ",-     "",-     "/\\x0{ab}/",-     "\\0{ab} "]-    [Just [" 0: bac"],-     Just [" 1: a"],-     Just [" 0: bbac"],-     Just [" 1: a"],-     Just [" 0: bbbac"],-     Just [" 1: a"],-     Just [" 0: bbbbac"],-     Just [" 1: a"],-     Just [" 0: bbbbbac"],-     Just [" 1: a"],-     Just ["/(?!\\A)x/m"],-     Nothing,-     Just [" 0: x"],-     Just ["/\\x0{ab}/"],-     Just [" 0: \\x00{ab}"]]-,-----testRegex "(AB)*\\1" []-    ["ABABAB",-     "",-     "/(?<!bar)foo/",-     "foo",-     "catfood",-     "arfootle",-     "rfoosh",-     "*** Failers",-     "barfoo",-     "towbarfoo"]-    [Just [" 0: ABABAB"],-     Just [" 1: AB"],-     Just ["/(?<!bar)foo/"],-     Just [" 0: foo"],-     Just [" 0: foo"],-     Just [" 0: foo"],-     Just [" 0: foo"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "\\w{3}(?<!bar)foo" []-    ["catfood",-     "*** Failers",-     "foo",-     "barfoo",-     "towbarfoo"]-    [Just [" 0: catfoo"],-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?<=(foo)a)bar" []-    ["fooabar",-     "*** Failers",-     "bar",-     "foobbar",-     "",-     "/\\Aabc\\z/m",-     "abc",-     "*** Failers",-     "abc\\n   ",-     "qqq\\nabc",-     "abc\\nzzz",-     "qqq\\nabc\\nzzz"]-    [Just [" 0: bar"],-     Just [" 1: foo"],-     Nothing,-     Nothing,-     Nothing,-     Just ["/\\Aabc\\z/m"],-     Just [" 0: abc"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?>.*/)foo" [ERROR]-    ["/this/is/a/very/long/line/in/deed/with/very/many/slashes/in/it/you/see/"]-    [Nothing]-,---testRegex "(?>.*/)foo" [ERROR]-    ["/this/is/a/very/long/line/in/deed/with/very/many/slashes/in/and/foo"]-    [Just [" 0: /this/is/a/very/long/line/in/deed/with/very/many/slashes/in/and/foo"]]-,---testRegex "(?>(\\.\\d\\d[1-9]?))\\d+" []-    ["1.230003938",-     "1.875000282",-     "*** Failers ",-     "1.235 "]-    [Just [" 0: .230003938"],-     Just [" 1: .23"],-     Just [" 0: .875000282"],-     Just [" 1: .875"],-     Nothing,-     Nothing]-,---testRegex "^((?>\\w+)|(?>\\s+))*$" []-    ["now is the time for all good men to come to the aid of the party",-     "*** Failers",-     "this is not a line with only words and spaces!",-     "",-     "/(\\d+)(\\w)/",-     "12345a",-     "12345+ "]-    [Just [" 0: now is the time for all good men to come to the aid of the party"],-     Just [" 1: party"],-     Nothing,-     Nothing,-     Just ["/(\\d+)(\\w)/"],-     Just [" 0: 12345a"],-     Just [" 1: 12345"],-     Just [" 2: a"],-     Just [" 0: 12345"],-     Just [" 1: 1234"],-     Just [" 2: 5"]]-,---testRegex "((?>\\d+))(\\w)" []-    ["12345a",-     "*** Failers",-     "12345+ "]-    [Just [" 0: 12345a"],-     Just [" 1: 12345"],-     Just [" 2: a"],-     Nothing,-     Nothing]-,---testRegex "(?>a+)b" []-    ["aaab"]-    [Just [" 0: aaab"]]-,---testRegex "((?>a+)b)" []-    ["aaab"]-    [Just [" 0: aaab"],-     Just [" 1: aaab"]]-,---testRegex "(?>(a+))b" []-    ["aaab"]-    [Just [" 0: aaab"],-     Just [" 1: aaa"]]-,---testRegex "(?>b)+" []-    ["aaabbbccc"]-    [Just [" 0: bbb"]]-,---testRegex "(?>a+|b+|c+)*c" []-    ["aaabbbbccccd"]-    [Just [" 0: aaabbbbc"]]-,---testRegex "((?>[^()]+)|\\([^()]*\\))+" []-    ["((abc(ade)ufh()()x",-     "",-     "/\\(((?>[^()]+)|\\([^()]+\\))+\\)/ ",-     "(abc)",-     "(abc(def)xyz)",-     "*** Failers",-     "((()aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa   "]-    [Just [" 0: abc(ade)ufh()()x"],-     Just [" 1: x"],-     Just ["/\\(((?>[^()]+)|\\([^()]+\\))+\\)/ "],-     Just [" 0: (abc)"],-     Just [" 1: abc"],-     Just [" 0: (abc(def)xyz)"],-     Just [" 1: xyz"],-     Nothing,-     Nothing]-,---testRegex "a(?-i)b" [caseless]-    ["ab",-     "Ab",-     "*** Failers ",-     "aB",-     "AB",-     "",-     "/(a (?x)b c)d e/",-     "a bcd e",-     "*** Failers",-     "a b cd e",-     "abcd e   ",-     "a bcde ",-     "",-     "/(a b(?x)c d (?-x)e f)/",-     "a bcde f",-     "*** Failers",-     "abcdef  "]-    [Just [" 0: ab"],-     Just [" 0: Ab"],-     Nothing,-     Nothing,-     Nothing,-     Just ["/(a (?x)b c)d e/"],-     Just [" 0: a bcd e"],-     Just [" 1: a bc"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Just ["/(a b(?x)c d (?-x)e f)/"],-     Just [" 0: a bcde f"],-     Just [" 1: a bcde f"],-     Nothing,-     Nothing]-,---testRegex "(a(?i)b)c" []-    ["abc",-     "aBc",-     "*** Failers",-     "abC",-     "aBC  ",-     "Abc",-     "ABc",-     "ABC",-     "AbC",-     "",-     "/a(?i:b)c/",-     "abc",-     "aBc",-     "*** Failers ",-     "ABC",-     "abC",-     "aBC",-     "",-     "/a(?i:b)*c/",-     "aBc",-     "aBBc",-     "*** Failers ",-     "aBC",-     "aBBC",-     "",-     "/a(?=b(?i)c)\\w\\wd/",-     "abcd",-     "abCd",-     "*** Failers",-     "aBCd",-     "abcD     ",-     "",-     "/(?s-i:more.*than).*million/i",-     "more than million",-     "more than MILLION",-     "more \\n than Million ",-     "*** Failers",-     "MORE THAN MILLION    ",-     "more \\n than \\n million "]-    [Just [" 0: abc"],-     Just [" 1: ab"],-     Just [" 0: aBc"],-     Just [" 1: aB"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Just ["/a(?i:b)c/"],-     Just [" 0: abc"],-     Just [" 0: aBc"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Just ["/a(?i:b)*c/"],-     Just [" 0: aBc"],-     Just [" 0: aBBc"],-     Nothing,-     Nothing,-     Nothing,-     Just ["/a(?=b(?i)c)\\w\\wd/"],-     Just [" 0: abcd"],-     Just [" 0: abCd"],-     Nothing,-     Nothing,-     Nothing,-     Just ["/(?s-i:more.*than).*million/i"],-     Just [" 0: more than million"],-     Just [" 0: more than MILLION"],-     Just [" 0: more \\x0a than Million"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?:(?s-i)more.*than).*million" [caseless]-    ["more than million",-     "more than MILLION",-     "more \\n than Million ",-     "*** Failers",-     "MORE THAN MILLION    ",-     "more \\n than \\n million ",-     "",-     "/(?>a(?i)b+)+c/ ",-     "abc",-     "aBbc",-     "aBBc ",-     "*** Failers",-     "Abc",-     "abAb    ",-     "abbC ",-     "",-     "/(?=a(?i)b)\\w\\wc/",-     "abc",-     "aBc",-     "*** Failers",-     "Ab ",-     "abC",-     "aBC     ",-     "",-     "/(?<=a(?i)b)(\\w\\w)c/",-     "abxxc",-     "aBxxc",-     "*** Failers",-     "Abxxc",-     "ABxxc",-     "abxxC      "]-    [Just [" 0: more than million"],-     Just [" 0: more than MILLION"],-     Just [" 0: more \\x0a than Million"],-     Nothing,-     Nothing,-     Nothing,-     Just ["/(?>a(?i)b+)+c/ "],-     Just [" 0: abc"],-     Just [" 0: aBbc"],-     Just [" 0: aBBc"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Just ["/(?=a(?i)b)\\w\\wc/"],-     Just [" 0: abc"],-     Just [" 0: aBc"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Just ["/(?<=a(?i)b)(\\w\\w)c/"],-     Just [" 0: xxc"],-     Just [" 1: xx"],-     Just [" 0: xxc"],-     Just [" 1: xx"],-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?:(a)|b)(?(1)A|B)" []-    ["aA",-     "bB",-     "*** Failers",-     "aB",-     "bA    "]-    [Just [" 0: aA"],-     Just [" 1: a"],-     Just [" 0: bB"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^(a)?(?(1)a|b)+$" []-    ["aa",-     "b",-     "bb  ",-     "*** Failers",-     "ab   "]-    [Just [" 0: aa"],-     Just [" 1: a"],-     Just [" 0: b"],-     Just [" 0: bb"],-     Nothing,-     Nothing]-,---testRegex "^(?(?=abc)\\w{3}:|\\d\\d)$" []-    ["abc:",-     "12",-     "*** Failers",-     "123",-     "xyz    "]-    [Just [" 0: abc:"],-     Just [" 0: 12"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^(?(?!abc)\\d\\d|\\w{3}:)$" []-    ["abc:",-     "12",-     "*** Failers",-     "123",-     "xyz    ",-     "",-     "/(?(?<=foo)bar|cat)/",-     "foobar",-     "cat",-     "fcat",-     "focat   ",-     "*** Failers",-     "foocat  "]-    [Just [" 0: abc:"],-     Just [" 0: 12"],-     Nothing,-     Nothing,-     Nothing,-     Just ["/(?(?<=foo)bar|cat)/"],-     Just [" 0: bar"],-     Just [" 0: cat"],-     Just [" 0: cat"],-     Just [" 0: cat"],-     Nothing,-     Nothing]-,---testRegex "(?(?<!foo)cat|bar)" []-    ["foobar",-     "cat",-     "fcat",-     "focat   ",-     "*** Failers",-     "foocat  "]-    [Just [" 0: bar"],-     Just [" 0: cat"],-     Just [" 0: cat"],-     Just [" 0: cat"],-     Nothing,-     Nothing]-,---testRegex "( \\( )? [^()]+ (?(1) \\) |) " [ERROR]-    ["abcd",-     "(abcd)",-     "the quick (abcd) fox",-     "(abcd   "]-    [Just [" 0: abcd"],-     Just [" 0: (abcd)"],-     Just [" 1: ("],-     Just [" 0: the quick "],-     Just [" 0: abcd"]]-,---testRegex "( \\( )? [^()]+ (?(1) \\) ) " [ERROR]-    ["abcd",-     "(abcd)",-     "the quick (abcd) fox",-     "(abcd   "]-    [Just [" 0: abcd"],-     Just [" 0: (abcd)"],-     Just [" 1: ("],-     Just [" 0: the quick "],-     Just [" 0: abcd"]]-,---testRegex "^(?(2)a|(1)(2))+$" []-    ["12",-     "12a",-     "12aa",-     "*** Failers",-     "1234    "]-    [Just [" 0: 12"],-     Just [" 1: 1"],-     Just [" 2: 2"],-     Just [" 0: 12a"],-     Just [" 1: 1"],-     Just [" 2: 2"],-     Just [" 0: 12aa"],-     Just [" 1: 1"],-     Just [" 2: 2"],-     Nothing,-     Nothing]-,---testRegex "((?i)blah)\\s+\\1" []-    ["blah blah",-     "BLAH BLAH",-     "Blah Blah",-     "blaH blaH",-     "*** Failers",-     "blah BLAH",-     "Blah blah      ",-     "blaH blah "]-    [Just [" 0: blah blah"],-     Just [" 1: blah"],-     Just [" 0: BLAH BLAH"],-     Just [" 1: BLAH"],-     Just [" 0: Blah Blah"],-     Just [" 1: Blah"],-     Just [" 0: blaH blaH"],-     Just [" 1: blaH"],-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "((?i)blah)\\s+(?i:\\1)" []-    ["blah blah",-     "BLAH BLAH",-     "Blah Blah",-     "blaH blaH",-     "blah BLAH",-     "Blah blah      ",-     "blaH blah "]-    [Just [" 0: blah blah"],-     Just [" 1: blah"],-     Just [" 0: BLAH BLAH"],-     Just [" 1: BLAH"],-     Just [" 0: Blah Blah"],-     Just [" 1: Blah"],-     Just [" 0: blaH blaH"],-     Just [" 1: blaH"],-     Just [" 0: blah BLAH"],-     Just [" 1: blah"],-     Just [" 0: Blah blah"],-     Just [" 1: Blah"],-     Just [" 0: blaH blah"],-     Just [" 1: blaH"]]-,---testRegex "(?>a*)*" []-    ["a",-     "aa",-     "aaaa",-     "",-     "/(abc|)+/",-     "abc",-     "abcabc",-     "abcabcabc",-     "xyz      "]-    [Just [" 0: a"],-     Just [" 0: aa"],-     Just [" 0: aaaa"],-     Just ["/(abc|)+/"],-     Just [" 0: abc"],-     Just [" 1: "],-     Just [" 0: abcabc"],-     Just [" 1: "],-     Just [" 0: abcabcabc"],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "]]-,---testRegex "([a]*)*" []-    ["a",-     "aaaaa ",-     "",-     "/([ab]*)*/",-     "a",-     "b",-     "ababab",-     "aaaabcde",-     "bbbb    ",-     "",-     "/([^a]*)*/",-     "b",-     "bbbb",-     "aaa   ",-     "",-     "/([^ab]*)*/",-     "cccc",-     "abab  ",-     "",-     "/([a]*?)*/",-     "a",-     "aaaa ",-     "",-     "/([ab]*?)*/",-     "a",-     "b",-     "abab",-     "baba   ",-     "",-     "/([^a]*?)*/",-     "b",-     "bbbb",-     "aaa   ",-     "",-     "/([^ab]*?)*/",-     "c",-     "cccc",-     "baba   ",-     "",-     "/(?>a*)*/",-     "a",-     "aaabcde ",-     "",-     "/((?>a*))*/",-     "aaaaa",-     "aabbaa ",-     "",-     "/((?>a*?))*/",-     "aaaaa",-     "aabbaa "]-    [Just [" 0: a"],-     Just [" 1: "],-     Just [" 0: aaaaa"],-     Just [" 1: "],-     Just ["/([ab]*)*/"],-     Just [" 0: a"],-     Just [" 1: "],-     Just [" 0: b"],-     Just [" 1: "],-     Just [" 0: ababab"],-     Just [" 1: "],-     Just [" 0: aaaab"],-     Just [" 1: "],-     Just [" 0: bbbb"],-     Just [" 1: "],-     Just ["/([^a]*)*/"],-     Just [" 0: b"],-     Just [" 1: "],-     Just [" 0: bbbb"],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just ["/([^ab]*)*/"],-     Just [" 0: cccc"],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just ["/([a]*?)*/"],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just ["/([ab]*?)*/"],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just ["/([^a]*?)*/"],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just ["/([^ab]*?)*/"],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "],-     Just ["/(?>a*)*/"],-     Just [" 0: a"],-     Just [" 0: aaa"],-     Just ["/((?>a*))*/"],-     Just [" 0: aaaaa"],-     Just [" 1: "],-     Just [" 0: aa"],-     Just [" 1: "],-     Just ["/((?>a*?))*/"],-     Just [" 0: "],-     Just [" 1: "],-     Just [" 0: "],-     Just [" 1: "]]-,---testRegex "(?(?=[^a-z]+[a-z])  \\d{2}-[a-z]{3}-\\d{2}  |  \\d{2}-\\d{2}-\\d{2} ) " [ERROR]-    ["12-sep-98",-     "12-09-98",-     "*** Failers",-     "sep-12-98",-     "",-     "/(?<=(foo))bar\\1/",-     "foobarfoo",-     "foobarfootling ",-     "*** Failers",-     "foobar",-     "barfoo   "]-    [Just [" 0: 12-sep-98"],-     Just [" 0: 12-09-98"],-     Nothing,-     Nothing,-     Just ["/(?<=(foo))bar\\1/"],-     Just [" 0: barfoo"],-     Just [" 1: foo"],-     Just [" 0: barfoo"],-     Just [" 1: foo"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?i:saturday|sunday)" []-    ["saturday",-     "sunday",-     "Saturday",-     "Sunday",-     "SATURDAY",-     "SUNDAY",-     "SunDay",-     "",-     "/(a(?i)bc|BB)x/",-     "abcx",-     "aBCx",-     "bbx",-     "BBx",-     "*** Failers",-     "abcX",-     "aBCX",-     "bbX",-     "BBX               "]-    [Just [" 0: saturday"],-     Just [" 0: sunday"],-     Just [" 0: Saturday"],-     Just [" 0: Sunday"],-     Just [" 0: SATURDAY"],-     Just [" 0: SUNDAY"],-     Just [" 0: SunDay"],-     Just ["/(a(?i)bc|BB)x/"],-     Just [" 0: abcx"],-     Just [" 1: abc"],-     Just [" 0: aBCx"],-     Just [" 1: aBC"],-     Just [" 0: bbx"],-     Just [" 1: bb"],-     Just [" 0: BBx"],-     Just [" 1: BB"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^([ab](?i)[cd]|[ef])" []-    ["ac",-     "aC",-     "bD",-     "elephant",-     "Europe ",-     "frog",-     "France",-     "*** Failers",-     "Africa     "]-    [Just [" 0: ac"],-     Just [" 1: ac"],-     Just [" 0: aC"],-     Just [" 1: aC"],-     Just [" 0: bD"],-     Just [" 1: bD"],-     Just [" 0: e"],-     Just [" 1: e"],-     Just [" 0: E"],-     Just [" 1: E"],-     Just [" 0: f"],-     Just [" 1: f"],-     Just [" 0: F"],-     Just [" 1: F"],-     Nothing,-     Nothing]-,---testRegex "^(ab|a(?i)[b-c](?m-i)d|x(?i)y|z)" []-    ["ab",-     "aBd",-     "xy",-     "xY",-     "zebra",-     "Zambesi",-     "*** Failers",-     "aCD  ",-     "XY  "]-    [Just [" 0: ab"],-     Just [" 1: ab"],-     Just [" 0: aBd"],-     Just [" 1: aBd"],-     Just [" 0: xy"],-     Just [" 1: xy"],-     Just [" 0: xY"],-     Just [" 1: xY"],-     Just [" 0: z"],-     Just [" 1: z"],-     Just [" 0: Z"],-     Just [" 1: Z"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?<=foo\\n)^bar" [ERROR]-    ["foo\\nbar",-     "*** Failers",-     "bar",-     "baz\\nbar   "]-    [Just [" 0: bar"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?<=(?<!foo)bar)baz" []-    ["barbaz",-     "barbarbaz ",-     "koobarbaz ",-     "*** Failers",-     "baz",-     "foobarbaz "]-    [Just [" 0: baz"],-     Just [" 0: baz"],-     Just [" 0: baz"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "The case of aaaaaa is missed out below because I think Perl 5.005_02 gets" []-    ["/it wrong; it sets $1 to aaa rather than aa. Compare the following test,/",-     "/where it does set $1 to aa when matching aaaaaa./"]-    [Just ["/it wrong; it sets $1 to aaa rather than aa. Compare the following test,/"],-     Nothing,-     Just ["/where it does set $1 to aa when matching aaaaaa./"],-     Nothing]-,---testRegex "^(a\\1?){4}$" []-    ["a",-     "aa",-     "aaa",-     "aaaa",-     "aaaaa",-     "aaaaaaa",-     "aaaaaaaa",-     "aaaaaaaaa",-     "aaaaaaaaaa",-     "aaaaaaaaaaa",-     "aaaaaaaaaaaa",-     "aaaaaaaaaaaaa",-     "aaaaaaaaaaaaaa",-     "aaaaaaaaaaaaaaa",-     "aaaaaaaaaaaaaaaa               "]-    [Nothing,-     Nothing,-     Nothing,-     Just [" 0: aaaa"],-     Just [" 1: a"],-     Just [" 0: aaaaa"],-     Just [" 1: a"],-     Just [" 0: aaaaaaa"],-     Just [" 1: a"],-     Nothing,-     Nothing,-     Just [" 0: aaaaaaaaaa"],-     Just [" 1: aaaa"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^(a\\1?)(a\\1?)(a\\2?)(a\\3?)$" []-    ["a",-     "aa",-     "aaa",-     "aaaa",-     "aaaaa",-     "aaaaaa",-     "aaaaaaa",-     "aaaaaaaa",-     "aaaaaaaaa",-     "aaaaaaaaaa",-     "aaaaaaaaaaa",-     "aaaaaaaaaaaa",-     "aaaaaaaaaaaaa",-     "aaaaaaaaaaaaaa",-     "aaaaaaaaaaaaaaa",-     "aaaaaaaaaaaaaaaa               "]-    [Nothing,-     Nothing,-     Nothing,-     Just [" 0: aaaa"],-     Just [" 1: a"],-     Just [" 2: a"],-     Just [" 3: a"],-     Just [" 4: a"],-     Just [" 0: aaaaa"],-     Just [" 1: a"],-     Just [" 2: aa"],-     Just [" 3: a"],-     Just [" 4: a"],-     Just [" 0: aaaaaa"],-     Just [" 1: a"],-     Just [" 2: aa"],-     Just [" 3: a"],-     Just [" 4: aa"],-     Just [" 0: aaaaaaa"],-     Just [" 1: a"],-     Just [" 2: aa"],-     Just [" 3: aaa"],-     Just [" 4: a"],-     Nothing,-     Nothing,-     Just [" 0: aaaaaaaaaa"],-     Just [" 1: a"],-     Just [" 2: aa"],-     Just [" 3: aaa"],-     Just [" 4: aaaa"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "The following tests are taken from the Perl 5.005 test suite; some of them" []-    ["/are compatible with 5.004, but I'd rather not have to sort them out./"]-    [Just ["/are compatible with 5.004, but I'd rather not have to sort them out./"],-     Nothing]-,---testRegex "abc" []-    ["abc",-     "xabcy",-     "ababc",-     "*** Failers",-     "xbc",-     "axc",-     "abx"]-    [Just [" 0: abc"],-     Just [" 0: abc"],-     Just [" 0: abc"],-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "ab*c" []-    ["abc"]-    [Just [" 0: abc"]]-,---testRegex "ab*bc" []-    ["abc",-     "abbc",-     "abbbbc"]-    [Just [" 0: abc"],-     Just [" 0: abbc"],-     Just [" 0: abbbbc"]]-,---testRegex ".{1}" []-    ["abbbbc"]-    [Just [" 0: a"]]-,---testRegex ".{3,4}" []-    ["abbbbc"]-    [Just [" 0: abbb"]]-,---testRegex "ab{0,}bc" []-    ["abbbbc"]-    [Just [" 0: abbbbc"]]-,---testRegex "ab+bc" []-    ["abbc",-     "*** Failers",-     "abc",-     "abq"]-    [Just [" 0: abbc"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "ab{1,}bc" []-    []-    []-,---testRegex "ab+bc" []-    ["abbbbc"]-    [Just [" 0: abbbbc"]]-,---testRegex "ab{1,}bc" []-    ["abbbbc"]-    [Just [" 0: abbbbc"]]-,---testRegex "ab{1,3}bc" []-    ["abbbbc"]-    [Just [" 0: abbbbc"]]-,---testRegex "ab{3,4}bc" []-    ["abbbbc"]-    [Just [" 0: abbbbc"]]-,---testRegex "ab{4,5}bc" []-    ["*** Failers",-     "abq",-     "abbbbc"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "ab?bc" []-    ["abbc",-     "abc"]-    [Just [" 0: abbc"],-     Just [" 0: abc"]]-,---testRegex "ab{0,1}bc" []-    ["abc"]-    [Just [" 0: abc"]]-,---testRegex "ab?bc" []-    []-    []-,---testRegex "ab?c" []-    ["abc"]-    [Just [" 0: abc"]]-,---testRegex "ab{0,1}c" []-    ["abc"]-    [Just [" 0: abc"]]-,---testRegex "^abc$" []-    ["abc",-     "*** Failers",-     "abbbbc",-     "abcc"]-    [Just [" 0: abc"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^abc" []-    ["abcc"]-    [Just [" 0: abc"]]-,---testRegex "^abc$" []-    []-    []-,---testRegex "abc$" []-    ["aabc",-     "*** Failers",-     "aabc",-     "aabcd"]-    [Just [" 0: abc"],-     Nothing,-     Just [" 0: abc"],-     Nothing]-,---testRegex "^" []-    ["abc"]-    [Just [" 0: "]]-,---testRegex "$" []-    ["abc"]-    [Just [" 0: "]]-,---testRegex "a.c" []-    ["abc",-     "axc"]-    [Just [" 0: abc"],-     Just [" 0: axc"]]-,---testRegex "a.*c" []-    ["axyzc"]-    [Just [" 0: axyzc"]]-,---testRegex "a[bc]d" []-    ["abd",-     "*** Failers",-     "axyzd",-     "abc"]-    [Just [" 0: abd"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "a[b-d]e" []-    ["ace"]-    [Just [" 0: ace"]]-,---testRegex "a[b-d]" []-    ["aac"]-    [Just [" 0: ac"]]-,---testRegex "a[-b]" []-    ["a-"]-    [Just [" 0: a-"]]-,---testRegex "a[b-]" []-    ["a-"]-    [Just [" 0: a-"]]-,---testRegex "a]" []-    ["a]"]-    [Just [" 0: a]"]]-,---testRegex "a[]]b" []-    ["a]b"]-    [Just [" 0: a]b"]]-,---testRegex "a[^bc]d" []-    ["aed",-     "*** Failers",-     "abd",-     "abd"]-    [Just [" 0: aed"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "a[^-b]c" []-    ["adc"]-    [Just [" 0: adc"]]-,---testRegex "a[^]b]c" []-    ["adc",-     "*** Failers",-     "a-c",-     "a]c"]-    [Just [" 0: adc"],-     Nothing,-     Just [" 0: a-c"],-     Nothing]-,---testRegex "\\ba\\b" []-    ["a-",-     "-a",-     "-a-"]-    [Just [" 0: a"],-     Just [" 0: a"],-     Just [" 0: a"]]-,---testRegex "\\by\\b" []-    ["*** Failers",-     "xy",-     "yz",-     "xyz"]-    [Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "\\Ba\\B" []-    ["*** Failers",-     "a-",-     "-a",-     "-a-"]-    [Just [" 0: a"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "\\By\\b" []-    ["xy"]-    [Just [" 0: y"]]-,---testRegex "\\by\\B" []-    ["yz"]-    [Just [" 0: y"]]-,---testRegex "\\By\\B" []-    ["xyz"]-    [Just [" 0: y"]]-,---testRegex "\\w" []-    ["a"]-    [Just [" 0: a"]]-,---testRegex "\\W" []-    ["-",-     "*** Failers",-     "-",-     "a"]-    [Just [" 0: -"],-     Just [" 0: *"],-     Just [" 0: -"],-     Nothing]-,---testRegex "a\\sb" []-    ["a b"]-    [Just [" 0: a b"]]-,---testRegex "a\\Sb" []-    ["a-b",-     "*** Failers",-     "a-b",-     "a b"]-    [Just [" 0: a-b"],-     Nothing,-     Just [" 0: a-b"],-     Nothing]-,---testRegex "\\d" []-    ["1"]-    [Just [" 0: 1"]]-,---testRegex "\\D" []-    ["-",-     "*** Failers",-     "-",-     "1"]-    [Just [" 0: -"],-     Just [" 0: *"],-     Just [" 0: -"],-     Nothing]-,---testRegex "[\\w]" []-    ["a"]-    [Just [" 0: a"]]-,---testRegex "[\\W]" []-    ["-",-     "*** Failers",-     "-",-     "a"]-    [Just [" 0: -"],-     Just [" 0: *"],-     Just [" 0: -"],-     Nothing]-,---testRegex "a[\\s]b" []-    ["a b"]-    [Just [" 0: a b"]]-,---testRegex "a[\\S]b" []-    ["a-b",-     "*** Failers",-     "a-b",-     "a b"]-    [Just [" 0: a-b"],-     Nothing,-     Just [" 0: a-b"],-     Nothing]-,---testRegex "[\\d]" []-    ["1"]-    [Just [" 0: 1"]]-,---testRegex "[\\D]" []-    ["-",-     "*** Failers",-     "-",-     "1"]-    [Just [" 0: -"],-     Just [" 0: *"],-     Just [" 0: -"],-     Nothing]-,---testRegex "ab|cd" []-    ["abc",-     "abcd"]-    [Just [" 0: ab"],-     Just [" 0: ab"]]-,---testRegex "()ef" []-    ["def"]-    [Just [" 0: ef"],-     Just [" 1: "]]-,---testRegex "$b" []-    []-    []-,---testRegex "a\\(b" []-    ["a(b"]-    [Just [" 0: a(b"]]-,---testRegex "a\\(*b" []-    ["ab",-     "a((b"]-    [Just [" 0: ab"],-     Just [" 0: a((b"]]-,---testRegex "a\\\\b" []-    ["a\\b"]-    [Nothing]-,---testRegex "((a))" []-    ["abc"]-    [Just [" 0: a"],-     Just [" 1: a"],-     Just [" 2: a"]]-,---testRegex "(a)b(c)" []-    ["abc"]-    [Just [" 0: abc"],-     Just [" 1: a"],-     Just [" 2: c"]]-,---testRegex "a+b+c" []-    ["aabbabc"]-    [Just [" 0: abc"]]-,---testRegex "a{1,}b{1,}c" []-    ["aabbabc"]-    [Just [" 0: abc"]]-,---testRegex "a.+?c" []-    ["abcabc"]-    [Just [" 0: abc"]]-,---testRegex "(a+|b)*" []-    ["ab"]-    [Just [" 0: ab"],-     Just [" 1: b"]]-,---testRegex "(a+|b){0,}" []-    ["ab"]-    [Just [" 0: ab"],-     Just [" 1: b"]]-,---testRegex "(a+|b)+" []-    ["ab"]-    [Just [" 0: ab"],-     Just [" 1: b"]]-,---testRegex "(a+|b){1,}" []-    ["ab"]-    [Just [" 0: ab"],-     Just [" 1: b"]]-,---testRegex "(a+|b)?" []-    ["ab"]-    [Just [" 0: a"],-     Just [" 1: a"]]-,---testRegex "(a+|b){0,1}" []-    ["ab"]-    [Just [" 0: a"],-     Just [" 1: a"]]-,---testRegex "[^ab]*" []-    ["cde"]-    [Just [" 0: cde"]]-,---testRegex "abc" []-    ["*** Failers",-     "b",-     ""]-    [Nothing,-     Nothing]-,---testRegex "a*" []-    [""]-    []-,---testRegex "([abc])*d" []-    ["abbbcd"]-    [Just [" 0: abbbcd"],-     Just [" 1: c"]]-,---testRegex "([abc])*bcd" []-    ["abcd"]-    [Just [" 0: abcd"],-     Just [" 1: a"]]-,---testRegex "a|b|c|d|e" []-    ["e"]-    [Just [" 0: e"]]-,---testRegex "(a|b|c|d|e)f" []-    ["ef"]-    [Just [" 0: ef"],-     Just [" 1: e"]]-,---testRegex "abcd*efg" []-    ["abcdefg"]-    [Just [" 0: abcdefg"]]-,---testRegex "ab*" []-    ["xabyabbbz",-     "xayabbbz"]-    [Just [" 0: ab"],-     Just [" 0: a"]]-,---testRegex "(ab|cd)e" []-    ["abcde"]-    [Just [" 0: cde"],-     Just [" 1: cd"]]-,---testRegex "[abhgefdc]ij" []-    ["hij"]-    [Just [" 0: hij"]]-,---testRegex "^(ab|cd)e" []-    []-    []-,---testRegex "(abc|)ef" []-    ["abcdef"]-    [Just [" 0: ef"],-     Just [" 1: "]]-,---testRegex "(a|b)c*d" []-    ["abcd"]-    [Just [" 0: bcd"],-     Just [" 1: b"]]-,---testRegex "(ab|ab*)bc" []-    ["abc"]-    [Just [" 0: abc"],-     Just [" 1: a"]]-,---testRegex "a([bc]*)c*" []-    ["abc"]-    [Just [" 0: abc"],-     Just [" 1: bc"]]-,---testRegex "a([bc]*)(c*d)" []-    ["abcd"]-    [Just [" 0: abcd"],-     Just [" 1: bc"],-     Just [" 2: d"]]-,---testRegex "a([bc]+)(c*d)" []-    ["abcd"]-    [Just [" 0: abcd"],-     Just [" 1: bc"],-     Just [" 2: d"]]-,---testRegex "a([bc]*)(c+d)" []-    ["abcd"]-    [Just [" 0: abcd"],-     Just [" 1: b"],-     Just [" 2: cd"]]-,---testRegex "a[bcd]*dcdcde" []-    ["adcdcde"]-    [Just [" 0: adcdcde"]]-,---testRegex "a[bcd]+dcdcde" []-    ["*** Failers",-     "abcde",-     "adcdcde"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "(ab|a)b*c" []-    ["abc"]-    [Just [" 0: abc"],-     Just [" 1: ab"]]-,---testRegex "((a)(b)c)(d)" []-    ["abcd"]-    [Just [" 0: abcd"],-     Just [" 1: abc"],-     Just [" 2: a"],-     Just [" 3: b"],-     Just [" 4: d"]]-,---testRegex "[a-zA-Z_][a-zA-Z0-9_]*" []-    ["alpha"]-    [Just [" 0: alpha"]]-,---testRegex "^a(bc+|b[eh])g|.h$" []-    ["abh"]-    [Just [" 0: bh"]]-,---testRegex "(bc+d$|ef*g.|h?i(j|k))" []-    ["effgz",-     "ij",-     "reffgz",-     "*** Failers",-     "effg",-     "bcdd"]-    [Just [" 0: effgz"],-     Just [" 1: effgz"],-     Just [" 0: ij"],-     Just [" 1: ij"],-     Just [" 2: j"],-     Just [" 0: effgz"],-     Just [" 1: effgz"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "((((((((((a))))))))))" []-    ["a"]-    [Just [" 0: a"],-     Just [" 1: a"],-     Just [" 2: a"],-     Just [" 3: a"],-     Just [" 4: a"],-     Just [" 5: a"],-     Just [" 6: a"],-     Just [" 7: a"],-     Just [" 8: a"],-     Just [" 9: a"],-     Just ["10: a"]]-,---testRegex "((((((((((a))))))))))\\10" []-    ["aa"]-    [Just [" 0: aa"],-     Just [" 1: a"],-     Just [" 2: a"],-     Just [" 3: a"],-     Just [" 4: a"],-     Just [" 5: a"],-     Just [" 6: a"],-     Just [" 7: a"],-     Just [" 8: a"],-     Just [" 9: a"],-     Just ["10: a"]]-,---testRegex "(((((((((a)))))))))" []-    ["a"]-    [Just [" 0: a"],-     Just [" 1: a"],-     Just [" 2: a"],-     Just [" 3: a"],-     Just [" 4: a"],-     Just [" 5: a"],-     Just [" 6: a"],-     Just [" 7: a"],-     Just [" 8: a"],-     Just [" 9: a"]]-,---testRegex "multiple words of text" []-    ["*** Failers",-     "aa",-     "uh-uh"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "multiple words" []-    ["multiple words, yeah"]-    [Just [" 0: multiple words"]]-,---testRegex "(.*)c(.*)" []-    ["abcde"]-    [Just [" 0: abcde"],-     Just [" 1: ab"],-     Just [" 2: de"]]-,---testRegex "\\((.*), (.*)\\)" []-    ["(a, b)"]-    [Just [" 0: (a, b)"],-     Just [" 1: a"],-     Just [" 2: b"]]-,---testRegex "[k]" []-    []-    []-,---testRegex "abcd" []-    ["abcd"]-    [Just [" 0: abcd"]]-,---testRegex "a(bc)d" []-    ["abcd"]-    [Just [" 0: abcd"],-     Just [" 1: bc"]]-,---testRegex "a[-]?c" []-    ["ac"]-    [Just [" 0: ac"]]-,---testRegex "(abc)\\1" []-    ["abcabc"]-    [Just [" 0: abcabc"],-     Just [" 1: abc"]]-,---testRegex "([a-c]*)\\1" []-    ["abcabc"]-    [Just [" 0: abcabc"],-     Just [" 1: abc"]]-,---testRegex "(a)|\\1" []-    ["a",-     "*** Failers",-     "ab",-     "x"]-    [Just [" 0: a"],-     Just [" 1: a"],-     Just [" 0: a"],-     Just [" 1: a"],-     Just [" 0: a"],-     Just [" 1: a"],-     Nothing]-,---testRegex "(([a-c])b*?\\2)*" []-    ["ababbbcbc"]-    [Just [" 0: ababb"],-     Just [" 1: bb"],-     Just [" 2: b"]]-,---testRegex "(([a-c])b*?\\2){3}" []-    ["ababbbcbc"]-    [Just [" 0: ababbbcbc"],-     Just [" 1: cbc"],-     Just [" 2: c"]]-,---testRegex "((\\3|b)\\2(a)x)+" []-    ["aaaxabaxbaaxbbax"]-    [Just [" 0: bbax"],-     Just [" 1: bbax"],-     Just [" 2: b"],-     Just [" 3: a"]]-,---testRegex "((\\3|b)\\2(a)){2,}" []-    ["bbaababbabaaaaabbaaaabba"]-    [Just [" 0: bbaaaabba"],-     Just [" 1: bba"],-     Just [" 2: b"],-     Just [" 3: a"]]-,---testRegex "abc" [caseless]-    ["ABC",-     "XABCY",-     "ABABC",-     "*** Failers",-     "aaxabxbaxbbx",-     "XBC",-     "AXC",-     "ABX"]-    [Just [" 0: ABC"],-     Just [" 0: ABC"],-     Just [" 0: ABC"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "ab*c" [caseless]-    ["ABC"]-    [Just [" 0: ABC"]]-,---testRegex "ab*bc" [caseless]-    ["ABC",-     "ABBC"]-    [Just [" 0: ABC"],-     Just [" 0: ABBC"]]-,---testRegex "ab*?bc" [caseless]-    ["ABBBBC"]-    [Just [" 0: ABBBBC"]]-,---testRegex "ab{0,}?bc" [caseless]-    ["ABBBBC"]-    [Just [" 0: ABBBBC"]]-,---testRegex "ab+?bc" [caseless]-    ["ABBC"]-    [Just [" 0: ABBC"]]-,---testRegex "ab+bc" [caseless]-    ["*** Failers",-     "ABC",-     "ABQ"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "ab{1,}bc" [caseless]-    []-    []-,---testRegex "ab+bc" [caseless]-    ["ABBBBC"]-    [Just [" 0: ABBBBC"]]-,---testRegex "ab{1,}?bc" [caseless]-    ["ABBBBC"]-    [Just [" 0: ABBBBC"]]-,---testRegex "ab{1,3}?bc" [caseless]-    ["ABBBBC"]-    [Just [" 0: ABBBBC"]]-,---testRegex "ab{3,4}?bc" [caseless]-    ["ABBBBC"]-    [Just [" 0: ABBBBC"]]-,---testRegex "ab{4,5}?bc" [caseless]-    ["*** Failers",-     "ABQ",-     "ABBBBC"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "ab??bc" [caseless]-    ["ABBC",-     "ABC"]-    [Just [" 0: ABBC"],-     Just [" 0: ABC"]]-,---testRegex "ab{0,1}?bc" [caseless]-    ["ABC"]-    [Just [" 0: ABC"]]-,---testRegex "ab??bc" [caseless]-    []-    []-,---testRegex "ab??c" [caseless]-    ["ABC"]-    [Just [" 0: ABC"]]-,---testRegex "ab{0,1}?c" [caseless]-    ["ABC"]-    [Just [" 0: ABC"]]-,---testRegex "^abc$" [caseless]-    ["ABC",-     "*** Failers",-     "ABBBBC",-     "ABCC"]-    [Just [" 0: ABC"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^abc" [caseless]-    ["ABCC"]-    [Just [" 0: ABC"]]-,---testRegex "^abc$" [caseless]-    []-    []-,---testRegex "abc$" [caseless]-    ["AABC"]-    [Just [" 0: ABC"]]-,---testRegex "^" [caseless]-    ["ABC"]-    [Just [" 0: "]]-,---testRegex "$" [caseless]-    ["ABC"]-    [Just [" 0: "]]-,---testRegex "a.c" [caseless]-    ["ABC",-     "AXC"]-    [Just [" 0: ABC"],-     Just [" 0: AXC"]]-,---testRegex "a.*?c" [caseless]-    ["AXYZC"]-    [Just [" 0: AXYZC"]]-,---testRegex "a.*c" [caseless]-    ["*** Failers",-     "AABC",-     "AXYZD"]-    [Nothing,-     Just [" 0: AABC"],-     Nothing]-,---testRegex "a[bc]d" [caseless]-    ["ABD"]-    [Just [" 0: ABD"]]-,---testRegex "a[b-d]e" [caseless]-    ["ACE",-     "*** Failers",-     "ABC",-     "ABD"]-    [Just [" 0: ACE"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "a[b-d]" [caseless]-    ["AAC"]-    [Just [" 0: AC"]]-,---testRegex "a[-b]" [caseless]-    ["A-"]-    [Just [" 0: A-"]]-,---testRegex "a[b-]" [caseless]-    ["A-"]-    [Just [" 0: A-"]]-,---testRegex "a]" [caseless]-    ["A]"]-    [Just [" 0: A]"]]-,---testRegex "a[]]b" [caseless]-    ["A]B"]-    [Just [" 0: A]B"]]-,---testRegex "a[^bc]d" [caseless]-    ["AED"]-    [Just [" 0: AED"]]-,---testRegex "a[^-b]c" [caseless]-    ["ADC",-     "*** Failers",-     "ABD",-     "A-C"]-    [Just [" 0: ADC"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "a[^]b]c" [caseless]-    ["ADC"]-    [Just [" 0: ADC"]]-,---testRegex "ab|cd" [caseless]-    ["ABC",-     "ABCD"]-    [Just [" 0: AB"],-     Just [" 0: AB"]]-,---testRegex "()ef" [caseless]-    ["DEF"]-    [Just [" 0: EF"],-     Just [" 1: "]]-,---testRegex "$b" [caseless]-    ["*** Failers",-     "A]C",-     "B"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "a\\(b" [caseless]-    ["A(B"]-    [Just [" 0: A(B"]]-,---testRegex "a\\(*b" [caseless]-    ["AB",-     "A((B"]-    [Just [" 0: AB"],-     Just [" 0: A((B"]]-,---testRegex "a\\\\b" [caseless]-    ["A\\B"]-    [Nothing]-,---testRegex "((a))" [caseless]-    ["ABC"]-    [Just [" 0: A"],-     Just [" 1: A"],-     Just [" 2: A"]]-,---testRegex "(a)b(c)" [caseless]-    ["ABC"]-    [Just [" 0: ABC"],-     Just [" 1: A"],-     Just [" 2: C"]]-,---testRegex "a+b+c" [caseless]-    ["AABBABC"]-    [Just [" 0: ABC"]]-,---testRegex "a{1,}b{1,}c" [caseless]-    ["AABBABC"]-    [Just [" 0: ABC"]]-,---testRegex "a.+?c" [caseless]-    ["ABCABC"]-    [Just [" 0: ABC"]]-,---testRegex "a.*?c" [caseless]-    ["ABCABC"]-    [Just [" 0: ABC"]]-,---testRegex "a.{0,5}?c" [caseless]-    ["ABCABC"]-    [Just [" 0: ABC"]]-,---testRegex "(a+|b)*" [caseless]-    ["AB"]-    [Just [" 0: AB"],-     Just [" 1: B"]]-,---testRegex "(a+|b){0,}" [caseless]-    ["AB"]-    [Just [" 0: AB"],-     Just [" 1: B"]]-,---testRegex "(a+|b)+" [caseless]-    ["AB"]-    [Just [" 0: AB"],-     Just [" 1: B"]]-,---testRegex "(a+|b){1,}" [caseless]-    ["AB"]-    [Just [" 0: AB"],-     Just [" 1: B"]]-,---testRegex "(a+|b)?" [caseless]-    ["AB"]-    [Just [" 0: A"],-     Just [" 1: A"]]-,---testRegex "(a+|b){0,1}" [caseless]-    ["AB"]-    [Just [" 0: A"],-     Just [" 1: A"]]-,---testRegex "(a+|b){0,1}?" [caseless]-    ["AB"]-    [Just [" 0: "]]-,---testRegex "[^ab]*" [caseless]-    ["CDE"]-    [Just [" 0: CDE"]]-,---testRegex "abc" [caseless]-    []-    []-,---testRegex "a*" [caseless]-    [""]-    []-,---testRegex "([abc])*d" [caseless]-    ["ABBBCD"]-    [Just [" 0: ABBBCD"],-     Just [" 1: C"]]-,---testRegex "([abc])*bcd" [caseless]-    ["ABCD"]-    [Just [" 0: ABCD"],-     Just [" 1: A"]]-,---testRegex "a|b|c|d|e" [caseless]-    ["E"]-    [Just [" 0: E"]]-,---testRegex "(a|b|c|d|e)f" [caseless]-    ["EF"]-    [Just [" 0: EF"],-     Just [" 1: E"]]-,---testRegex "abcd*efg" [caseless]-    ["ABCDEFG"]-    [Just [" 0: ABCDEFG"]]-,---testRegex "ab*" [caseless]-    ["XABYABBBZ",-     "XAYABBBZ"]-    [Just [" 0: AB"],-     Just [" 0: A"]]-,---testRegex "(ab|cd)e" [caseless]-    ["ABCDE"]-    [Just [" 0: CDE"],-     Just [" 1: CD"]]-,---testRegex "[abhgefdc]ij" [caseless]-    ["HIJ"]-    [Just [" 0: HIJ"]]-,---testRegex "^(ab|cd)e" [caseless]-    ["ABCDE"]-    [Nothing]-,---testRegex "(abc|)ef" [caseless]-    ["ABCDEF"]-    [Just [" 0: EF"],-     Just [" 1: "]]-,---testRegex "(a|b)c*d" [caseless]-    ["ABCD"]-    [Just [" 0: BCD"],-     Just [" 1: B"]]-,---testRegex "(ab|ab*)bc" [caseless]-    ["ABC"]-    [Just [" 0: ABC"],-     Just [" 1: A"]]-,---testRegex "a([bc]*)c*" [caseless]-    ["ABC"]-    [Just [" 0: ABC"],-     Just [" 1: BC"]]-,---testRegex "a([bc]*)(c*d)" [caseless]-    ["ABCD"]-    [Just [" 0: ABCD"],-     Just [" 1: BC"],-     Just [" 2: D"]]-,---testRegex "a([bc]+)(c*d)" [caseless]-    ["ABCD"]-    [Just [" 0: ABCD"],-     Just [" 1: BC"],-     Just [" 2: D"]]-,---testRegex "a([bc]*)(c+d)" [caseless]-    ["ABCD"]-    [Just [" 0: ABCD"],-     Just [" 1: B"],-     Just [" 2: CD"]]-,---testRegex "a[bcd]*dcdcde" [caseless]-    ["ADCDCDE"]-    [Just [" 0: ADCDCDE"]]-,---testRegex "a[bcd]+dcdcde" [caseless]-    []-    []-,---testRegex "(ab|a)b*c" [caseless]-    ["ABC"]-    [Just [" 0: ABC"],-     Just [" 1: AB"]]-,---testRegex "((a)(b)c)(d)" [caseless]-    ["ABCD"]-    [Just [" 0: ABCD"],-     Just [" 1: ABC"],-     Just [" 2: A"],-     Just [" 3: B"],-     Just [" 4: D"]]-,---testRegex "[a-zA-Z_][a-zA-Z0-9_]*" [caseless]-    ["ALPHA"]-    [Just [" 0: ALPHA"]]-,---testRegex "^a(bc+|b[eh])g|.h$" [caseless]-    ["ABH"]-    [Just [" 0: BH"]]-,---testRegex "(bc+d$|ef*g.|h?i(j|k))" [caseless]-    ["EFFGZ",-     "IJ",-     "REFFGZ",-     "*** Failers",-     "ADCDCDE",-     "EFFG",-     "BCDD"]-    [Just [" 0: EFFGZ"],-     Just [" 1: EFFGZ"],-     Just [" 0: IJ"],-     Just [" 1: IJ"],-     Just [" 2: J"],-     Just [" 0: EFFGZ"],-     Just [" 1: EFFGZ"],-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "((((((((((a))))))))))" [caseless]-    ["A"]-    [Just [" 0: A"],-     Just [" 1: A"],-     Just [" 2: A"],-     Just [" 3: A"],-     Just [" 4: A"],-     Just [" 5: A"],-     Just [" 6: A"],-     Just [" 7: A"],-     Just [" 8: A"],-     Just [" 9: A"],-     Just ["10: A"]]-,---testRegex "((((((((((a))))))))))\\10" [caseless]-    ["AA"]-    [Just [" 0: AA"],-     Just [" 1: A"],-     Just [" 2: A"],-     Just [" 3: A"],-     Just [" 4: A"],-     Just [" 5: A"],-     Just [" 6: A"],-     Just [" 7: A"],-     Just [" 8: A"],-     Just [" 9: A"],-     Just ["10: A"]]-,---testRegex "(((((((((a)))))))))" [caseless]-    ["A"]-    [Just [" 0: A"],-     Just [" 1: A"],-     Just [" 2: A"],-     Just [" 3: A"],-     Just [" 4: A"],-     Just [" 5: A"],-     Just [" 6: A"],-     Just [" 7: A"],-     Just [" 8: A"],-     Just [" 9: A"]]-,---testRegex "(?:(?:(?:(?:(?:(?:(?:(?:(?:(a))))))))))" [caseless]-    ["A"]-    [Just [" 0: A"],-     Just [" 1: A"]]-,---testRegex "(?:(?:(?:(?:(?:(?:(?:(?:(?:(a|b|c))))))))))" [caseless]-    ["C"]-    [Just [" 0: C"],-     Just [" 1: C"]]-,---testRegex "multiple words of text" [caseless]-    ["*** Failers",-     "AA",-     "UH-UH"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "multiple words" [caseless]-    ["MULTIPLE WORDS, YEAH"]-    [Just [" 0: MULTIPLE WORDS"]]-,---testRegex "(.*)c(.*)" [caseless]-    ["ABCDE"]-    [Just [" 0: ABCDE"],-     Just [" 1: AB"],-     Just [" 2: DE"]]-,---testRegex "\\((.*), (.*)\\)" [caseless]-    ["(A, B)"]-    [Just [" 0: (A, B)"],-     Just [" 1: A"],-     Just [" 2: B"]]-,---testRegex "[k]" [caseless]-    []-    []-,---testRegex "abcd" [caseless]-    ["ABCD"]-    [Just [" 0: ABCD"]]-,---testRegex "a(bc)d" [caseless]-    ["ABCD"]-    [Just [" 0: ABCD"],-     Just [" 1: BC"]]-,---testRegex "a[-]?c" [caseless]-    ["AC"]-    [Just [" 0: AC"]]-,---testRegex "(abc)\\1" [caseless]-    ["ABCABC"]-    [Just [" 0: ABCABC"],-     Just [" 1: ABC"]]-,---testRegex "([a-c]*)\\1" [caseless]-    ["ABCABC"]-    [Just [" 0: ABCABC"],-     Just [" 1: ABC"]]-,---testRegex "a(?!b)." []-    ["abad"]-    [Just [" 0: ad"]]-,---testRegex "a(?=d)." []-    ["abad"]-    [Just [" 0: ad"]]-,---testRegex "a(?=c|d)." []-    ["abad"]-    [Just [" 0: ad"]]-,---testRegex "a(?:b|c|d)(.)" []-    ["ace"]-    [Just [" 0: ace"],-     Just [" 1: e"]]-,---testRegex "a(?:b|c|d)*(.)" []-    ["ace"]-    [Just [" 0: ace"],-     Just [" 1: e"]]-,---testRegex "a(?:b|c|d)+?(.)" []-    ["ace",-     "acdbcdbe"]-    [Just [" 0: ace"],-     Just [" 1: e"],-     Just [" 0: acd"],-     Just [" 1: d"]]-,---testRegex "a(?:b|c|d)+(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcdbe"],-     Just [" 1: e"]]-,---testRegex "a(?:b|c|d){2}(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdb"],-     Just [" 1: b"]]-,---testRegex "a(?:b|c|d){4,5}(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcdb"],-     Just [" 1: b"]]-,---testRegex "a(?:b|c|d){4,5}?(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcd"],-     Just [" 1: d"]]-,---testRegex "((foo)|(bar))*" []-    ["foobar"]-    [Just [" 0: foobar"],-     Just [" 1: bar"],-     Just [" 2: foo"],-     Just [" 3: bar"]]-,---testRegex "a(?:b|c|d){6,7}(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcdbe"],-     Just [" 1: e"]]-,---testRegex "a(?:b|c|d){6,7}?(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcdbe"],-     Just [" 1: e"]]-,---testRegex "a(?:b|c|d){5,6}(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcdbe"],-     Just [" 1: e"]]-,---testRegex "a(?:b|c|d){5,6}?(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcdb"],-     Just [" 1: b"]]-,---testRegex "a(?:b|c|d){5,7}(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcdbe"],-     Just [" 1: e"]]-,---testRegex "a(?:b|c|d){5,7}?(.)" []-    ["acdbcdbe"]-    [Just [" 0: acdbcdb"],-     Just [" 1: b"]]-,---testRegex "a(?:b|(c|e){1,2}?|d)+?(.)" []-    ["ace"]-    [Just [" 0: ace"],-     Just [" 1: c"],-     Just [" 2: e"]]-,---testRegex "^(.+)?B" []-    ["AB"]-    [Just [" 0: AB"],-     Just [" 1: A"]]-,---testRegex "^([^a-z])|(\\^)$" []-    ["."]-    [Just [" 0: ."],-     Just [" 1: ."]]-,---testRegex "^[<>]&" []-    ["<&OUT"]-    [Just [" 0: <&"]]-,---testRegex "^(a\\1?){4}$" []-    ["aaaaaaaaaa",-     "*** Failers",-     "AB",-     "aaaaaaaaa",-     "aaaaaaaaaaa"]-    [Just [" 0: aaaaaaaaaa"],-     Just [" 1: aaaa"],-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^(a(?(1)\\1)){4}$" []-    ["aaaaaaaaaa",-     "*** Failers",-     "aaaaaaaaa",-     "aaaaaaaaaaa"]-    [Just [" 0: aaaaaaaaaa"],-     Just [" 1: aaaa"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?:(f)(o)(o)|(b)(a)(r))*" []-    ["foobar"]-    [Just [" 0: foobar"],-     Just [" 1: f"],-     Just [" 2: o"],-     Just [" 3: o"],-     Just [" 4: b"],-     Just [" 5: a"],-     Just [" 6: r"]]-,---testRegex "(?<=a)b" []-    ["ab",-     "*** Failers",-     "cb",-     "b"]-    [Just [" 0: b"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?<!c)b" []-    ["ab",-     "b",-     "b"]-    [Just [" 0: b"],-     Just [" 0: b"],-     Just [" 0: b"]]-,---testRegex "(?:..)*a" []-    ["aba"]-    [Just [" 0: aba"]]-,---testRegex "(?:..)*?a" []-    ["aba"]-    [Just [" 0: a"]]-,---testRegex "^(?:b|a(?=(.)))*\\1" []-    ["abc"]-    [Just [" 0: ab"],-     Just [" 1: b"]]-,---testRegex "^(){3,5}" []-    ["abc"]-    [Just [" 0: "],-     Just [" 1: "]]-,---testRegex "^(a+)*ax" []-    ["aax"]-    [Just [" 0: aax"],-     Just [" 1: a"]]-,---testRegex "^((a|b)+)*ax" []-    ["aax"]-    [Just [" 0: aax"],-     Just [" 1: a"],-     Just [" 2: a"]]-,---testRegex "^((a|bc)+)*ax" []-    ["aax"]-    [Just [" 0: aax"],-     Just [" 1: a"],-     Just [" 2: a"]]-,---testRegex "(a|x)*ab" []-    ["cab"]-    [Just [" 0: ab"]]-,---testRegex "(a)*ab" []-    ["cab"]-    [Just [" 0: ab"]]-,---testRegex "(?:(?i)a)b" []-    ["ab"]-    [Just [" 0: ab"]]-,---testRegex "((?i)a)b" []-    ["ab"]-    [Just [" 0: ab"],-     Just [" 1: a"]]-,---testRegex "(?:(?i)a)b" []-    ["Ab"]-    [Just [" 0: Ab"]]-,---testRegex "((?i)a)b" []-    ["Ab"]-    [Just [" 0: Ab"],-     Just [" 1: A"]]-,---testRegex "(?:(?i)a)b" []-    ["*** Failers",-     "cb",-     "aB"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "((?i)a)b" []-    []-    []-,---testRegex "(?i:a)b" []-    ["ab"]-    [Just [" 0: ab"]]-,---testRegex "((?i:a))b" []-    ["ab"]-    [Just [" 0: ab"],-     Just [" 1: a"]]-,---testRegex "(?i:a)b" []-    ["Ab"]-    [Just [" 0: Ab"]]-,---testRegex "((?i:a))b" []-    ["Ab"]-    [Just [" 0: Ab"],-     Just [" 1: A"]]-,---testRegex "(?i:a)b" []-    ["*** Failers",-     "aB",-     "aB"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "((?i:a))b" []-    []-    []-,---testRegex "(?:(?-i)a)b" [caseless]-    ["ab"]-    [Just [" 0: ab"]]-,---testRegex "((?-i)a)b" [caseless]-    ["ab"]-    [Just [" 0: ab"],-     Just [" 1: a"]]-,---testRegex "(?:(?-i)a)b" [caseless]-    ["aB"]-    [Just [" 0: aB"]]-,---testRegex "((?-i)a)b" [caseless]-    ["aB"]-    [Just [" 0: aB"],-     Just [" 1: a"]]-,---testRegex "(?:(?-i)a)b" [caseless]-    ["*** Failers",-     "aB",-     "Ab"]-    [Nothing,-     Just [" 0: aB"],-     Nothing]-,---testRegex "((?-i)a)b" [caseless]-    []-    []-,---testRegex "(?:(?-i)a)b" [caseless]-    ["aB"]-    [Just [" 0: aB"]]-,---testRegex "((?-i)a)b" [caseless]-    ["aB"]-    [Just [" 0: aB"],-     Just [" 1: a"]]-,---testRegex "(?:(?-i)a)b" [caseless]-    ["*** Failers",-     "Ab",-     "AB"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "((?-i)a)b" [caseless]-    []-    []-,---testRegex "(?-i:a)b" [caseless]-    ["ab"]-    [Just [" 0: ab"]]-,---testRegex "((?-i:a))b" [caseless]-    ["ab"]-    [Just [" 0: ab"],-     Just [" 1: a"]]-,---testRegex "(?-i:a)b" [caseless]-    ["aB"]-    [Just [" 0: aB"]]-,---testRegex "((?-i:a))b" [caseless]-    ["aB"]-    [Just [" 0: aB"],-     Just [" 1: a"]]-,---testRegex "(?-i:a)b" [caseless]-    ["*** Failers",-     "AB",-     "Ab"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "((?-i:a))b" [caseless]-    []-    []-,---testRegex "(?-i:a)b" [caseless]-    ["aB"]-    [Just [" 0: aB"]]-,---testRegex "((?-i:a))b" [caseless]-    ["aB"]-    [Just [" 0: aB"],-     Just [" 1: a"]]-,---testRegex "(?-i:a)b" [caseless]-    ["*** Failers",-     "Ab",-     "AB"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "((?-i:a))b" [caseless]-    []-    []-,---testRegex "((?-i:a.))b" [caseless]-    ["*** Failers",-     "AB",-     "a\\nB"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "((?s-i:a.))b" [caseless]-    ["a\\nB"]-    [Just [" 0: a\\x0aB"],-     Just [" 1: a\\x0a"]]-,---testRegex "(?:c|d)(?:)(?:a(?:)(?:b)(?:b(?:))(?:b(?:)(?:b)))" []-    ["cabbbb"]-    [Just [" 0: cabbbb"]]-,---testRegex "(?:c|d)(?:)(?:aaaaaaaa(?:)(?:bbbbbbbb)(?:bbbbbbbb(?:))(?:bbbbbbbb(?:)(?:bbbbbbbb)))" []-    ["caaaaaaaabbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb"]-    [Just [" 0: caaaaaaaabbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb"]]-,---testRegex "(ab)\\d\\1" [caseless]-    ["Ab4ab",-     "ab4Ab"]-    [Just [" 0: Ab4ab"],-     Just [" 1: Ab"],-     Just [" 0: ab4Ab"],-     Just [" 1: ab"]]-,---testRegex "foo\\w*\\d{4}baz" []-    ["foobar1234baz"]-    [Just [" 0: foobar1234baz"]]-,---testRegex "x(~~)*(?:(?:F)?)?" []-    ["x~~"]-    [Just [" 0: x~~"],-     Just [" 1: ~~"]]-,---testRegex "^a(?#xxx){3}c" []-    ["aaac"]-    [Just [" 0: aaac"]]-,---testRegex "^a (?#xxx) (?#yyy) {3}c" [ERROR]-    ["aaac"]-    [Just [" 0: aaac"]]-,---testRegex "(?<![cd])b" []-    ["*** Failers",-     "B\\nB",-     "dbcb"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "(?<![cd])[ab]" []-    ["dbaacb"]-    [Just [" 0: a"]]-,---testRegex "(?<!(c|d))b" []-    []-    []-,---testRegex "(?<!(c|d))[ab]" []-    ["dbaacb"]-    [Just [" 0: a"]]-,---testRegex "(?<!cd)[ab]" []-    ["cdaccb"]-    [Just [" 0: b"]]-,---testRegex "^(?:a?b?)*$" []-    ["\\",-     "a",-     "ab",-     "aaa   ",-     "*** Failers",-     "dbcb",-     "a--",-     "aa-- "]-    [Just [" 0: "],-     Just [" 0: a"],-     Just [" 0: ab"],-     Just [" 0: aaa"],-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "((?s)^a(.))((?m)^b$)" []-    ["a\\nb\\nc\\n"]-    [Just [" 0: a\\x0ab"],-     Just [" 1: a\\x0a"],-     Just [" 2: \\x0a"],-     Just [" 3: b"]]-,---testRegex "((?m)^b$)" []-    ["a\\nb\\nc\\n"]-    [Just [" 0: b"],-     Just [" 1: b"]]-,---testRegex "(?m)^b" []-    ["a\\nb\\n"]-    [Just [" 0: b"]]-,---testRegex "(?m)^(b)" []-    ["a\\nb\\n"]-    [Just [" 0: b"],-     Just [" 1: b"]]-,---testRegex "((?m)^b)" []-    ["a\\nb\\n"]-    [Just [" 0: b"],-     Just [" 1: b"]]-,---testRegex "\\n((?m)^b)" []-    ["a\\nb\\n"]-    [Just [" 0: \\x0ab"],-     Just [" 1: b"]]-,---testRegex "((?s).)c(?!.)" []-    ["a\\nb\\nc\\n",-     "a\\nb\\nc\\n"]-    [Just [" 0: \\x0ac"],-     Just [" 1: \\x0a"],-     Just [" 0: \\x0ac"],-     Just [" 1: \\x0a"]]-,---testRegex "((?s)b.)c(?!.)" []-    ["a\\nb\\nc\\n",-     "a\\nb\\nc\\n"]-    [Just [" 0: b\\x0ac"],-     Just [" 1: b\\x0a"],-     Just [" 0: b\\x0ac"],-     Just [" 1: b\\x0a"]]-,---testRegex "^b" []-    []-    []-,---testRegex "()^b" []-    ["*** Failers",-     "a\\nb\\nc\\n",-     "a\\nb\\nc\\n"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "((?m)^b)" []-    ["a\\nb\\nc\\n"]-    [Just [" 0: b"],-     Just [" 1: b"]]-,---testRegex "(?(1)a|b)" []-    []-    []-,---testRegex "(?(1)b|a)" []-    ["a"]-    [Just [" 0: a"]]-,---testRegex "(x)?(?(1)a|b)" []-    ["*** Failers",-     "a",-     "a"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "(x)?(?(1)b|a)" []-    ["a"]-    [Just [" 0: a"]]-,---testRegex "()?(?(1)b|a)" []-    ["a"]-    [Just [" 0: a"]]-,---testRegex "()(?(1)b|a)" []-    []-    []-,---testRegex "()?(?(1)a|b)" []-    ["a"]-    [Just [" 0: a"],-     Just [" 1: "]]-,---testRegex "^(\\()?blah(?(1)(\\)))$" []-    ["(blah)",-     "blah",-     "*** Failers",-     "a",-     "blah)",-     "(blah"]-    [Just [" 0: (blah)"],-     Just [" 1: ("],-     Just [" 2: )"],-     Just [" 0: blah"],-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^(\\(+)?blah(?(1)(\\)))$" []-    ["(blah)",-     "blah",-     "*** Failers",-     "blah)",-     "(blah"]-    [Just [" 0: (blah)"],-     Just [" 1: ("],-     Just [" 2: )"],-     Just [" 0: blah"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?(?!a)a|b)" []-    []-    []-,---testRegex "(?(?!a)b|a)" []-    ["a"]-    [Just [" 0: a"]]-,---testRegex "(?(?=a)b|a)" []-    ["*** Failers",-     "a",-     "a"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "(?(?=a)a|b)" []-    ["a"]-    [Just [" 0: a"]]-,---testRegex "(?=(a+?))(\\1ab)" []-    ["aaab"]-    [Just [" 0: aab"],-     Just [" 1: a"],-     Just [" 2: aab"]]-,---testRegex "^(?=(a+?))\\1ab" []-    []-    []-,---testRegex "(\\w+:)+" []-    ["one:"]-    [Just [" 0: one:"],-     Just [" 1: one:"]]-,---testRegex "$(?<=^(a))" []-    ["a"]-    [Just [" 0: "],-     Just [" 1: a"]]-,---testRegex "(?=(a+?))(\\1ab)" []-    ["aaab"]-    [Just [" 0: aab"],-     Just [" 1: a"],-     Just [" 2: aab"]]-,---testRegex "^(?=(a+?))\\1ab" []-    ["*** Failers",-     "aaab",-     "aaab"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "([\\w:]+::)?(\\w+)$" []-    ["abcd",-     "xy:z:::abcd"]-    [Just [" 0: abcd"],-     Just [" 1: <unset>"],-     Just [" 2: abcd"],-     Just [" 0: xy:z:::abcd"],-     Just [" 1: xy:z:::"],-     Just [" 2: abcd"]]-,---testRegex "^[^bcd]*(c+)" []-    ["aexycd"]-    [Just [" 0: aexyc"],-     Just [" 1: c"]]-,---testRegex "(a*)b+" []-    ["caab"]-    [Just [" 0: aab"],-     Just [" 1: aa"]]-,---testRegex "([\\w:]+::)?(\\w+)$" []-    ["abcd",-     "xy:z:::abcd",-     "*** Failers",-     "abcd:",-     "abcd:"]-    [Just [" 0: abcd"],-     Just [" 1: <unset>"],-     Just [" 2: abcd"],-     Just [" 0: xy:z:::abcd"],-     Just [" 1: xy:z:::"],-     Just [" 2: abcd"],-     Just [" 0: Failers"],-     Just [" 1: <unset>"],-     Just [" 2: Failers"],-     Nothing,-     Nothing]-,---testRegex "^[^bcd]*(c+)" []-    ["aexycd"]-    [Just [" 0: aexyc"],-     Just [" 1: c"]]-,---testRegex "(>a+)ab" []-    []-    []-,---testRegex "(?>a+)b" []-    ["aaab"]-    [Just [" 0: aaab"]]-,---testRegex "([[:]+)" []-    ["a:[b]:"]-    [Just [" 0: :["],-     Just [" 1: :["]]-,---testRegex "([[=]+)" []-    ["a=[b]="]-    [Just [" 0: =["],-     Just [" 1: =["]]-,---testRegex "([[.]+)" []-    ["a.[b]."]-    [Just [" 0: .["],-     Just [" 1: .["]]-,---testRegex "((?>a+)b)" []-    ["aaab"]-    [Just [" 0: aaab"],-     Just [" 1: aaab"]]-,---testRegex "(?>(a+))b" []-    ["aaab"]-    [Just [" 0: aaab"],-     Just [" 1: aaa"]]-,---testRegex "((?>[^()]+)|\\([^()]*\\))+" []-    ["((abc(ade)ufh()()x"]-    [Just [" 0: abc(ade)ufh()()x"],-     Just [" 1: x"]]-,---testRegex "a\\Z" []-    ["*** Failers",-     "aaab",-     "a\\nb\\n"]-    [Nothing,-     Nothing,-     Nothing]-,---testRegex "b\\Z" []-    ["a\\nb\\n"]-    [Just [" 0: b"]]-,---testRegex "b\\z" []-    []-    []-,---testRegex "b\\Z" []-    ["a\\nb"]-    [Just [" 0: b"]]-,---testRegex "b\\z" []-    ["a\\nb",-     "*** Failers",-     "",-     "/^(?>(?(1)\\.|())[^\\W_](?>[a-z0-9-]*[^\\W_])?)+$/",-     "a",-     "abc",-     "a-b",-     "0-9 ",-     "a.b",-     "5.6.7  ",-     "the.quick.brown.fox",-     "a100.b200.300c  ",-     "12-ab.1245 ",-     "*** Failers",-     "\\",-     ".a",-     "-a",-     "a-",-     "a.  ",-     "a_b ",-     "a.-",-     "a..  ",-     "ab..bc ",-     "the.quick.brown.fox-",-     "the.quick.brown.fox.",-     "the.quick.brown.fox_",-     "the.quick.brown.fox+       "]-    [Just [" 0: b"],-     Nothing,-     Just ["/^(?>(?(1)\\.|())[^\\W_](?>[a-z0-9-]*[^\\W_])?)+$/"],-     Just [" 0: a"],-     Just [" 1: "],-     Just [" 0: abc"],-     Just [" 1: "],-     Just [" 0: a-b"],-     Just [" 1: "],-     Just [" 0: 0-9"],-     Just [" 1: "],-     Just [" 0: a.b"],-     Just [" 1: "],-     Just [" 0: 5.6.7"],-     Just [" 1: "],-     Just [" 0: the.quick.brown.fox"],-     Just [" 1: "],-     Just [" 0: a100.b200.300c"],-     Just [" 1: "],-     Just [" 0: 12-ab.1245"],-     Just [" 1: "],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(?>.*)(?<=(abcd|wxyz))" []-    ["alphabetabcd",-     "endingwxyz",-     "*** Failers",-     "a rather long string that doesn't end with one of them"]-    [Just [" 0: alphabetabcd"],-     Just [" 1: abcd"],-     Just [" 0: endingwxyz"],-     Just [" 1: wxyz"],-     Nothing,-     Nothing]-,---testRegex "word (?>(?:(?!otherword)[a-zA-Z0-9]+ ){0,30})otherword" []-    ["word cat dog elephant mussel cow horse canary baboon snake shark otherword",-     "word cat dog elephant mussel cow horse canary baboon snake shark",-     "",-     "/word (?>[a-zA-Z0-9]+ ){0,30}otherword/",-     "word cat dog elephant mussel cow horse canary baboon snake shark the quick brown fox and the lazy dog and several other words getting close to thirty by now I hope"]-    [Just [" 0: word cat dog elephant mussel cow horse canary baboon snake shark otherword"],-     Nothing,-     Just ["/word (?>[a-zA-Z0-9]+ ){0,30}otherword/"],-     Nothing]-,---testRegex "(?<=\\d{3}(?!999))foo" []-    ["999foo",-     "123999foo ",-     "*** Failers",-     "123abcfoo",-     "",-     "/(?<=(?!...999)\\d{3})foo/",-     "999foo",-     "123999foo ",-     "*** Failers",-     "123abcfoo"]-    [Just [" 0: foo"],-     Just [" 0: foo"],-     Nothing,-     Nothing,-     Just ["/(?<=(?!...999)\\d{3})foo/"],-     Just [" 0: foo"],-     Just [" 0: foo"],-     Nothing,-     Nothing]-,---testRegex "(?<=\\d{3}(?!999)...)foo" []-    ["123abcfoo",-     "123456foo ",-     "*** Failers",-     "123999foo  ",-     "",-     "/(?<=\\d{3}...)(?<!999)foo/",-     "123abcfoo   ",-     "123456foo ",-     "*** Failers",-     "123999foo  "]-    [Just [" 0: foo"],-     Just [" 0: foo"],-     Nothing,-     Nothing,-     Just ["/(?<=\\d{3}...)(?<!999)foo/"],-     Just [" 0: foo"],-     Just [" 0: foo"],-     Nothing,-     Nothing]-,---testRegex "ERROR" []-    ["([\\\"\\'])?                       # find single or double quote",-     "(?(1) (.*?)\\1 | ([^\\s]+))       # if quote found, match up to next matching",-     "# quote, otherwise match up to next space",-     "/isx",-     "<a href=abcd xyz",-     "<a href=\\\"abcd xyz pqr\\\" cats",-     "<a href=\\'abcd xyz pqr\\' cats"]-    [Just [" ([\\\"\\'])?                       # find single or double quote"],-     Just [" (?(1) (.*?)\\1 | ([^\\s]+))       # if quote found, match up to next matching"],-     Just ["/isx"],-     Just [" 0: <a href=abcd"],-     Just [" 1: <unset>"],-     Just [" 2: <unset>"],-     Just [" 3: abcd"],-     Just [" 0: <a href=\"abcd xyz pqr\""],-     Just [" 1: \""],-     Just [" 2: abcd xyz pqr"],-     Just [" 0: <a href='abcd xyz pqr'"],-     Just [" 1: '"],-     Just [" 2: abcd xyz pqr"]]-,---testRegex "ERROR" []-    ["([\"'])?                         # find single or double quote",-     "(?(1) (.*?)\\1 | (\\S+))          # if quote found, match up to next matching",-     "# quote, otherwise match up to next space",-     "/isx",-     "<a href=abcd xyz",-     "<a href=\\\"abcd xyz pqr\\\" cats",-     "<a href       =       \\'abcd xyz pqr\\' cats"]-    [Just [" ([\"'])?                         # find single or double quote"],-     Just [" (?(1) (.*?)\\1 | (\\S+))          # if quote found, match up to next matching"],-     Just ["/isx"],-     Just [" 0: <a href=abcd"],-     Just [" 1: <unset>"],-     Just [" 2: <unset>"],-     Just [" 3: abcd"],-     Just [" 0: <a href=\"abcd xyz pqr\""],-     Just [" 1: \""],-     Just [" 2: abcd xyz pqr"],-     Just [" 0: <a href       =       'abcd xyz pqr'"],-     Just [" 1: '"],-     Just [" 2: abcd xyz pqr"]]-,---testRegex "ERROR" []-    ["([\"'])?                         # find single or double quote",-     "(?(1) (.*?)\\1 | (\\S+))          # if quote found, match up to next matching",-     "# quote, otherwise match up to next space",-     "/isx",-     "<a href=abcd xyz",-     "<a href=\\\"abcd xyz pqr\\\" cats",-     "<a href       =       \\'abcd xyz pqr\\' cats"]-    [Just [" ([\"'])?                         # find single or double quote"],-     Just [" (?(1) (.*?)\\1 | (\\S+))          # if quote found, match up to next matching"],-     Just ["/isx"],-     Just [" 0: <a href=abcd"],-     Just [" 1: <unset>"],-     Just [" 2: <unset>"],-     Just [" 3: abcd"],-     Just [" 0: <a href=\"abcd xyz pqr\""],-     Just [" 1: \""],-     Just [" 2: abcd xyz pqr"],-     Just [" 0: <a href       =       'abcd xyz pqr'"],-     Just [" 1: '"],-     Just [" 2: abcd xyz pqr"]]-,---testRegex "((Z)+|A)*" []-    ["ZABCDEFG"]-    [Just [" 0: ZA"],-     Just [" 1: A"],-     Just [" 2: Z"]]-,---testRegex "(Z()|A)*" []-    ["ZABCDEFG"]-    [Just [" 0: ZA"],-     Just [" 1: A"],-     Just [" 2: "]]-,---testRegex "(Z(())|A)*" []-    ["ZABCDEFG"]-    [Just [" 0: ZA"],-     Just [" 1: A"],-     Just [" 2: "],-     Just [" 3: "]]-,---testRegex "((?>Z)+|A)*" []-    ["ZABCDEFG"]-    [Just [" 0: ZA"],-     Just [" 1: A"]]-,---testRegex "((?>)+|A)*" []-    ["ZABCDEFG"]-    [Just [" 0: "],-     Just [" 1: "]]-,---testRegex "a*" [ERROR]-    ["abbab"]-    [Just [" 0: a"],-     Just [" 0: "],-     Just [" 0: "],-     Just [" 0: a"],-     Just [" 0: "],-     Just [" 0: "]]-,---testRegex "^[a-\\d]" []-    ["abcde",-     "-things",-     "0digit",-     "*** Failers",-     "bcdef    "]-    [Just [" 0: a"],-     Just [" 0: -"],-     Just [" 0: 0"],-     Nothing,-     Nothing]-,---testRegex "^[\\d-a]" []-    ["abcde",-     "-things",-     "0digit",-     "*** Failers",-     "bcdef    ",-     "",-     "/[[:space:]]+/",-     "> \\x09\\x0a\\x0c\\x0d\\x0b<",-     "",-     "/[[:blank:]]+/",-     "> \\x09\\x0a\\x0c\\x0d\\x0b<",-     "",-     "/[\\s]+/",-     "> \\x09\\x0a\\x0c\\x0d\\x0b<",-     "",-     "/\\s+/",-     "> \\x09\\x0a\\x0c\\x0d\\x0b<",-     "",-     "/a\vb/x",-     "ab"]-    [Just [" 0: a"],-     Just [" 0: -"],-     Just [" 0: 0"],-     Nothing,-     Nothing,-     Just ["/[[:space:]]+/"],-     Just [" 0:  \\x09\\x0a\\x0c\\x0d\\x0b"],-     Just ["/[[:blank:]]+/"],-     Just [" 0:  \\x09"],-     Just ["/[\\s]+/"],-     Just [" 0:  \\x09\\x0a\\x0c\\x0d"],-     Just ["/\\s+/"],-     Just [" 0:  \\x09\\x0a\\x0c\\x0d"],-     Just ["/a\vb/x"],-     Nothing]-,---testRegex "(?!\\A)x" [ERROR]-    ["a\\nxb\\n"]-    [Just [" 0: x"]]-,---testRegex "(?!^)x" [ERROR]-    ["a\\nxb\\n"]-    [Nothing]-,---testRegex "abc\\Qabc\\Eabc" []-    ["abcabcabc",-     "",-     "/abc\\Q(*+|\\Eabc/",-     "abc(*+|abc "]-    [Just [" 0: abcabcabc"],-     Just ["/abc\\Q(*+|\\Eabc/"],-     Just [" 0: abc(*+|abc"]]-,---testRegex "   abc\\Q abc\\Eabc" [ERROR]-    ["abc abcabc",-     "*** Failers",-     "abcabcabc  ",-     "",-     "/abc#comment",-     "\\Q#not comment",-     "literal\\E/x",-     "abc#not comment\\n    literal     "]-    [Just [" 0: abc abcabc"],-     Nothing,-     Nothing,-     Just ["/abc#comment"],-     Just [" 0: abc#not comment\\x0a    literal"]]-,---testRegex "ERROR" []-    ["\\Q#not comment",-     "literal/x",-     "abc#not comment\\n    literal     "]-    [Just [" 0: abc#not comment\\x0a    literal"]]-,---testRegex "ERROR" []-    ["\\Q#not comment",-     "literal\\E #more comment",-     "/x",-     "abc#not comment\\n    literal     "]-    [Just [" 0: abc#not comment\\x0a    literal"]]-,---testRegex "ERROR" []-    ["\\Q#not comment",-     "literal\\E #more comment/x",-     "abc#not comment\\n    literal     "]-    [Just [" 0: abc#not comment\\x0a    literal"]]-,---testRegex "\\Qabc\\$xyz\\E" []-    ["abc\\\\\\$xyz"]-    [Just [" 0: abc\\$xyz"]]-,---testRegex "\\Qabc\\E\\$\\Qxyz\\E" []-    ["abc\\$xyz"]-    [Just [" 0: abc$xyz"]]-,---testRegex "\\Gabc" []-    ["abc",-     "*** Failers",-     "xyzabc  "]-    [Just [" 0: abc"],-     Nothing,-     Nothing]-,---testRegex "\\Gabc." [ERROR]-    ["abc1abc2xyzabc3"]-    [Just [" 0: abc1"],-     Just [" 0: abc2"]]-,---testRegex "abc." [ERROR]-    ["abc1abc2xyzabc3 "]-    [Just [" 0: abc1"],-     Just [" 0: abc2"],-     Just [" 0: abc3"]]-,---testRegex "a(?x: b c )d" []-    ["XabcdY",-     "*** Failers ",-     "Xa b c d Y "]-    [Just [" 0: abcd"],-     Nothing,-     Nothing]-,---testRegex "((?x)x y z | a b c)" []-    ["XabcY",-     "AxyzB "]-    [Just [" 0: abc"],-     Just [" 1: abc"],-     Just [" 0: xyz"],-     Just [" 1: xyz"]]-,---testRegex "(?i)AB(?-i)C" []-    ["XabCY",-     "*** Failers",-     "XabcY  "]-    [Just [" 0: abC"],-     Nothing,-     Nothing]-,---testRegex "((?i)AB(?-i)C|D)E" []-    ["abCE",-     "DE",-     "*** Failers",-     "abcE",-     "abCe  ",-     "dE",-     "De    "]-    [Just [" 0: abCE"],-     Just [" 1: abC"],-     Just [" 0: DE"],-     Just [" 1: D"],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "(.*)\\d+\\1" []-    ["abc123abc",-     "abc123bc "]-    [Just [" 0: abc123abc"],-     Just [" 1: abc"],-     Just [" 0: bc123bc"],-     Just [" 1: bc"]]-,---testRegex "(.*)\\d+\\1" [ERROR]-    ["abc123abc",-     "abc123bc ",-     "",-     "/((.*))\\d+\\1/",-     "abc123abc",-     "abc123bc  "]-    [Just [" 0: abc123abc"],-     Just [" 1: abc"],-     Just [" 0: bc123bc"],-     Just [" 1: bc"],-     Just ["/((.*))\\d+\\1/"],-     Just [" 0: abc123abc"],-     Just [" 1: abc"],-     Just [" 2: abc"],-     Just [" 0: bc123bc"],-     Just [" 1: bc"],-     Just [" 2: bc"]]-,---testRegex "-- This tests for an IPv6 address in the form where it can have up to --" []-    ["/-- eight components, one and only one of which is empty. This must be --/",-     "/-- an internal component. --/"]-    [Just ["/-- eight components, one and only one of which is empty. This must be --/"],-     Nothing,-     Just ["/-- an internal component. --/"],-     Nothing]-,---testRegex "ERROR" []-    ["(?:                         # start of item",-     "(?: [0-9a-f]{1,4} |       # 1-4 hex digits or",-     "(?(1)0 | () ) )           # if null previously matched, fail; else null",-     ":                         # followed by colon",-     "){1,7}                      # end item; 1-7 of them required               ",-     "[0-9a-f]{1,4} $             # final hex number at end of string",-     "(?(1)|.)                    # check that there was an empty component",-     "/xi",-     "a123::a123",-     "a123:b342::abcd",-     "a123:b342::324e:abcd",-     "a123:ddde:b342::324e:abcd",-     "a123:ddde:b342::324e:dcba:abcd",-     "a123:ddde:9999:b342::324e:dcba:abcd",-     "*** Failers",-     "1:2:3:4:5:6:7:8",-     "a123:bce:ddde:9999:b342::324e:dcba:abcd",-     "a123::9999:b342::324e:dcba:abcd",-     "abcde:2:3:4:5:6:7:8",-     "::1",-     "abcd:fee0:123::   ",-     ":1",-     "1:  "]-    [Just [" 0: a123::a123"],-     Just [" 1: "],-     Just [" 0: a123:b342::abcd"],-     Just [" 1: "],-     Just [" 0: a123:b342::324e:abcd"],-     Just [" 1: "],-     Just [" 0: a123:ddde:b342::324e:abcd"],-     Just [" 1: "],-     Just [" 0: a123:ddde:b342::324e:dcba:abcd"],-     Just [" 1: "],-     Just [" 0: a123:ddde:9999:b342::324e:dcba:abcd"],-     Just [" 1: "],-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing,-     Nothing]-,---testRegex "[z\\Qa-d]\\E]" []-    ["z",-     "a",-     "-",-     "d",-     "] ",-     "*** Failers",-     "b     "]-    [Just [" 0: z"],-     Just [" 0: a"],-     Just [" 0: -"],-     Just [" 0: d"],-     Just [" 0: ]"],-     Just [" 0: a"],-     Nothing]-,---testRegex "[\\z\\C]" []-    ["z",-     "C ",-     "",-     "/\\M/",-     "M ",-     "",-     "/(a+)*b/",-     "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa ",-     "",-     "/(?i)reg(?:ul(?:[a\228]|ae)r|ex)/",-     "REGular",-     "regulaer",-     "Regex  ",-     "regul\228r "]-    [Just [" 0: z"],-     Just [" 0: C"],-     Just ["/\\M/"],-     Just [" 0: M"],-     Just ["/(a+)*b/"],-     Nothing,-     Just ["/(?i)reg(?:ul(?:[a\228]|ae)r|ex)/"],-     Just [" 0: REGular"],-     Just [" 0: regulaer"],-     Just [" 0: Regex"],-     Just [" 0: regul\\xe4r"]]-,---testRegex "\197\230\229\228[\224-\255\192-\223]+" []-    ["\197\230\229\228\224",-     "\197\230\229\228\255",-     "\197\230\229\228\192",-     "\197\230\229\228\223"]-    [Just [" 0: \\xc5\\xe6\\xe5\\xe4\\xe0"],-     Just [" 0: \\xc5\\xe6\\xe5\\xe4\\xff"],-     Just [" 0: \\xc5\\xe6\\xe5\\xe4\\xc0"],-     Just [" 0: \\xc5\\xe6\\xe5\\xe4\\xdf"]]-,---testRegex "(?<=Z)X." []-    ["\\x84XAZXB"]-    [Just [" 0: XB"]]-,---testRegex "ab cd (?x) de fg" []-    ["ab cd defg"]-    [Just [" 0: ab cd defg"]]-,---testRegex "ab cd(?x) de fg" []-    ["ab cddefg",-     "** Failers ",-     "abcddefg"]-    [Just [" 0: ab cddefg"],-     Nothing,-     Nothing]-,---testRegex "(?<![^f]oo)(bar)" []-    ["foobarX ",-     "** Failers ",-     "boobarX"]-    [Just [" 0: bar"],-     Just [" 1: bar"],-     Nothing,-     Nothing]-,---testRegex "(?<![^f])X" []-    ["offX",-     "** Failers",-     "onyX  "]-    [Just [" 0: X"],-     Nothing,-     Nothing]-,---testRegex "(?<=[^f])X" []-    ["onyX",-     "** Failers",-     "offX "]-    [Just [" 0: X"],-     Nothing,-     Nothing]-,---testRegex "^" [ERROR]-    ["a\\nb\\nc\\n",-     "\\ ",-     "",-     "/(?<=C\\n)^/mg",-     "A\\nC\\nC\\n "]-    [Just [" 0: "],-     Just [" 0: "],-     Just [" 0: "],-     Just [" 0: "],-     Just ["/(?<=C\\n)^/mg"],-     Just [" 0: "]]-,---testRegex "(?:(?(1)a|b)(X))+" []-    ["bXaX"]-    [Just [" 0: bXaX"],-     Just [" 1: X"]]-,---testRegex "(?:(?(1)\\1a|b)(X|Y))+" []-    ["bXXaYYaY",-     "bXYaXXaX  "]-    [Just [" 0: bXXaYYaY"],-     Just [" 1: Y"],-     Just [" 0: bX"],-     Just [" 1: X"]]-,---testRegex "()()()()()()()()()(?:(?(10)\\10a|b)(X|Y))+" []-    ["bXXaYYaY"]-    [Just [" 0: bX"],-     Just [" 1: "],-     Just [" 2: "],-     Just [" 3: "],-     Just [" 4: "],-     Just [" 5: "],-     Just [" 6: "],-     Just [" 7: "],-     Just [" 8: "],-     Just [" 9: "],-     Just ["10: X"]]-,---testRegex "[[,abc,]+]" []-    ["abc]",-     "a,b]",-     "[a,b,c]  "]-    [Just [" 0: abc]"],-     Just [" 0: a,b]"],-     Just [" 0: [a,b,c]"]]-,---testRegex "(?-x: )" [ERROR]-    ["A\\x20B",-     "",-     "\"(?x)(?-x: \\s*#\\s*)\"",-     "A # B",-     "** Failers",-     "#  "]-    [Just [" 0:  "],-     Just ["\"(?x)(?-x: \\s*#\\s*)\""],-     Just [" 0:  # "],-     Nothing,-     Nothing]-,---testRegex "(?x-is)(?:(?-ixs) \\s*#\\s*) include" [ERROR]-    ["A #include",-     "** Failers",-     "A#include  ",-     "A #Include"]-    [Just [" 0:  #include"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "a*b*\\w" []-    ["aaabbbb",-     "aaaa",-     "a"]-    [Just [" 0: aaabbbb"],-     Just [" 0: aaaa"],-     Just [" 0: a"]]-,---testRegex "a*b?\\w" []-    ["aaabbbb",-     "aaaa",-     "a"]-    [Just [" 0: aaabb"],-     Just [" 0: aaaa"],-     Just [" 0: a"]]-,---testRegex "a*b{0,4}\\w" []-    ["aaabbbb",-     "aaaa",-     "a"]-    [Just [" 0: aaabbbb"],-     Just [" 0: aaaa"],-     Just [" 0: a"]]-,---testRegex "a*b{0,}\\w" []-    ["aaabbbb",-     "aaaa",-     "a",-     "",-     "/a*\\d*\\w/",-     "0a",-     "a ",-     "",-     "/a*b *\\w/x",-     "a "]-    [Just [" 0: aaabbbb"],-     Just [" 0: aaaa"],-     Just [" 0: a"],-     Just ["/a*\\d*\\w/"],-     Just [" 0: 0a"],-     Just [" 0: a"],-     Just ["/a*b *\\w/x"],-     Just [" 0: a"]]-,---testRegex "ERROR" []-    ["*\\w/x",-     "a "]-    [Just [" 0: a"]]-,---testRegex "a* b *\\w" [ERROR]-    ["a "]-    [Just [" 0: a"]]-,---testRegex "^\\w+=.*(\\\\\\n.*)*" []-    ["abc=xyz\\\\\\npqr"]-    [Just [" 0: abc=xyz\\"]]-,---testRegex "(?=(\\w+))\\1:" []-    ["abcd:"]-    [Just [" 0: abcd:"],-     Just [" 1: abcd"]]-,---testRegex "^(?=(\\w+))\\1:" []-    ["abcd:"]-    [Just [" 0: abcd:"],-     Just [" 1: abcd"]]-,---testRegex "^\\Eabc" []-    ["abc",-     "",-     "/^[\\Eabc]/",-     "a",-     "** Failers ",-     "E ",-     "",-     "/^[a-\\Ec]/",-     "b",-     "** Failers",-     "-",-     "E    "]-    [Just [" 0: abc"],-     Just ["/^[\\Eabc]/"],-     Just [" 0: a"],-     Nothing,-     Nothing,-     Just ["/^[a-\\Ec]/"],-     Just [" 0: b"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^[a\\E\\E-\\Ec]" []-    ["b",-     "** Failers",-     "-",-     "E    "]-    [Just [" 0: b"],-     Nothing,-     Nothing,-     Nothing]-,---testRegex "^[\\E\\Qa\\E-\\Qz\\E]+" []-    ["b",-     "** Failers",-     "-  ",-     "",-     "/^[a\\Q]bc\\E]/",-     "a",-     "]",-     "c",-     "",-     "/^[a-\\Q\\E]/",-     "a",-     "-     "]-    [Just [" 0: b"],-     Nothing,-     Nothing,-     Just ["/^[a\\Q]bc\\E]/"],-     Just [" 0: a"],-     Just [" 0: ]"],-     Just [" 0: c"],-     Just ["/^[a-\\Q\\E]/"],-     Just [" 0: a"],-     Just [" 0: -"]]-,-------testRegex "(a){0,3}(?(1)b|(c|))*D" []-    ["abbD",-     "ccccD",-     "D  "]-    [Just [" 0: abbD"],-     Just [" 1: a"],-     Just [" 0: ccccD"],-     Just [" 1: <unset>"],-     Just [" 2: "],-     Just [" 0: D"],-     Just [" 1: <unset>"],-     Just [" 2: "]]-,---testRegex "(a|)*\\d" []-    ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa",-     "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]-    [Nothing,-     Just [" 0: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"],-     Just [" 1: "]]-,---testRegex "(?>a|)*\\d" []-    ["aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa",-     "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]-    [Nothing,-     Just [" 0: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa4"]]-,-------testRegex "( (A | (?(1)0|) )*   )" [ERROR]-    ["abcd"]-    [Just [" 0: "],-     Just [" 1: "],-     Just [" 2: "]]-,---testRegex "( ( (?(1)0|) )*   )" [ERROR]-    ["abcd"]-    [Just [" 0: "],-     Just [" 1: "],-     Just [" 2: "]]-,---testRegex "(  (?(1)0|)*   )" [ERROR]-    ["abcd"]-    [Just [" 0: "],-     Just [" 1: "]]