X-Git-Url: https://git.lukelau.me/?a=blobdiff_plain;ds=sidebyside;f=src%2FLanguage%2FLSP%2FTest%2FSession.hs;h=aabf04f2b73e18620de2af30cec84055a31a1219;hb=2e75030de6600e4050fa800f1468459e308d568f;hp=6a6cf15a5a484d90a10a4da50217ab277b5d6c5f;hpb=1fb2c02419384b450fd43ae281ef410cb7bfb2cf;p=lsp-test.git diff --git a/src/Language/LSP/Test/Session.hs b/src/Language/LSP/Test/Session.hs index 6a6cf15..aabf04f 100644 --- a/src/Language/LSP/Test/Session.hs +++ b/src/Language/LSP/Test/Session.hs @@ -6,6 +6,7 @@ {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE RankNTypes #-} +{-# LANGUAGE TypeInType #-} module Language.LSP.Test.Session ( Session(..) @@ -134,7 +135,7 @@ data SessionContext = SessionContext -- Keep curTimeoutId in SessionContext, as its tied to messageChan , curTimeoutId :: MVar Int -- ^ The current timeout we are waiting on , requestMap :: MVar RequestMap - , initRsp :: MVar InitializeResponse + , initRsp :: MVar (ResponseMessage Initialize) , config :: SessionConfig , sessionCapabilities :: ClientCapabilities }