adding the current dir to import dirs.

This commit is contained in:
Kazu Yamamoto 2011-12-19 15:54:46 +09:00
parent 100178c8ad
commit f1b68d5adf
1 changed files with 1 additions and 1 deletions

View File

@ -18,7 +18,7 @@ import Types
---------------------------------------------------------------- ----------------------------------------------------------------
importDirs :: [String] importDirs :: [String]
importDirs = ["..","../..","../../..","../../../..","../../../../.."] importDirs = [".","..","../..","../../..","../../../..","../../../../.."]
initializeGHC :: Options -> FilePath -> [String] -> Bool -> Ghc (FilePath,LogReader) initializeGHC :: Options -> FilePath -> [String] -> Bool -> Ghc (FilePath,LogReader)
initializeGHC opt fileName ghcOptions logging = do initializeGHC opt fileName ghcOptions logging = do