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