publish-0.4.4: tests/TestSuite.hs

{-# LANGUAGE OverloadedStrings #-}

import Test.Hspec

import Core.System
import CheckTableProperties
import CompareFragments

main :: IO ()
main = do
    finally (hspec suite) (putStrLn ".")

suite :: Spec
suite = do
    checkTableProperties
    checkByComparingFragments