diff options
| author | Alberto Ruiz <aruiz@um.es> | 2007-11-07 16:52:00 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2007-11-07 16:52:00 +0000 |
| commit | 9e6500bf8e925b363e74e01834f81dde0810f808 (patch) | |
| tree | a720c1e446944f649b2f21d619bf35b34411a072 /examples/tests.hs | |
| parent | 894344f9ef93a0ff5e2fb12f085b5c706b7aa9d9 (diff) | |
removed -O for 6.8.1
Diffstat (limited to 'examples/tests.hs')
| -rw-r--r-- | examples/tests.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/examples/tests.hs b/examples/tests.hs index 210f8ef..2fbf9e2 100644 --- a/examples/tests.hs +++ b/examples/tests.hs | |||
| @@ -352,6 +352,7 @@ rotTest = fun (10^5) :~12~: rot 5E4 | |||
| 352 | --------------------------------------------------------------------- | 352 | --------------------------------------------------------------------- |
| 353 | 353 | ||
| 354 | tests = do | 354 | tests = do |
| 355 | setErrorHandlerOff | ||
| 355 | putStrLn "--------- internal -----" | 356 | putStrLn "--------- internal -----" |
| 356 | quickCheck ((\m -> m == trans m).sym :: Sym Double -> Bool) | 357 | quickCheck ((\m -> m == trans m).sym :: Sym Double -> Bool) |
| 357 | quickCheck ((\m -> m == trans m).sym :: Sym (Complex Double) -> Bool) | 358 | quickCheck ((\m -> m == trans m).sym :: Sym (Complex Double) -> Bool) |