small fix in failing test

This commit is contained in:
Jost Berthold 2014-09-01 15:59:18 +02:00
parent 2ea32e42fe
commit 3420ec74d5
2 changed files with 6 additions and 3 deletions

View File

@ -96,5 +96,5 @@ pack_ThreadId = ("packing a thread ID (unsupported)",
pack_MVar :: (String, IO Bool)
pack_MVar = ("packing an MVar (should be cannotpack)",
do m <- newEmptyMVar :: IO (MVar Integer)
expectException P_CANNOT_PACK $ trySerialize m
expectException P_CANNOTPACK $ trySerialize m
)

View File

@ -82,7 +82,8 @@ test-suite testexceptions
if flag(debug)
ghc-options: -debug -optc-g -optc-DDEBUG
-- test-suite alltests DOZNWOK!
-- DOZNWOK!
-- test-suite alltests
-- type: detailed-0.9
-- test-module: Test.AllTests
-- build-depends: base >= 4.7,
@ -112,7 +113,9 @@ test-suite testmthread
packman
default-language: Haskell2010
if flag(debug)
ghc-options: -debug -optc-g -optc-DDEBUG
ghc-options: -debug -optc-g -optc-DDEBUG -threaded
else
ghc-options: -threaded
source-repository head