module Main where
import Polysemy.Test (unitTest)
import Ribosome.Test.EmbedTmuxTest (test_embedTmux)
import Ribosome.Test.ReportTest (test_report)
import Ribosome.Test.SocketTmuxTest (test_socketTmux)
import Ribosome.Test.SyntaxTest (test_syntax)
import Skip (skipUnlessX)
import Test.Tasty (TestTree, defaultMain, testGroup)
tests :: TestTree
tests =
testGroup "ribosome" [
unitTest "socket tmux" (skipUnlessX test_socketTmux),
unitTest "embed tmux" (skipUnlessX test_embedTmux),
unitTest "syntax" (skipUnlessX test_syntax),
unitTest "report" (skipUnlessX test_report)
]
main :: IO ()
main =
defaultMain tests