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 Rosetta.ReadingSpec qualified
   9 import Rosetta.WritingSpec qualified
  10 import WiktionarySpec qualified
  11 import Worksheets.Utils.Prelude
  12
  13 main :: IO ()
  14 main = sydTest spec
  15
  16 spec = do
  17   WiktionarySpec.spec
  18   -- xdescribe "Language" do
  19   --  describe "Chinese" do
  20   --    Language.ChineseSpec.spec
  21   -- withTimeout 3000000 do
  22   --  withoutRetries do
  23   --    describe "Language" do
  24   --      --    describe "EnglishSpec" do
  25   --      --      Language.EnglishSpec.spec
  26   --      describe "FrenchSpec" do
  27   --        Language.FrenchSpec.spec
  28
  29   withoutRetries do
  30     describe "Rosetta" do
  31       describe "ReadingSpec" do
  32         Rosetta.ReadingSpec.spec
  33
  34 --    --describe "WritingSpec" do
  35 --  Rosetta.WritingSpec.spec
  36
  37 --    describe "RosettaSpec" do
  38 --      Worksheets.Writing.RosettaSpec.spec