diff --git a/test/Doctests.hs b/test/Doctests.hs index 847e646d8..9108b2ab0 100644 --- a/test/Doctests.hs +++ b/test/Doctests.hs @@ -5,10 +5,12 @@ module Main import System.Environment import Test.DocTest +defaultFiles = ["src/Data/Abstract/Environment.hs", "src/Data/Range.hs", "src/Data/Semigroup/App.hs"] + main :: IO () main = do args <- getArgs - doctest (map ("-X" ++) extensions ++ "-isrc" : "--fast" : if null args then ["src"] else args) + doctest (map ("-X" ++) extensions ++ "-isrc" : "--fast" : if null args then defaultFiles else args) extensions :: [String] extensions =