[project @ 2001-08-30 16:21:45 by rrt]

Remove a spurious space. Oh, yes.

diff --git a/ghc/compiler/main/DriverPipeline.hs b/ghc/compiler/main/DriverPipeline.hs
index c69f5ba..3fd507c 100644 (file)
--- a/ghc/compiler/main/DriverPipeline.hs
+++ b/ghc/compiler/main/DriverPipeline.hs
@@ -868,7 +868,7 @@ doLink o_files = do
                      ++ pkg_extra_ld_opts
                      ++ extra_ld_opts
                      ++ if static && not no_hs_main then
-                           [ "-u", prefixUnderscore "PrelMain_mainIO_closure" ,
+                           [ "-u", prefixUnderscore "PrelMain_mainIO_closure",
                              "-u", prefixUnderscore "__init_PrelMain"] 
                         else []))