module Paths_recursion_schemes (
version,
getBinDir, getLibDir, getDynLibDir, getDataDir, getLibexecDir,
getDataFileName, getSysconfDir
) where
import qualified Control.Exception as Exception
import Data.Version (Version(..))
import System.Environment (getEnv)
import Prelude
#if defined(VERSION_base)
#if MIN_VERSION_base(4,0,0)
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a
#else
catchIO :: IO a -> (Exception.Exception -> IO a) -> IO a
#endif
#else
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a
#endif
catchIO = Exception.catch
version :: Version
version = Version [5,0,2] []
bindir, libdir, dynlibdir, datadir, libexecdir, sysconfdir :: FilePath
bindir = "/usr/bin"
libdir = "/usr/lib/haskell-packages/ghc/lib/x86_64-linux-ghc-8.2.2/recursion-schemes-5.0.2-13EJl2KHN3X2FDZ7MBLD2b"
dynlibdir = "/usr/lib/haskell-packages/ghc/lib/x86_64-linux-ghc-8.2.2"
datadir = "/usr/share/recursion-schemes"
libexecdir = "/usr/lib/x86_64-linux-ghc-8.2.2/recursion-schemes-5.0.2"
sysconfdir = "/usr/etc"
getBinDir, getLibDir, getDynLibDir, getDataDir, getLibexecDir, getSysconfDir :: IO FilePath
getBinDir = catchIO (getEnv "recursion_schemes_bindir") (\_ -> return bindir)
getLibDir = catchIO (getEnv "recursion_schemes_libdir") (\_ -> return libdir)
getDynLibDir = catchIO (getEnv "recursion_schemes_dynlibdir") (\_ -> return dynlibdir)
getDataDir = catchIO (getEnv "recursion_schemes_datadir") (\_ -> return datadir)
getLibexecDir = catchIO (getEnv "recursion_schemes_libexecdir") (\_ -> return libexecdir)
getSysconfDir = catchIO (getEnv "recursion_schemes_sysconfdir") (\_ -> return sysconfdir)
getDataFileName :: FilePath -> IO FilePath
getDataFileName name = do
dir <- getDataDir
return (dir ++ "/" ++ name)