]> gitweb.michael.orlitzky.com - dead/harbl.git/blob - test/TestSuite.hs
Add a "new" exit code (shift them all, really) for a host being blacklisted.
[dead/harbl.git] / test / TestSuite.hs
1 import Test.Tasty ( TestTree, defaultMain, testGroup )
2 import Network.DNS.RBL.Tests ( ipv4pattern_tests, site_tests )
3
4 tests :: TestTree
5 tests = testGroup "All Tests" [ site_tests, ipv4pattern_tests ]
6
7 main :: IO ()
8 main = defaultMain tests