From 15981d57cda18a19fcb3012172a9f0994abfd97a Mon Sep 17 00:00:00 2001 From: AndrewRademacher Date: Wed, 24 Feb 2016 17:24:19 -0600 Subject: Added testing for UDP method. --- test/Main.hs | 12 ++++++++++++ test/Test/Graylog/UDP.hs | 13 +++++++++++++ 2 files changed, 25 insertions(+) create mode 100644 test/Main.hs create mode 100644 test/Test/Graylog/UDP.hs (limited to 'test') 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 @@ +import qualified Test.Graylog.UDP (tests) + +import Test.Tasty + +main :: IO () +main = defaultMain tests + +tests :: TestTree +tests = testGroup "Graylog Library" + [ Test.Graylog.UDP.tests + ] + 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 @@ +module Test.Graylog.UDP where + +import Test.Tasty +import Test.Tasty.HUnit + +tests :: TestTree +tests = testGroup "Test.Graylog.UDP" + [ testCase "Validation: Something" case_validateSomething + ] + +case_validateSomething :: IO () +case_validateSomething = return () + -- cgit v1.2.3