added alltenses to the default search path (just like prelude)

This commit is contained in:
aarne
2012-12-20 16:05:34 +00:00
parent fa6f8f49ce
commit 793ba98249
2 changed files with 3 additions and 2 deletions

View File

@@ -124,7 +124,7 @@ compileModule opts1 env file = do
exists <- ioeIO $ doesFileExist file1
if exists
then return file1
else ioeErr $ Bad (render (text "None of this files exist:" $$ nest 2 (text file $$ text file1)))
else ioeErr $ Bad (render (text "None of these files exists:" $$ nest 2 (text file $$ text file1)))
else ioeErr $ Bad (render (text "File" <+> text file <+> text "does not exist."))
compileOne :: Options -> CompileEnv -> FullPath -> IOE CompileEnv