Hide Word from Prelude
authorJoachim Breitner <mail@joachim-breitner.de>
Tue, 2 Sep 2014 15:53:52 +0000 (17:53 +0200)
committerJoachim Breitner <mail@joachim-breitner.de>
Tue, 2 Sep 2014 15:54:48 +0000 (17:54 +0200)
in benchmarks where Word is used. This fixes fall-out from #9531.

fibon/Hackage/Regex/Text/Regex/PDeriv/ByteString/LeftToRight.lhs
fibon/Hackage/Regex/Text/Regex/PDeriv/ByteString/LeftToRightD.lhs
fibon/Hackage/Regex/Text/Regex/PDeriv/ByteString/Posix.lhs
fibon/Hackage/Regex/Text/Regex/PDeriv/ByteString/RightToLeft.lhs
fibon/Hackage/Regex/Text/Regex/PDeriv/ByteString/TwoPasses.lhs
real/HMMS/Pronunciations.lhs
spectral/eliza/Main.hs
spectral/para/Main.lhs

index 2b1c4be..56977a2 100644 (file)
@@ -26,6 +26,7 @@ an emptiable pattern and the input word is fully consumed.
 > import qualified Data.IntMap as IM
 > import qualified Data.ByteString.Char8 as S
 > import Control.DeepSeq
+> import Prelude hiding (Word)
 
 > import System.IO.Unsafe (unsafePerformIO)
 
@@ -433,4 +434,4 @@ pattern = <(x :: (0|...|9)+?)*, (y :: (0|...|9)+?)*, (z :: (0|...|9)+?)*>
 
 > p11 = PPair (PStar (PVar 1 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PPair (PStar (PVar 2 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PPair (PStar (PVar 3 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PStar (PVar 4 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy)))
 
-> input11 = S.pack "1234567890123456789-"
\ No newline at end of file
+> input11 = S.pack "1234567890123456789-"
index 64a2e30..ba8e220 100644 (file)
@@ -26,6 +26,7 @@ an emptiable pattern and the input word is fully consumed.
 > import qualified Data.IntMap as IM
 > import qualified Data.ByteString.Char8 as S
 > import Control.DeepSeq
+> import Prelude hiding (Word)
 
 > import System.IO.Unsafe (unsafePerformIO)
 
@@ -507,4 +508,4 @@ pattern = <(x :: (0|...|9)+?)*, (y :: (0|...|9)+?)*, (z :: (0|...|9)+?)*>
 
 > p11 = PPair (PStar (PVar 1 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PPair (PStar (PVar 2 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PPair (PStar (PVar 3 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PStar (PVar 4 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy)))
 
-> input11 = S.pack "1234567890123456789-"
\ No newline at end of file
+> input11 = S.pack "1234567890123456789-"
index efde6bf..f46d237 100644 (file)
@@ -29,6 +29,7 @@ This algorithm implements the POSIX matching policy proceeds by scanning the inp
 > import GHC.Arr 
 > import qualified Data.IntMap as IM
 > import qualified Data.ByteString.Char8 as S
+> import Prelude hiding (Word)
 
 
 > import Text.Regex.Base(RegexOptions(..),RegexLike(..),MatchArray)
index f2d0921..fafa5f6 100644 (file)
@@ -26,6 +26,7 @@ is reached (AKA init state of the NFA) and the input word is fully consumed.
 > import GHC.Int
 > import qualified Data.IntMap as IM
 > import qualified Data.ByteString.Char8 as S
+> import Prelude hiding (Word)
 
 > import Text.Regex.Base(RegexOptions(..))
 
@@ -352,4 +353,4 @@ pattern = <(x :: (0|...|9)+?)*, (y :: (0|...|9)+?)*, (z :: (0|...|9)+?)*>
 
 > p11 = PPair (PStar (PVar 1 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PPair (PStar (PVar 2 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PPair (PStar (PVar 3 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PStar (PVar 4 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy)))
 
-> input11 = S.pack "1234567890123456789-"
\ No newline at end of file
+> input11 = S.pack "1234567890123456789-"
index 0f436d8..fd62f69 100644 (file)
@@ -28,6 +28,7 @@ failures states as long as we cannot find them in the sets.
 > import GHC.Int
 > import qualified Data.IntMap as IM
 > import qualified Data.ByteString.Char8 as S
+> import Prelude hiding (Word)
 
 > import Text.Regex.Base(RegexOptions(..))
 
@@ -381,4 +382,4 @@ pattern = <(x :: (0|...|9)+?)*, (y :: (0|...|9)+?)*, (z :: (0|...|9)+?)*>
 
 > p11 = PPair (PStar (PVar 1 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PPair (PStar (PVar 2 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PPair (PStar (PVar 3 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy) (PStar (PVar 4 [] (PE (Seq digits_re (Star digits_re Greedy)))) Greedy)))
 
-> input11 = S.pack "1234567890123456789-"
\ No newline at end of file
+> input11 = S.pack "1234567890123456789-"
index 1195462..4c0f55a 100644 (file)
@@ -25,6 +25,7 @@ described in later chapters in Part~\ref{part:library}.
 > import MaybeStateT
 > import PlainTextIO
 > import StateT
+> import Prelude hiding (Word)
 
 \end{verbatim}
 
index 2158970..e8cbc22 100644 (file)
@@ -8,6 +8,7 @@
 -------------------------------------------------------------------------------
 
 import Data.Char -- 1.3
+import Prelude hiding (Word)
 
 main  = interact (("\n\
                    \Hi! I'm Eliza. I am your personal therapy computer.\n\
index 120b9b4..3ae76b0 100644 (file)
@@ -176,6 +176,7 @@ style.
 >import Data.Char
 >import System.IO
 >import System.Environment
+>import Prelude hiding (Word)
 
 \end{mcode}
 \fi