diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-06-20 17:32:50 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-06-20 17:32:50 +0100 |
| commit | 4717b03b53538b6adedda51a67307f23ef00a41f (patch) | |
| tree | 7fef6a3d62bad432825465ef998583aeaf35d8ab /compiler/llvmGen | |
| parent | 0f1c5b1eda3c780498667607975d5121384a9095 (diff) | |
| download | haskell-4717b03b53538b6adedda51a67307f23ef00a41f.tar.gz | |
Remove some more redundant Platform arguments
Diffstat (limited to 'compiler/llvmGen')
| -rw-r--r-- | compiler/llvmGen/LlvmCodeGen.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/llvmGen/LlvmCodeGen.hs b/compiler/llvmGen/LlvmCodeGen.hs index 00ff35d2ce..4465957de4 100644 --- a/compiler/llvmGen/LlvmCodeGen.hs +++ b/compiler/llvmGen/LlvmCodeGen.hs @@ -134,7 +134,7 @@ cmmLlvmGen dflags us env cmm = do fixStgRegisters cmm dumpIfSet_dyn dflags Opt_D_dump_opt_cmm "Optimised Cmm" - (pprCmmGroup (targetPlatform dflags) [fixed_cmm]) + (pprCmmGroup [fixed_cmm]) -- generate llvm code from cmm let ((env', llvmBC), usGen) = {-# SCC "llvm_proc_gen" #-} |