{-# LANGUAGE OverloadedStrings #-}

-- Copyright (C) 2010 John Millikin <jmillikin@gmail.com>
--
-- See license.txt for details
module Main
	( tests
	, main
	) where

import           Test.Chell (Suite, defaultMain)

import           EnumeratorTests.Binary (test_Binary)
import           EnumeratorTests.CatchError (test_CatchError)
import           EnumeratorTests.Compatibility (test_Compatibility)
import           EnumeratorTests.Instances (test_Instances)
import           EnumeratorTests.Join
import           EnumeratorTests.List (test_List)
import           EnumeratorTests.Misc
import           EnumeratorTests.Sequence (test_Sequence)
import           EnumeratorTests.Stream (test_Stream)
import           EnumeratorTests.Text (test_Text)
import           EnumeratorTests.Trans (test_Trans)

tests :: [Suite]
tests =
	[ test_Binary
	, test_CatchError
	, test_Compatibility
	, test_ConcatEnums
	, test_EnumEOF
	, test_Instances
	, test_JoinE
	, test_JoinI
	, test_JoinOperatorAssociativity
	, test_Last
	, test_Length
	, test_LiftTrans
	, test_List
	, test_Peek
	, test_PrintChunks
	, test_Sequence
	, test_Stream
	, test_Text
	, test_Trans
	, test_TryIO
	]

main :: IO ()
main = Test.Chell.defaultMain tests