Remove Regex tests; part of #1161

I've sent them upstream here:
    https://sourceforge.net/tracker/?func=detail&aid=3484051&group_id=163236&atid=826945

7 files changed, 0 insertions, 84 deletions

diff --git a/testsuite/tests/lib/Regex/Makefile b/testsuite/tests/lib/Regex/Makefile
deleted file mode 100644
index 9101fbd40a..0000000000
--- a/testsuite/tests/lib/Regex/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/lib/Regex/all.T b/testsuite/tests/lib/Regex/all.T
deleted file mode 100644
index c69bfd665a..0000000000
--- a/testsuite/tests/lib/Regex/all.T
+++ /dev/null
@@ -1,3 +0,0 @@
-test('regex001', reqlib('regex-posix'), compile_and_run, ['-package regex-posix'])
-test('regex002', reqlib('regex-posix'), compile_and_run, ['-package regex-posix'])
-test('regex003', reqlib('regex-posix'), compile_and_run, ['-package regex-posix'])
diff --git a/testsuite/tests/lib/Regex/regex001.hs b/testsuite/tests/lib/Regex/regex001.hs
deleted file mode 100644
index 1c9393c1b2..0000000000
--- a/testsuite/tests/lib/Regex/regex001.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-module Main where
-
-import Control.Exception
-import Text.Regex.Posix
-
--- caused GHC 6.0 to crash, due to regfree'ing the regex after a
--- failed regcomp.
-main = sequence_
-           [ try ("abc" =~~ "[[[" :: IO Bool) :: IO (Either IOException Bool)
-           | _ <- [1..10000] ]
-
diff --git a/testsuite/tests/lib/Regex/regex002.hs b/testsuite/tests/lib/Regex/regex002.hs
deleted file mode 100644
index 9a87a85618..0000000000
--- a/testsuite/tests/lib/Regex/regex002.hs
+++ /dev/null
@@ -1,13 +0,0 @@
-import Text.Regex.Base
-import Text.Regex.Posix((=~),(=~~)) -- or DFA or PCRE or PosixRE
-import qualified Data.ByteString.Char8 as B(ByteString,pack)
-
-main = let b :: Bool
-           b = ("abaca" =~ "(.)a")
-           c :: [MatchArray]
-           c = ("abaca" =~ "(.)a")
-           d :: Maybe (String,String,String,[String])
-           d = ("abaca" =~~ "(.)a")
-       in do print b
-             print c
-             print d
diff --git a/testsuite/tests/lib/Regex/regex002.stdout b/testsuite/tests/lib/Regex/regex002.stdout
deleted file mode 100644
index 99b5656f91..0000000000
--- a/testsuite/tests/lib/Regex/regex002.stdout
+++ /dev/null
@@ -1,3 +0,0 @@
-True
-[array (0,1) [(0,(1,2)),(1,(1,1))],array (0,1) [(0,(3,2)),(1,(3,1))]]
-Just ("a","ba","ca",["b"])
diff --git a/testsuite/tests/lib/Regex/regex003.hs b/testsuite/tests/lib/Regex/regex003.hs
deleted file mode 100644
index 0aa51fe7aa..0000000000
--- a/testsuite/tests/lib/Regex/regex003.hs
+++ /dev/null
@@ -1,43 +0,0 @@
-import Text.Regex.Base
-import Text.Regex.Posix(Regex,(=~),(=~~)) -- or DFA or PCRE or PosixRE
-import qualified Data.ByteString.Char8 as B(ByteString,pack)
-
--- Show mixing of ByteString and String as well as polymorphism:
-
-main = let x :: (RegexContext Regex String target) => target
-           x = ("abaca" =~ B.pack "(.)a")
-           x' :: (RegexContext Regex String target,Monad m) => m target
-           x' = ("abaca" =~~ "(.)a")
-           y :: (RegexContext Regex B.ByteString target) => target
-           y = (B.pack "abaca" =~ "(.)a")
-           y' :: (RegexContext Regex B.ByteString target,Monad m) => m target
-           y' = (B.pack "abaca" =~~ B.pack "(.)a")
-       in do print (x :: Bool)
-             print (x :: Int)
-             print (x :: [MatchArray])
-             print (x' :: Maybe (String,String,String,[String]))
-             print (y :: Bool)
-             print (y :: Int)
-             print (y :: [MatchArray])
-             print (y' :: Maybe (B.ByteString,B.ByteString,B.ByteString,[B.ByteString]))
-
-{- Output is, except for replacing Full with DFA (which has no capture)
-True
-2
-[array (0,1) [(0,(1,2)),(1,(1,1))],array (0,1) [(0,(3,2)),(1,(3,1))]]
-Just ("a","ba","ca",["b"])
-True
-2
-[array (0,1) [(0,(1,2)),(1,(1,1))],array (0,1) [(0,(3,2)),(1,(3,1))]]
-Just ("a","ba","ca",["b"])
--}
-{- The output for DFA is
-True
-2
-[array (0,0) [(0,(1,2))],array (0,0) [(0,(3,2))]]
-Just ("a","ba","ca",[])
-True
-2
-[array (0,0) [(0,(1,2))],array (0,0) [(0,(3,2))]]
-Just ("a","ba","ca",[])
--}
diff --git a/testsuite/tests/lib/Regex/regex003.stdout b/testsuite/tests/lib/Regex/regex003.stdout
deleted file mode 100644
index 49d7499e91..0000000000
--- a/testsuite/tests/lib/Regex/regex003.stdout
+++ /dev/null
@@ -1,8 +0,0 @@
-True
-2
-[array (0,1) [(0,(1,2)),(1,(1,1))],array (0,1) [(0,(3,2)),(1,(3,1))]]
-Just ("a","ba","ca",["b"])
-True
-2
-[array (0,1) [(0,(1,2)),(1,(1,1))],array (0,1) [(0,(3,2)),(1,(3,1))]]
-Just ("a","ba","ca",["b"])