Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/009058b28f1928e954eb958a77d4fb9dc012bee6

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

commit 009058b28f1928e954eb958a77d4fb9dc012bee6
Author: Manuel M T Chakravarty <[email protected]>
Date:   Fri Mar 23 21:44:14 2012 +1100

    Add -favoid-vect
    
    * Enables vectorisation avoidance
    
    (This commit only adds the flag, not the actual vectorisation avoidance 
transformation.)

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

 compiler/main/DynFlags.hs  |    2 ++
 docs/users_guide/flags.xml |   14 ++++++++++++++
 2 files changed, 16 insertions(+), 0 deletions(-)

diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs
index eeb1dfc..8be98d9 100644
--- a/compiler/main/DynFlags.hs
+++ b/compiler/main/DynFlags.hs
@@ -252,6 +252,7 @@ data DynFlag
    | Opt_DictsCheap
    | Opt_EnableRewriteRules             -- Apply rewrite rules during 
simplification
    | Opt_Vectorise
+   | Opt_AvoidVect
    | Opt_RegsGraph                      -- do graph coloring register 
allocation
    | Opt_RegsIterative                  -- do iterative coalescing graph 
coloring register allocation
    | Opt_PedanticBottoms                -- Be picky about how we treat bottom
@@ -1865,6 +1866,7 @@ fFlags = [
   ( "run-cpsz",                         Opt_RunCPSZ, nop ),
   ( "new-codegen",                      Opt_TryNewCodeGen, nop ),
   ( "vectorise",                        Opt_Vectorise, nop ),
+  ( "avoid-vect",                       Opt_AvoidVect, nop ),
   ( "regs-graph",                       Opt_RegsGraph, nop ),
   ( "regs-iterative",                   Opt_RegsIterative, nop ),
   ( "llvm-tbaa",                        Opt_LlvmTBAA, nop),
diff --git a/docs/users_guide/flags.xml b/docs/users_guide/flags.xml
index 1ffd765..73f9414 100644
--- a/docs/users_guide/flags.xml
+++ b/docs/users_guide/flags.xml
@@ -1502,6 +1502,20 @@
           </row>
 
           <row>
+            <entry><option>-fvectorise</option></entry>
+            <entry>Enable vectorisation of nested data parallelism</entry>
+            <entry>dynamic</entry>
+            <entry><option>-fno-vectorise</option></entry>
+          </row>
+
+          <row>
+            <entry><option>-favoid-vect</option></entry>
+            <entry>Enable vectorisation avoidance (EXPERIMENTAL)</entry>
+            <entry>dynamic</entry>
+            <entry><option>-fno-avoid-vect</option></entry>
+          </row>
+
+          <row>
             <entry><option>-fexcess-precision</option></entry>
             <entry>Enable excess intermediate precision</entry>
             <entry>dynamic</entry>



_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to