File tree 2 files changed +4
-12
lines changed 2 files changed +4
-12
lines changed Original file line number Diff line number Diff line change @@ -572,4 +572,5 @@ test-suite DocTests
572
572
573
573
build-depends :
574
574
, lib-server
575
- , doctest-parallel ^>= 0.2.1
575
+ , doctest-parallel ^>= 0.2.2
576
+ -- doctest-parallel-0.2.2 is the first to filter out autogen-modules
Original file line number Diff line number Diff line change 1
1
-- | `doctest-parallel` runner for `hackage-server` library.
2
2
module Main where
3
3
4
- import Data.List
5
- ( isPrefixOf )
6
4
import System.Environment
7
5
( getArgs )
8
-
9
- import Distribution.ModuleName
10
- ( components )
11
-
12
6
import Test.DocTest
13
7
( mainFromLibrary )
14
8
import Test.DocTest.Helpers
15
- ( Library ( .. ), extractSpecificCabalLibrary , findCabalPackage )
9
+ ( extractSpecificCabalLibrary , findCabalPackage )
16
10
17
11
-- | Doctest @hackage-server:lib-server@.
18
12
main :: IO ()
@@ -21,7 +15,4 @@ main = do
21
15
pkg <- findCabalPackage " hackage-server"
22
16
-- Need to give the library name, otherwise the parser does not find it.
23
17
lib <- extractSpecificCabalLibrary (Just " lib-server" ) pkg
24
- -- Need to filter out the @Paths_*@ modules, as they are not found by doctest-parallel.
25
- let f = not . (" Paths_" `isPrefixOf` ) . head . components
26
- let lib' = lib{ libModules = filter f $ libModules lib }
27
- mainFromLibrary lib' args
18
+ mainFromLibrary lib args
You can’t perform that action at this time.
0 commit comments