tests/Spec.hs

   1 {-# OPTIONS_GHC -w -Wall -fno-warn-missing-signatures -fno-warn-unused-imports #-}
   2
   3 import Test.Syd
   4
   5 import Language.ChineseSpec qualified
   6 import Language.EnglishSpec qualified
   7 import Language.FrenchSpec qualified
   8 import RecipesSpec qualified
   9 import Rosetta.ReadingSpec qualified
  10 import Rosetta.WritingSpec qualified
  11 import WiktionarySpec qualified
  12 import Worksheets.Utils.Prelude
  13
  14 main :: IO ()
  15 main = sydTest spec
  16
  17 spec = do
  18   RecipesSpec.spec
  19
  20 -- WiktionarySpec.spec
  21 ---- xdescribe "Language" do
  22 ----  describe "Chinese" do
  23 ----    Language.ChineseSpec.spec
  24 -- withTimeout 3000000 do
  25 --  withoutRetries do
  26 --    describe "Language" do
  27 --      describe "EnglishSpec" do
  28 --        Language.EnglishSpec.spec
  29 --      describe "FrenchSpec" do
  30 --       Language.FrenchSpec.spec
  31
  32 -- withoutRetries do
  33 --  describe "Rosetta" do
  34 --    describe "ReadingSpec" do
  35 --      Rosetta.ReadingSpec.spec
  36
  37 --    --describe "WritingSpec" do
  38 --  Rosetta.WritingSpec.spec
  39
  40 --    describe "RosettaSpec" do
  41 --      Worksheets.Writing.RosettaSpec.spec