cassava-conduit-0.0.1: quickcheck/Main.hs

module Main where

import Control.Monad

import System.Exit
import System.IO

main :: IO ()
main = hSetBuffering stdout LineBuffering >> mapM id
    [
    ] >>= \rs -> when (not . all id $ rs) exitFailure