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

git at git.haskell.org git at git.haskell.org
Mon Dec 4 02:42:44 UTC 2017


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

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

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

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

    no tbaa


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

3bf1ed59670bd6c94ad36062c848fbe9a1a0385b
 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 180f362..af64874 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