From 7f24ae51ed36c5c0308a2d0de23e243f32a0043c Mon Sep 17 00:00:00 2001 From: Lemmih Date: Sat, 18 Mar 2006 17:18:48 +0000 Subject: [PATCH] Don't generate stub files when -fno-code is given. --- ghc/compiler/main/CodeOutput.lhs | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/ghc/compiler/main/CodeOutput.lhs b/ghc/compiler/main/CodeOutput.lhs index 8e4abbc..0148ca4 100644 --- a/ghc/compiler/main/CodeOutput.lhs +++ b/ghc/compiler/main/CodeOutput.lhs @@ -61,11 +61,7 @@ codeOutput :: DynFlags -> IO (Bool{-stub_h_exists-}, Bool{-stub_c_exists-}) codeOutput dflags this_mod location foreign_stubs pkg_deps flat_abstractC - | HscNothing <- hscTarget dflags - -- We aren't interested in any code when HscNothing is our target. - = return (False, False) - | otherwise - = + = -- You can have C (c_output) or assembly-language (ncg_output), -- but not both. [Allowing for both gives a space leak on -- flat_abstractC. WDP 94/10] -- 1.7.10.4