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

[git at git.haskell.org]

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

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

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

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

    Flesh out 128-bit wide SIMD primops.


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

bc0e6fa2b73c2a1bf14bea06299df7d16f0c9c74
 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 1f2d9ac..6c52dea 100644
--- a/compiler/prelude/primops.txt.pp
+++ b/compiler/prelude/primops.txt.pp
@@ -2303,20 +2303,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