3 module Language.Haskell.LSP.Test.Compat where
8 import qualified System.Win32.Process as P (getCurrentProcessId)
10 getProcessID = fromIntegral <$> P.getCurrentProcessId
14 import qualified System.Posix.Process as P (getProcessID)
15 getProcessID :: IO Int
16 getProcessID = fromIntegral <$> P.getProcessID