X-Git-Url: http://git.lukelau.me/?a=blobdiff_plain;f=test%2FParsingTests.hs;h=fe8d36671d7fca4192498a12a3445c67a1d3a397;hb=493d20ada6e48a8987e00a5ec92a1b31fe3c9b8c;hp=31bcfefd7a882c1620cc4d71fed58e7c4702c191;hpb=f5e627c1912bc66b7b8bb2c1a389b59fb34de883;p=opengl.git diff --git a/test/ParsingTests.hs b/test/ParsingTests.hs index 31bcfef..fe8d366 100644 --- a/test/ParsingTests.hs +++ b/test/ParsingTests.hs @@ -1,4 +1,5 @@ {-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE FlexibleInstances #-} module ParsingTests where import Control.Lens hiding (List) @@ -7,10 +8,14 @@ import Language.Haskell.LSP.Test import Language.Haskell.LSP.Types import Data.Conduit import Data.Conduit.Parser +import Data.Default import Test.Hspec type TestSession = ConduitParser FromServerMessage IO +instance MonadSessionConfig IO where + sessionConfig = return def + parsingSpec :: Spec parsingSpec = describe "diagnostics" $ do