test/Test.hs

   1 import Test.Hspec
   2 import Language.Haskell.LSP.Test.Recorded
   3
   4 main = hspec $ do
   5   describe "Replay" $ do
   6     it "passes a test" $ do
   7       replay "test/recordings/renamePass/client.log"
   8              "test/recordings/renamePass/server.log"
   9              "test/recordings/renamePass"
  10         `shouldReturn` True
  11     -- it "fails a test" $
  12     --   replay "test/recordings/documentSymbolFail/client.log"
  13     --          "test/recordings/documentSymbolFail/server.log"
  14     --     `shouldReturn` False