X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fvectorise%2FVectBuiltIn.hs;h=09000ea76d200ab965c81867c6e7e547ce0235da;hp=7dc84ee6997659d1798484672a044654843530be;hb=e4ff684d57b1caef2c42d645cafbe7a3b70ccfcc;hpb=276585028d51a2516a31b91a91a1f4bba5c9f8ba

diff --git a/compiler/vectorise/VectBuiltIn.hs b/compiler/vectorise/VectBuiltIn.hs
index 7dc84ee..09000ea 100644
--- a/compiler/vectorise/VectBuiltIn.hs
+++ b/compiler/vectorise/VectBuiltIn.hs
@@ -42,7 +42,7 @@ import Control.Monad   ( liftM, zipWithM )
 import Data.List       ( unzip4 )
 
 mAX_NDP_PROD :: Int
-mAX_NDP_PROD = 3
+mAX_NDP_PROD = 4
 
 mAX_NDP_SUM :: Int
 mAX_NDP_SUM = 3