diff -up show-0.4.1.2/ShowQ.hs.fix show-0.4.1.2/ShowQ.hs
--- show-0.4.1.2/ShowQ.hs.fix	2013-05-03 16:02:53.995282549 +0530
+++ show-0.4.1.2/ShowQ.hs	2013-05-03 16:03:38.330291233 +0530
@@ -8,10 +8,12 @@ import System.IO.Unsafe (unsafePerformIO
 import Test.QuickCheck (numTests, quickCheckWithResult, stdArgs, Result(..), Testable)
 import qualified Test.SmallCheck as SC (smallCheck, Testable)
 
+{--
 mysmallcheck :: (SC.Testable prop) => prop -> ()
 mysmallcheck = unsafePerformIO . mysmallcheck'
 mysmallcheck' :: (SC.Testable prop) => prop -> IO ()
 mysmallcheck' = SC.smallCheck 6
+--}
 
 myquickcheck :: Testable prop => prop -> String
 myquickcheck = unsafePerformIO . myquickcheck'