Warning when there is no HP file

This commit is contained in:
Michael Snoyman 2013-06-30 13:40:41 +03:00
parent 574ba0ba04
commit c5733d1fca

View File

@ -18,7 +18,9 @@ loadHaskellPlatform ss = do
e <- doesFileExist fp
if e
then fmap (Just . parseHP) $ readFile fp
else return Nothing
else do
putStrLn "Warning: No Haskell Platform found for current GHC version"
return Nothing
where
GhcMajorVersion x y = selectGhcVersion ss