[commit: ghc] wip/simd: Flesh out 128-bit wide SIMD primops. (638cd12)

[git at git.haskell.org]

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

On branch  : wip/simd
Link       : http://ghc.haskell.org/trac/ghc/changeset/638cd12df65d59162b904576367a1ecda409353d/ghc

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

commit 638cd12df65d59162b904576367a1ecda409353d
Author: Geoffrey Mainland <gmainlan at microsoft.com>
Date:   Wed Aug 21 16:55:26 2013 +0100

    Flesh out 128-bit wide SIMD primops.


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

638cd12df65d59162b904576367a1ecda409353d
 compiler/prelude/primops.txt.pp |   10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

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