Hello everyone 
I was going through this tutorial http://hunit.sourceforge.net/HUnit-1.0/Guide.html and just wrote some simple code but i am getting error 

ghci>let  test1 = TestCase (assertEqual " equal " 3 ( id 3 )) 
ghci>let tests = [ TestLabel "test 1" test1 ]
ghci>runTestTT tests 

<interactive>:0:11:
    Couldn't match expected type `Test' with actual type `[Test]'
    In the first argument of `runTestTT', namely `tests'
    In the expression: runTestTT tests
    In an equation for `it': it = runTestTT tests

Could some one please tell me what is wrong with this code. 

Regards 
Mukesh Tiwari