module System.Console.CmdArgs.Test.All(test,demo,Demo,runDemo) where
import System.Console.CmdArgs.Explicit
import System.Console.CmdArgs.Test.Util
import qualified System.Console.CmdArgs.Test.Explicit as Explicit
import qualified System.Console.CmdArgs.Test.Implicit as Implicit
import qualified System.Console.CmdArgs.Test.GetOpt as GetOpt
import qualified System.Console.CmdArgs.Test.SplitJoin as SplitJoin
test :: IO ()
test = do
Explicit.test
GetOpt.test
Implicit.test
SplitJoin.test
putStrLn "\nTest completed"
demo :: [Mode Demo]
demo = GetOpt.demo ++ Explicit.demo ++ Implicit.demo