From 77552d080e88fc70312f55fd3303fac3464ab46e Mon Sep 17 00:00:00 2001 From: Alberto Ruiz Date: Wed, 14 Dec 2011 13:08:43 +0100 Subject: new package hmatrix-tests --- lib/Numeric/LinearAlgebra/Tests/quickCheckCompat.h | 33 ---------------------- 1 file changed, 33 deletions(-) delete mode 100644 lib/Numeric/LinearAlgebra/Tests/quickCheckCompat.h (limited to 'lib/Numeric/LinearAlgebra/Tests/quickCheckCompat.h') diff --git a/lib/Numeric/LinearAlgebra/Tests/quickCheckCompat.h b/lib/Numeric/LinearAlgebra/Tests/quickCheckCompat.h deleted file mode 100644 index 714587b..0000000 --- a/lib/Numeric/LinearAlgebra/Tests/quickCheckCompat.h +++ /dev/null @@ -1,33 +0,0 @@ -#ifndef MIN_VERSION_QuickCheck -#define MIN_VERSION_QuickCheck(A,B,C) 1 -#endif - -#if MIN_VERSION_QuickCheck(2,0,0) -import Test.QuickCheck(Arbitrary,arbitrary,coarbitrary,choose,vector - ,sized,classify,Testable,Property - - ,quickCheckWith,maxSize,stdArgs,shrink) - -#else -import Test.QuickCheck(Arbitrary,arbitrary,coarbitrary,choose,vector - ,sized,classify,Testable,Property - - ,check,configSize,defaultConfig,trivial) -#endif - - - -#if MIN_VERSION_QuickCheck(2,0,0) -trivial :: Testable a => Bool -> a -> Property -trivial = (`classify` "trivial") -#else -#endif - - --- define qCheck, which used to be in Tests.hs -#if MIN_VERSION_QuickCheck(2,0,0) -qCheck n = quickCheckWith stdArgs {maxSize = n} -#else -qCheck n = check defaultConfig {configSize = const n} -#endif - -- cgit v1.2.3