This morning I stumbled on a series of posts by Matthew Podwysocki on Functional Programming Unit Testing (part 1, part 2, part 3, part 4, part). I think I really could have used these posts about two years ago when I first ventured into the world of testing Haskell. The only new thing I learnt was the existance of the package test-framwork in parth three. Anyway, they are a good introduction to testing Haskell code (and F#).
Posts tagged ‘test-framework’
I found test-framework today. In adopting it with my already existing unit tests I found this function to be rather useful:
import Test.HUnit import qualified Test.Framework.Providers.API as TFAPI unitTest2TFTest :: Test -> [TFAPI.Test] unitTest2TFTest t = let unitTest2TFTest' desc (TestCase a) = [testCase desc a] unitTest2TFTest' desc (TestLabel s t) = unitTest2TFTest' (desc ++ ":" ++ s) t unitTest2TFTest' desc (TestList ts) = concat $ map (unitTest2TFTest' desc) ts in unitTest2TFTest' "" t