From f4356450b3b30b1978a5a37ec5597e2db5a9d7af Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Tue, 4 Dec 2001 16:42:06 +0000
Subject: [PATCH] [project @ 2001-12-04 16:42:06 by sof] genPipeLine: DoMkDll
 didn't have a stop_phase, causing any use of --mk-dll to
 fall over.

MERGE TO STABLE.
---
 ghc/compiler/main/DriverPipeline.hs |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ghc/compiler/main/DriverPipeline.hs b/ghc/compiler/main/DriverPipeline.hs
index ec85815..44dbe50 100644
--- a/ghc/compiler/main/DriverPipeline.hs
+++ b/ghc/compiler/main/DriverPipeline.hs
@@ -84,7 +84,7 @@ getGhcMode flags
 	([(flag,one)], rest) -> return (rest, one, flag)
 	(_    , _   ) -> 
 	  throwDyn (UsageError 
-		"only one of the flags -M, -E, -C, -S, -c, --make, --interactive, -mk-dll is allowed")
+		"only one of the flags -M, -E, -C, -S, -c, --make, --interactive, --mk-dll is allowed")
 
 -----------------------------------------------------------------------------
 -- genPipeline
@@ -195,6 +195,7 @@ genPipeline todo stop_flag persistent_output lang (filename,suffix)
 			StopBefore phase      -> phase
 			DoMkDependHS	      -> Ln
 			DoLink                -> Ln
+			DoMkDLL               -> Ln
    ----------- -----  ----   ---   --   --  -  -  -
 
 	-- this shouldn't happen.
-- 
1.7.10.4