summaryrefslogtreecommitdiff
path: root/compiler/llvmGen/Llvm/PpLlvm.hs
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2017-02-17 13:14:00 +0000
committerSimon Peyton Jones <simonpj@microsoft.com>2017-02-17 13:16:15 +0000
commit8d401e50ce35525dcdc6a21fcf952c3cbf3a72d4 (patch)
treeb437497e10ad09b165beb126cf0b22b161d54804 /compiler/llvmGen/Llvm/PpLlvm.hs
parente52a335d3ae2437f3705baa8c81e3a62ebdd75ab (diff)
downloadhaskell-8d401e50ce35525dcdc6a21fcf952c3cbf3a72d4.tar.gz
Honour -dsuppress-uniques more thoroughly
I found that tests parser/should_compile/DumpRenamedAst and friends were printing uniques, which makes the test fragile. But -dsuppress-uniques made no difference! It turned out that pprName wasn't properly consulting Opt_SuppressUniques. This patch fixes the problem, and updates those three tests to use -dsuppress-uniques
Diffstat (limited to 'compiler/llvmGen/Llvm/PpLlvm.hs')
-rw-r--r--compiler/llvmGen/Llvm/PpLlvm.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/llvmGen/Llvm/PpLlvm.hs b/compiler/llvmGen/Llvm/PpLlvm.hs
index cdf8cc7791..293999bd1e 100644
--- a/compiler/llvmGen/Llvm/PpLlvm.hs
+++ b/compiler/llvmGen/Llvm/PpLlvm.hs
@@ -196,7 +196,7 @@ ppLlvmBlock (LlvmBlock blockId stmts) =
-- | Print out an LLVM block label.
ppLlvmBlockLabel :: LlvmBlockId -> SDoc
-ppLlvmBlockLabel id = pprUnique id <> colon
+ppLlvmBlockLabel id = pprUniqueAlways id <> colon
-- | Print out an LLVM statement.