X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2FMain.hs;h=9c993345bb7fa093f2722e668466f637359a298d;hb=fdf8656855d26105ff36bdd24d41827b05037b91;hp=da2a1f2329621b9fab71a448c4434a69ef678d58;hpb=46809fa91667e952afe016e4cd704b21274241b4;p=ghc-hetmet.git

diff --git a/ghc/Main.hs b/ghc/Main.hs
index da2a1f2..9c99334 100644
--- a/ghc/Main.hs
+++ b/ghc/Main.hs
@@ -591,7 +591,7 @@ doMake srcs  = do
 	haskellish (f,Nothing) = 
 	  looksLikeModuleName f || isHaskellSrcFilename f || '.' `notElem` f
 	haskellish (_,Just phase) = 
-	  phase `notElem` [As, Cc, CmmCpp, Cmm, StopLn]
+	  phase `notElem` [As, Cc, Cobjc, CmmCpp, Cmm, StopLn]
 
     hsc_env <- GHC.getSession