hackport-0.5.1: cabal/cabal-testsuite/PackageTests/TestSuiteTests/ExeV10/tests/test-Foo.hs

module Main where

import Foo
import System.Exit
import Control.Monad

main :: IO ()
main | fooTest [] = do
        -- Make sure that the output buffer is drained
        replicateM 10000 $ putStrLn "The quick brown fox jumps over the lazy dog"
        exitSuccess
     | otherwise = exitFailure