goldenTest1 :: TestNametest name
-> IO (Maybe a)get the golden correct value
-> IO aget the tested value
-> (a -> a -> GDiff)comparison function.
If two values are the same, it should return Equal. If they are different, it should return a diff representation. First argument is golden value.
-> (a -> GShow)Show the golden/actual value.
-> (a -> IO ())update the golden file
-> TestTree
A very general testing function.