diff options
| author | Don Stewart <dons@cse.unsw.edu.au> | 2007-05-03 09:49:37 +0200 |
|---|---|---|
| committer | Don Stewart <dons@cse.unsw.edu.au> | 2007-05-03 09:49:37 +0200 |
| commit | 1b4792e5a8bec1861f5a179f084814a75074f21b (patch) | |
| tree | 3b89e8bfdba3de3f4978c95182984425624f4e66 | |
| parent | 3ac9a0662bc42f3b73afb7b1be0dbbfa4fa2a592 (diff) | |
| download | metatile-1b4792e5a8bec1861f5a179f084814a75074f21b.tar metatile-1b4792e5a8bec1861f5a179f084814a75074f21b.zip | |
-Wall police
darcs-hash:20070503074937-9c5c1-769ff9e521726032973c5712940c8c671746153e
| -rw-r--r-- | tests/Properties.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tests/Properties.hs b/tests/Properties.hs index 1240734..c8b7e05 100644 --- a/tests/Properties.hs +++ b/tests/Properties.hs @@ -292,6 +292,8 @@ instance Arbitrary Rectangle where sw <- arbitrary sh <- arbitrary return $ Rectangle sx sy sw sh + coarbitrary = undefined + instance Arbitrary Rational where arbitrary = do |