hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fixing tests.

Browse Source
This commit is contained in:
Kazu Yamamoto 2014-10-06 15:29:05 +09:00
parent 44ed695535
commit ef371a7ebf
1 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
Language/Haskell/GhcMod/Utils.hs
View File

@ -55,11 +55,6 @@ ghcModExecutable :: IO FilePath
ghcModExecutable = do ghcModExecutable = do
dir <- getExecutablePath' dir <- getExecutablePath'
return $ dir </> "ghc-mod" return $ dir </> "ghc-mod"
#else
ghcModExecutable = do _ <- getExecutablePath' -- get rid of unused warning when
-- compiling spec
return "dist/build/ghc-mod/ghc-mod"
#endif
where where
getExecutablePath' :: IO FilePath getExecutablePath' :: IO FilePath
# if __GLASGOW_HASKELL__ >= 706 # if __GLASGOW_HASKELL__ >= 706
@ -67,3 +62,6 @@ ghcModExecutable = do _ <- getExecutablePath' -- get rid of unused warning when
# else # else
getExecutablePath' = return "" getExecutablePath' = return ""
# endif # endif
#else
ghcModExecutable = return "dist/build/ghc-mod/ghc-mod"
#endif