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

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