X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fvectorise%2FVectorise%2FEnv.hs;h=5014fd6272f383deb64dc16e2f06f5409e2e68e3;hb=18691d440f90a3dff4ef538091c886af505e5cf5;hp=9a1fd4431a3310c9da60e4f0f6c396564929f5f4;hpb=f2aaae9757e7532485c97f6c9a9ed5437542d1dd;p=ghc-hetmet.git

diff --git a/compiler/vectorise/Vectorise/Env.hs b/compiler/vectorise/Vectorise/Env.hs
index 9a1fd44..5014fd6 100644
--- a/compiler/vectorise/Vectorise/Env.hs
+++ b/compiler/vectorise/Vectorise/Env.hs
@@ -75,7 +75,8 @@ emptyLocalEnv = LocalEnv {
 --      These are things the exist at top-level.
 data GlobalEnv 
         = GlobalEnv {
-        -- | Mapping from global variables to their vectorised versions.
+        -- | Mapping from global variables to their vectorised versions — aka the /vectorisation
+        --   map/.
           global_vars           :: VarEnv Var
 
         -- | Mapping from global variables that have a vectorisation declaration to the right-hand