From: simonpj <unknown>
Date: Mon, 5 Mar 2001 12:18:21 +0000 (+0000)
Subject: [project @ 2001-03-05 12:18:21 by simonpj]
X-Git-Tag: Approximately_9120_patches~2469
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=d14c46d36924cb16b5619c0ba37241324ca1c3bd;p=ghc-hetmet.git

[project @ 2001-03-05 12:18:21 by simonpj]
Make error message more helpful
---

diff --git a/ghc/compiler/main/Main.hs b/ghc/compiler/main/Main.hs
index bfd2087..1753cd3 100644
--- a/ghc/compiler/main/Main.hs
+++ b/ghc/compiler/main/Main.hs
@@ -1,6 +1,6 @@
 {-# OPTIONS -fno-warn-incomplete-patterns #-}
 -----------------------------------------------------------------------------
--- $Id: Main.hs,v 1.57 2001/02/28 11:44:39 simonpj Exp $
+-- $Id: Main.hs,v 1.58 2001/03/05 12:18:21 simonpj Exp $
 --
 -- GHC Driver program
 --
@@ -139,7 +139,7 @@ main =
 	else do am_inplace <- doesFileExist inplace_pkgconfig
 	        if am_inplace
 		    then writeIORef v_Path_package_config inplace_pkgconfig
-		    else throwDyn (OtherError "can't find package.conf")
+		    else throwDyn (OtherError ("Can't find package.conf in " ++ inplace_pkgconfig))
 
 	-- set the location of our various files
    if am_installed