@@ -32,8 +32,13 @@ import Paths_idris
34overrideDataDirWith :: String -> IO FilePath
34overrideDataDirWith :: String -> IO FilePath
35−overrideDataDirWith envVar = do envValue <- lookupEnv envVar
35+overrideDataDirWith envVar = do
36+ envValue <- lookupEnv envVar
36− maybe getDataDir return envValue
39+ ddir <- getDataDir
40+ return (ddir </> "libs")
41+ Just ddir -> return ddir
38getCC :: IO String
43getCC :: IO String
39getCC = fromMaybe "gcc" <$> lookupEnv "IDRIS_CC"
44getCC = fromMaybe "gcc" <$> lookupEnv "IDRIS_CC"