2015-07-31 15:59:26 +03:00
|
|
|
|
--
|
2015-08-01 19:24:45 +03:00
|
|
|
|
-- QuickCheck tests for Megaparsec, main module.
|
2015-07-31 15:59:26 +03:00
|
|
|
|
--
|
2016-01-09 15:56:33 +03:00
|
|
|
|
-- Copyright © 2015–2016 Megaparsec contributors
|
2015-07-31 15:59:26 +03:00
|
|
|
|
--
|
|
|
|
|
-- Redistribution and use in source and binary forms, with or without
|
|
|
|
|
-- modification, are permitted provided that the following conditions are
|
|
|
|
|
-- met:
|
|
|
|
|
--
|
|
|
|
|
-- * Redistributions of source code must retain the above copyright notice,
|
|
|
|
|
-- this list of conditions and the following disclaimer.
|
|
|
|
|
--
|
|
|
|
|
-- * Redistributions in binary form must reproduce the above copyright
|
|
|
|
|
-- notice, this list of conditions and the following disclaimer in the
|
|
|
|
|
-- documentation and/or other materials provided with the distribution.
|
|
|
|
|
--
|
2015-10-30 16:41:21 +03:00
|
|
|
|
-- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS “AS IS” AND ANY
|
|
|
|
|
-- EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
|
|
|
|
-- WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
|
|
|
|
-- DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
|
|
|
|
-- DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
|
|
|
-- DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
|
|
|
-- OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
|
|
|
-- HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
|
|
|
|
-- STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
|
|
|
|
-- ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
|
|
|
-- POSSIBILITY OF SUCH DAMAGE.
|
2015-07-31 15:59:26 +03:00
|
|
|
|
|
|
|
|
|
module Main (main) where
|
|
|
|
|
|
2015-08-03 10:19:23 +03:00
|
|
|
|
import Test.Framework (defaultMain)
|
|
|
|
|
|
|
|
|
|
import qualified Pos
|
|
|
|
|
import qualified Error
|
|
|
|
|
import qualified Prim
|
|
|
|
|
import qualified Combinator
|
|
|
|
|
import qualified Char
|
2015-08-30 13:00:07 +03:00
|
|
|
|
import qualified Expr
|
2015-08-03 10:19:23 +03:00
|
|
|
|
import qualified Perm
|
2015-08-30 13:00:07 +03:00
|
|
|
|
import qualified Lexer
|
2015-07-31 15:59:26 +03:00
|
|
|
|
|
|
|
|
|
main :: IO ()
|
2015-08-03 10:19:23 +03:00
|
|
|
|
main = defaultMain
|
|
|
|
|
[ Pos.tests
|
|
|
|
|
, Error.tests
|
|
|
|
|
, Prim.tests
|
|
|
|
|
, Combinator.tests
|
|
|
|
|
, Char.tests
|
2015-08-30 13:00:07 +03:00
|
|
|
|
, Expr.tests
|
|
|
|
|
, Perm.tests
|
|
|
|
|
, Lexer.tests ]
|