Fix vectoriser bug

[ghc-hetmet.git] / compiler / vectorise / VectMonad.hs

diff --git a/compiler/vectorise/VectMonad.hs b/compiler/vectorise/VectMonad.hs
index ecbc7d9..2e100a9 100644 (file)
--- a/compiler/vectorise/VectMonad.hs
+++ b/compiler/vectorise/VectMonad.hs
@@ -336,7 +336,7 @@ newLocalVar fs ty
       return $ mkSysLocal fs u ty
 
 newDummyVar :: Type -> VM Var
       return $ mkSysLocal fs u ty
 
 newDummyVar :: Type -> VM Var

-newDummyVar = newLocalVar (fsLit "ds")
+newDummyVar = newLocalVar (fsLit "vv")

 
 newTyVar :: FastString -> Kind -> VM Var
 newTyVar fs k
 
 newTyVar :: FastString -> Kind -> VM Var
 newTyVar fs k