[project @ 2003-10-30 09:37:57 by simonpj]
authorsimonpj <unknown>
Thu, 30 Oct 2003 09:37:57 +0000 (09:37 +0000)
committersimonpj <unknown>
Thu, 30 Oct 2003 09:37:57 +0000 (09:37 +0000)
Formatting only

ghc/compiler/typecheck/TcRnDriver.lhs

index b1dd133..59d790f 100644 (file)
@@ -887,7 +887,7 @@ checkMain
         let { main_mod = case mb_main_mod of {
                                Just mod -> mkModuleName mod ;
                                Nothing  -> mAIN_Name } ;
-               main_fn  = case mb_main_fn of {
+              main_fn  = case mb_main_fn of {
                                Just fn -> mkRdrUnqual (mkVarOcc (mkFastString fn)) ;
                                Nothing -> main_RDR_Unqual } } ;