--
module Service.Greeter.OnymousUT (testList)
where

    import Test.HUnit (Test (TestCase, TestList), assertEqual)
    import Service.Greeter.Onymous (onymousGreeting)

--
    testList :: Test
    testList = TestList (
        onymousGreetingCases)

-- onymousGreeting :: Greetee -> Greement
    onymousGreetingCases :: [Test]
    onymousGreetingCases = [
        TestCase (assertEqual
            "should return onymousGreeting"
            "Hello, Jimi!"
            (onymousGreeting "Jimi"))]

--