Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: definition_sit…
Fetching contributors…

Cannot retrieve contributors at this time

13 lines (9 sloc) 0.371 kb
module Main where
import Test.QuickCheck
import Scion.Inspect
check1000 :: Testable prop => String -> prop -> IO ()
check1000 s p = putStrLn ("> " ++ s) >> quickCheckWith stdArgs{ maxSuccess = 1000 } p
main = do
putStrLn "================================================"
putStrLn ">>> Running Test Suite"
check1000 "prop_invCmpOverlap" prop_invCmpOverlap
Jump to Line
Something went wrong with that request. Please try again.