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

git at git.haskell.org git at git.haskell.org
Wed Feb 7 06:40:12 UTC 2018


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

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

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

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

    no tbaa


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

3cf9fd96271328f8121484f15ccd2b72c227b64e
 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