[commit: ghc] wip/angerman/llvmng: no tbaa (72a3b94)
git at git.haskell.org
git at git.haskell.org
Fri Dec 8 05:22:27 UTC 2017
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/angerman/llvmng
Link : http://ghc.haskell.org/trac/ghc/changeset/72a3b9468eefe3db60ce8a7050f230a8a1bf0151/ghc
>---------------------------------------------------------------
commit 72a3b9468eefe3db60ce8a7050f230a8a1bf0151
Author: Moritz Angermann <moritz.angermann at gmail.com>
Date: Sat Dec 2 14:09:03 2017 +0800
no tbaa
>---------------------------------------------------------------
72a3b9468eefe3db60ce8a7050f230a8a1bf0151
compiler/main/DriverPipeline.hs | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/compiler/main/DriverPipeline.hs b/compiler/main/DriverPipeline.hs
index 269017c..035fb17 100644
--- a/compiler/main/DriverPipeline.hs
+++ b/compiler/main/DriverPipeline.hs
@@ -812,8 +812,8 @@ fastLlvmPipeline dflags
llvmOptions :: DynFlags
-> [(String, String)] -- ^ pairs of (opt, llc) arguments
llvmOptions dflags =
- [("-enable-tbaa -tbaa", "-enable-tbaa") | gopt Opt_LlvmTBAA dflags ]
- ++ [("-relocation-model=" ++ rmodel
+-- [("-enable-tbaa -tbaa", "-enable-tbaa") | gopt Opt_LlvmTBAA dflags ]
+ [("-relocation-model=" ++ rmodel
,"-relocation-model=" ++ rmodel) | not (null rmodel)]
++ [("-stack-alignment=" ++ (show align)
,"-stack-alignment=" ++ (show align)) | align > 0 ]
More information about the ghc-commits
mailing list