More descriptive SMActual type variable name

qrilka · qrilka · commit 539a6472ac6e · 2019-02-05T11:27:05.000+03:00
diff --git a/src/Stack/Types/SourceMap.hs b/src/Stack/Types/SourceMap.hs
@@ -93,11 +93,11 @@ data SMWanted = SMWanted
 -- the contents of the global package database.
 --
 -- Invariant: a @PackageName@ appears in only one of the @Map@s.
-data SMActual a = SMActual
+data SMActual global = SMActual
   { smaCompiler :: !ActualCompiler
   , smaProject :: !(Map PackageName ProjectPackage)
   , smaDeps :: !(Map PackageName DepPackage)
-  , smaGlobal :: !(Map PackageName a)
+  , smaGlobal :: !(Map PackageName global)
   }
 
 newtype GlobalPackageVersion = GlobalPackageVersion Version
