From: sof <unknown>
Date: Fri, 5 Jul 2002 20:30:38 +0000 (+0000)
Subject: [project @ 2002-07-05 20:30:38 by sof]
X-Git-Tag: Approx_11550_changesets_converted~1882
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=3b9b4df7ea723ad6c3c1974c148ccc81f9e67270;p=ghc-hetmet.git

[project @ 2002-07-05 20:30:38 by sof]
isSourceFile: widened to also return True for .hc files
---

diff --git a/ghc/compiler/main/DriverPhases.hs b/ghc/compiler/main/DriverPhases.hs
index 214cd36..0871562 100644
--- a/ghc/compiler/main/DriverPhases.hs
+++ b/ghc/compiler/main/DriverPhases.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: DriverPhases.hs,v 1.20 2002/07/05 16:15:14 sof Exp $
+-- $Id: DriverPhases.hs,v 1.21 2002/07/05 20:30:38 sof Exp $
 --
 -- GHC Driver
 --
@@ -122,5 +122,5 @@ isExtCore_file      = extcoreish_suffix     . getFileSuffix
 
 isSourceFile :: FilePath -> Bool
 isSourceFile   f    =
-   haskellish_src_file f ||
+   haskellish_file f ||
    cish_file   f