[commit: ghc] wip/angerman/llvmng: no tbaa (d02741d)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/angerman/llvmng
Link       : http://ghc.haskell.org/trac/ghc/changeset/d02741d0c6b3aabbc6c00b225d9b8f6a37287d8f/ghc

>---------------------------------------------------------------

commit d02741d0c6b3aabbc6c00b225d9b8f6a37287d8f
Author: Moritz Angermann <moritz.angermann at gmail.com>
Date:   Sat Dec 2 14:09:03 2017 +0800

    no tbaa


>---------------------------------------------------------------

d02741d0c6b3aabbc6c00b225d9b8f6a37287d8f
 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 ]