-- module Service.Greeter.AnonymousUT (testList) where import Test.HUnit (Test (TestCase, TestList), assertEqual) import Service.Greeter.Anonymous (anonymousGreeting) -- testList :: Test testList = TestList ( anonymousGreetingCases) -- anonymousGreeting :: Greement anonymousGreetingCases :: [Test] anonymousGreetingCases = [ TestCase (assertEqual "should return anonymousGreeting" "Hello, World!" (anonymousGreeting))] --