]> gitweb.michael.orlitzky.com - dead/htsn.git/blob - test/ShellTests.hs
65a10ccca97daf27dd80e55e15e8a75e3d55a735
[dead/htsn.git] / test / ShellTests.hs
1 module Main
2 where
3
4 import System.Cmd ( system )
5 import System.Exit ( exitWith )
6
7 main :: IO ()
8 main = do
9 result <- system "shelltest test/shell/*.test"
10 exitWith result