diff options
Diffstat (limited to 'test')
-rw-r--r-- | test/Main.hs | 12 | ||||
-rw-r--r-- | test/Test/Graylog/UDP.hs | 13 |
2 files changed, 25 insertions, 0 deletions
diff --git a/test/Main.hs b/test/Main.hs new file mode 100644 index 0000000..604b65a --- /dev/null +++ b/test/Main.hs | |||
@@ -0,0 +1,12 @@ | |||
1 | import qualified Test.Graylog.UDP (tests) | ||
2 | |||
3 | import Test.Tasty | ||
4 | |||
5 | main :: IO () | ||
6 | main = defaultMain tests | ||
7 | |||
8 | tests :: TestTree | ||
9 | tests = testGroup "Graylog Library" | ||
10 | [ Test.Graylog.UDP.tests | ||
11 | ] | ||
12 | |||
diff --git a/test/Test/Graylog/UDP.hs b/test/Test/Graylog/UDP.hs new file mode 100644 index 0000000..67da6fe --- /dev/null +++ b/test/Test/Graylog/UDP.hs | |||
@@ -0,0 +1,13 @@ | |||
1 | module Test.Graylog.UDP where | ||
2 | |||
3 | import Test.Tasty | ||
4 | import Test.Tasty.HUnit | ||
5 | |||
6 | tests :: TestTree | ||
7 | tests = testGroup "Test.Graylog.UDP" | ||
8 | [ testCase "Validation: Something" case_validateSomething | ||
9 | ] | ||
10 | |||
11 | case_validateSomething :: IO () | ||
12 | case_validateSomething = return () | ||
13 | |||