1. Bryan O'Sullivan
  2. attoparsec


Bryan O'Sullivan  committed 185c168

More little tweaks - switch the tiny example to Parsec 3.

  • Participants
  • Parent commits a02a8c6
  • Branches default

Comments (0)

Files changed (2)

File benchmarks/Makefile

View file
 	bunzip2 -k $<
-	-rm -f *.o *.hi
+	-rm -f *.o *.hi tiny

File benchmarks/Tiny.hs

View file
-import Control.Monad
-import System.Environment
+import Control.Applicative ((<|>))
+import Control.Monad (forM_)
+import System.Environment (getArgs)
 import qualified Data.Attoparsec.Char8 as A
-import qualified Text.ParserCombinators.Parsec as P
 import qualified Data.ByteString.Char8 as B
-import Control.Applicative
+import qualified Text.Parsec as P
+import qualified Text.Parsec.ByteString as P
 mainA = do
   args <- getArgs
       Left err -> print err
       Right xs -> print (length xs)
-main = mainA
+main = mainP