Main.hs

module Main (main) where

import Test.HUnit

-- HINT: import the modules you are testing here

aFailingTest :: Test
aFailingTest =
  TestCase (assertFailure "I am an unhappy test, and I can naught but fail")

main :: IO ()
main = runTestTTAndExit aFailingTest