diff options
| author | David Terei <davidterei@gmail.com> | 2012-01-10 00:02:17 -0800 |
|---|---|---|
| committer | David Terei <davidterei@gmail.com> | 2012-01-10 00:02:17 -0800 |
| commit | 4a0eb925b4e5cfc917365521caee1d9041fb2d98 (patch) | |
| tree | 9bcb27812af69a13356cdebc4795e8bad2cfbc2b /compiler/llvmGen/LlvmCodeGen.hs | |
| parent | a63c4237469307c425456c6acf1578f47c86f3a4 (diff) | |
| download | haskell-4a0eb925b4e5cfc917365521caee1d9041fb2d98.tar.gz | |
Improve style of '-ddump-llvm' output. (#5750)
Diffstat (limited to 'compiler/llvmGen/LlvmCodeGen.hs')
| -rw-r--r-- | compiler/llvmGen/LlvmCodeGen.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/llvmGen/LlvmCodeGen.hs b/compiler/llvmGen/LlvmCodeGen.hs index f802fc414c..f239ee50cf 100644 --- a/compiler/llvmGen/LlvmCodeGen.hs +++ b/compiler/llvmGen/LlvmCodeGen.hs @@ -48,6 +48,7 @@ llvmCodeGen dflags h us cmms in do showPass dflags "LlVM CodeGen" bufh <- newBufHandle h + dumpIfSet_dyn dflags Opt_D_dump_llvm "LLVM Code" $ docToSDoc pprLlvmHeader Prt.bufLeftRender bufh $ pprLlvmHeader ver <- (fromMaybe defaultLlvmVersion) `fmap` figureLlvmVersion dflags env' <- {-# SCC "llvm_datas_gen" #-} |