[commit: ghc] wip/simd: Add 256-bit-wide SIMD primitives. (5e961cf)

[git at git.haskell.org]

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

On branch  : wip/simd
Link       : http://ghc.haskell.org/trac/ghc/changeset/5e961cfacbeb3e7917a22a6b825ace15afc751bd/ghc

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

commit 5e961cfacbeb3e7917a22a6b825ace15afc751bd
Author: Geoffrey Mainland <gmainlan at microsoft.com>
Date:   Thu Aug 22 11:03:46 2013 +0100

    Add 256-bit-wide SIMD primitives.


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

5e961cfacbeb3e7917a22a6b825ace15afc751bd
 compiler/prelude/primops.txt.pp |   16 ++++++++++++----
 1 file changed, 12 insertions(+), 4 deletions(-)

diff --git a/compiler/prelude/primops.txt.pp b/compiler/prelude/primops.txt.pp
index 6c52dea..77de52f 100644
--- a/compiler/prelude/primops.txt.pp
+++ b/compiler/prelude/primops.txt.pp
@@ -2304,19 +2304,27 @@ section "SIMD Vectors"
 
 #define ALL_VECTOR_TYPES \
   [<Int8,Int#,16>,<Int16,Int#,8>,<Int32,INT32,4>,<Int64,INT64,2> \
+  ,<Int8,Int#,32>,<Int16,Int#,16>,<Int32,INT32,8>,<Int64,INT64,4> \
   ,<Word8,Word#,16>,<Word16,Word#,8>,<Word32,WORD32,4>,<Word64,WORD64,2> \
-  ,<Float,Float#,4>,<Double,Double#,2>]
+  ,<Word8,Word#,32>,<Word16,Word#,16>,<Word32,WORD32,8>,<Word64,WORD64,4> \
+  ,<Float,Float#,4>,<Double,Double#,2> \
+  ,<Float,Float#,8>,<Double,Double#,4>]
 
 #define SIGNED_VECTOR_TYPES \
   [<Int8,Int#,16>,<Int16,Int#,8>,<Int32,INT32,4>,<Int64,INT64,2> \
-  ,<Float,Float#,4>,<Double,Double#,2>]
+  ,<Int8,Int#,32>,<Int16,Int#,16>,<Int32,INT32,8>,<Int64,INT64,4> \
+  ,<Float,Float#,4>,<Double,Double#,2> \
+  ,<Float,Float#,8>,<Double,Double#,4>]
 
 #define FLOAT_VECTOR_TYPES \
-  [<Float,Float#,4>,<Double,Double#,2>]
+  [<Float,Float#,4>,<Double,Double#,2> \
+  ,<Float,Float#,8>,<Double,Double#,4>]
 
 #define INT_VECTOR_TYPES \
   [<Int8,Int#,16>,<Int16,Int#,8>,<Int32,INT32,4>,<Int64,INT64,2> \
-  ,<Word8,Word#,16>,<Word16,Word#,8>,<Word32,WORD32,4>,<Word64,WORD64,2>]
+  ,<Int8,Int#,32>,<Int16,Int#,16>,<Int32,INT32,8>,<Int64,INT64,4> \
+  ,<Word8,Word#,16>,<Word16,Word#,8>,<Word32,WORD32,4>,<Word64,WORD64,2> \
+  ,<Word8,Word#,32>,<Word16,Word#,16>,<Word32,WORD32,8>,<Word64,WORD64,4>]
 
 primtype VECTOR
    with llvm_only = True