[project @ 2000-06-15 15:56:51 by simonmar]

sigh, fix the ordering of the phases so that splitting works again.

diff --git a/ghc/driver/Main.hs b/ghc/driver/Main.hs
index 8509ee8..e71c377 100644 (file)
--- a/ghc/driver/Main.hs
+++ b/ghc/driver/Main.hs
@@ -94,8 +94,8 @@ data Phase
        | HCc           -- Haskellised C (as opposed to vanilla C) compilation
        | Mangle        -- assembly mangling, now done by a separate script.
        | SplitMangle   -- after mangler if splitting
-       | As
        | SplitAs
+       | As
        | Ln 
   deriving (Eq,Ord,Enum,Ix,Show,Bounded)
 
@@ -1121,11 +1121,11 @@ run_pipeline last_phase do_linking use_ofile orig_basename (phase, input_fn)
                     | otherwise -> As
 
                Cc -> As
-               As -> Ln
 
                Mangle | not split -> As
                SplitMangle -> SplitAs
-       
+               SplitAs -> Ln
+
                _  -> succ phase