29 lines
829 B
Haskell
29 lines
829 B
Haskell
module Main where
|
|
|
|
import Control.Monad
|
|
import qualified EvalTests
|
|
import qualified NixLanguageTests
|
|
import qualified ParserTests
|
|
import qualified PrettyTests
|
|
import System.Directory
|
|
import System.Environment
|
|
import Test.Tasty
|
|
|
|
main :: IO ()
|
|
main = do
|
|
nixLanguageTests <- NixLanguageTests.genTests
|
|
langTestsEnv <- lookupEnv "LANGUAGE_TESTS"
|
|
let runLangTests = langTestsEnv == Just "yes"
|
|
when runLangTests $ do
|
|
files <- listDirectory "data/nix"
|
|
when (null files) $ error $ unlines
|
|
[ "Directory data/nix does not have any files."
|
|
, "Did you forget to run \"git submodule update --init --recursive\"?"
|
|
]
|
|
defaultMain $ testGroup "hnix" $
|
|
[ ParserTests.tests
|
|
, EvalTests.tests
|
|
, PrettyTests.tests
|
|
] ++
|
|
[ nixLanguageTests | runLangTests ]
|