[project @ 2005-05-24 14:19:09 by simonmar]

If hsc_lang is HscNothing, produce an empty linkable.

diff --git a/ghc/compiler/main/DriverPipeline.hs b/ghc/compiler/main/DriverPipeline.hs
index 125533b..ec70b8d 100644 (file)
--- a/ghc/compiler/main/DriverPipeline.hs
+++ b/ghc/compiler/main/DriverPipeline.hs
@@ -212,6 +212,9 @@ compile hsc_env msg_act mod_summary maybe_old_linkable old_iface mod_index nmods
 #endif
                       Nothing -> panic "compile: no interpreted code"
 
+               HscNothing
+                 -> return ([], ms_hs_date mod_summary)
+
                -- We're in --make mode: finish the compilation pipeline.
                _other
                  -> do runPipeline StopLn dflags (output_fn,Nothing) Persistent