module Main (main) where

import ClassyPrelude

import Test.QuickCheck       hiding ((.&.))
import Test.Tasty
import Test.Tasty.QuickCheck
import Test.Tasty.TH

import System.Environment (setEnv)
import Control.Concurrent (runInBoundThread)

import qualified LogTests
import qualified DeriveNounTests
import qualified ArvoTests
import qualified AmesTests
import qualified BehnTests

main :: IO ()
main = do
  setEnv "TASTY_NUM_THREADS" "1"
  runInBoundThread $ defaultMain $ testGroup "Urbit"
    [ DeriveNounTests.tests
    , ArvoTests.tests
    , AmesTests.tests
    , LogTests.tests
    , BehnTests.tests
    ]