module Main where

import Constrained.Test
import Data.Maybe
import System.Environment
import Test.Hspec

main :: IO ()
IO ()
main = do
  Bool
nightly <- forall a. Maybe a -> Bool
isJust forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> String -> IO (Maybe String)
lookupEnv String
"NIGHTLY"
  Spec -> IO ()
hspec forall a b. (a -> b) -> a -> b
$ Bool -> Spec
tests Bool
nightly