X-Git-Url: https://git.lukelau.me/?a=blobdiff_plain;f=src%2FLanguage%2FHaskell%2FLSP%2FTest%2FExceptions.hs;fp=src%2FLanguage%2FHaskell%2FLSP%2FTest%2FExceptions.hs;h=deea111f3e43006ce8084653b6e287b489950048;hb=0f8b9d328f4d950ff0a2e1c3b5aed593b21c2d3a;hp=0000000000000000000000000000000000000000;hpb=ea5db1975df3a208798ce2c44dc71fb8123fabd3;p=lsp-test.git

diff --git a/src/Language/Haskell/LSP/Test/Exceptions.hs b/src/Language/Haskell/LSP/Test/Exceptions.hs
new file mode 100644
index 0000000..deea111
--- /dev/null
+++ b/src/Language/Haskell/LSP/Test/Exceptions.hs
@@ -0,0 +1,10 @@
+module Language.Haskell.LSP.Test.Exceptions where
+
+import Control.Exception
+
+data SessionException = TimeoutException
+  deriving Show
+instance Exception SessionException
+
+anySessionException :: SessionException -> Bool
+anySessionException = const True
\ No newline at end of file