diff options
Diffstat (limited to 'compiler/vectorise/Vectorise/Monad.hs')
| -rw-r--r-- | compiler/vectorise/Vectorise/Monad.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/vectorise/Vectorise/Monad.hs b/compiler/vectorise/Vectorise/Monad.hs index 4e7ee168b7..7c04dfe0b1 100644 --- a/compiler/vectorise/Vectorise/Monad.hs +++ b/compiler/vectorise/Vectorise/Monad.hs @@ -185,7 +185,7 @@ dumpVar dflags var addGlobalParallelVar :: Var -> VM () addGlobalParallelVar var = do { traceVt "addGlobalParallelVar" (ppr var) - ; updGEnv $ \env -> env{global_parallel_vars = extendVarSet (global_parallel_vars env) var} + ; updGEnv $ \env -> env{global_parallel_vars = extendDVarSet (global_parallel_vars env) var} } -- |Mark the given type constructor as parallel — i.e., its values might embed parallel arrays. |