Fix broken test stripping
This commit is contained in:
parent
683a30abde
commit
a1d8947297
|
@ -39,8 +39,7 @@ import Data.Maybe
|
||||||
import Data.Semigroup
|
import Data.Semigroup
|
||||||
|
|
||||||
import Test.QuickCheck.All (forAllProperties)
|
import Test.QuickCheck.All (forAllProperties)
|
||||||
import Test.QuickCheck.Test (maxSuccess, quickCheckWithResult,
|
import Test.QuickCheck.Test (maxSuccess, quickCheckWithResult, stdArgs)
|
||||||
stdArgs)
|
|
||||||
|
|
||||||
type Analysis = AnalyzerM ()
|
type Analysis = AnalyzerM ()
|
||||||
type AnalyzerM a = RWS Parameters [TokenComment] Cache a
|
type AnalyzerM a = RWS Parameters [TokenComment] Cache a
|
||||||
|
|
|
@ -29,7 +29,7 @@ detestify() {
|
||||||
}
|
}
|
||||||
|
|
||||||
/LANGUAGE TemplateHaskell/ { next; }
|
/LANGUAGE TemplateHaskell/ { next; }
|
||||||
/^import Test\./ { next; }
|
/^import.*Test\./ { next; }
|
||||||
|
|
||||||
/^module/ {
|
/^module/ {
|
||||||
sub(/,[^,)]*runTests/, "");
|
sub(/,[^,)]*runTests/, "");
|
||||||
|
|
Loading…
Reference in New Issue