diff options
Diffstat (limited to 'packages/tests/src/Numeric/LinearAlgebra/Tests.hs')
-rw-r--r-- | packages/tests/src/Numeric/LinearAlgebra/Tests.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/packages/tests/src/Numeric/LinearAlgebra/Tests.hs b/packages/tests/src/Numeric/LinearAlgebra/Tests.hs index c146e93..960c777 100644 --- a/packages/tests/src/Numeric/LinearAlgebra/Tests.hs +++ b/packages/tests/src/Numeric/LinearAlgebra/Tests.hs | |||
@@ -1,5 +1,5 @@ | |||
1 | {-# LANGUAGE CPP #-} | 1 | {-# LANGUAGE CPP #-} |
2 | {-# OPTIONS_GHC -fno-warn-unused-imports -fno-warn-incomplete-patterns #-} | 2 | {-# OPTIONS_GHC -fno-warn-unused-imports -fno-warn-incomplete-patterns -fno-warn-missing-signatures #-} |
3 | {-# LANGUAGE DataKinds #-} | 3 | {-# LANGUAGE DataKinds #-} |
4 | {-# LANGUAGE TypeFamilies #-} | 4 | {-# LANGUAGE TypeFamilies #-} |
5 | {-# LANGUAGE FlexibleContexts #-} | 5 | {-# LANGUAGE FlexibleContexts #-} |
@@ -31,7 +31,7 @@ module Numeric.LinearAlgebra.Tests( | |||
31 | --, runBigTests | 31 | --, runBigTests |
32 | ) where | 32 | ) where |
33 | 33 | ||
34 | import Numeric.LinearAlgebra hiding (unitary) | 34 | import Numeric.LinearAlgebra |
35 | import Numeric.LinearAlgebra.Devel | 35 | import Numeric.LinearAlgebra.Devel |
36 | import Numeric.LinearAlgebra.Static(L) | 36 | import Numeric.LinearAlgebra.Static(L) |
37 | import Numeric.LinearAlgebra.Tests.Instances | 37 | import Numeric.LinearAlgebra.Tests.Instances |
@@ -514,7 +514,7 @@ indexProp g f x = a1 == g a2 && a2 == a3 && b1 == g b2 && b2 == b3 | |||
514 | 514 | ||
515 | -------------------------------------------------------------------------------- | 515 | -------------------------------------------------------------------------------- |
516 | 516 | ||
517 | sliceTest = TestLabel "slice test" . TestList $ | 517 | _sliceTest = utest "slice test" $ and |
518 | [ testSlice (chol . trustSym) (gen 5 :: Matrix R) | 518 | [ testSlice (chol . trustSym) (gen 5 :: Matrix R) |
519 | , testSlice (chol . trustSym) (gen 5 :: Matrix C) | 519 | , testSlice (chol . trustSym) (gen 5 :: Matrix C) |
520 | , testSlice qr (rec :: Matrix R) | 520 | , testSlice qr (rec :: Matrix R) |
@@ -842,7 +842,7 @@ runTests n = do | |||
842 | , staticTest | 842 | , staticTest |
843 | , intTest | 843 | , intTest |
844 | , modularTest | 844 | , modularTest |
845 | , sliceTest | 845 | -- , sliceTest |
846 | ] | 846 | ] |
847 | when (errors c + failures c > 0) exitFailure | 847 | when (errors c + failures c > 0) exitFailure |
848 | return () | 848 | return () |