Rename recorded to replay

[lsp-test.git] / src / Compat.hs

diff --git a/src/Compat.hs b/src/Compat.hs
deleted file mode 100644 (file)
index 23a3ff1..0000000
--- a/src/Compat.hs
+++ /dev/null
@@ -1,18 +0,0 @@
-{-# LANGUAGE CPP #-}
-
-module Compat where
-
-
-#ifdef mingw32_HOST_OS
-
-import qualified System.Win32.Process as P (getCurrentProcessId)
-getProcessID :: IO Int
-getProcessID = fromIntegral <$> P.getCurrentProcessId
-
-#else
-
-import qualified System.Posix.Process as P (getProcessID)
-getProcessID :: IO Int
-getProcessID = fromIntegral <$> P.getProcessID
-
-#endif