remove dead code

This commit is contained in:
Simon Michael 2008-10-15 17:56:34 +00:00
parent 06a363dc6e
commit 9957335f9c

View File

@ -11,10 +11,6 @@ import PrintCommand
import RegisterCommand import RegisterCommand
-- import Test.QuickCheck
-- quickcheck = mapM quickCheck ([
-- ] :: [Bool])
runtests = do {putStrLn "Running tests.."; runTestTT $ tconcat [unittests, functests]} runtests = do {putStrLn "Running tests.."; runTestTT $ tconcat [unittests, functests]}
tconcat :: [Test] -> Test tconcat :: [Test] -> Test