aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/CabalHelper/Compiletime/Compile.hs16
-rw-r--r--src/CabalHelper/Compiletime/Program/GHC.hs16
2 files changed, 16 insertions, 16 deletions
diff --git a/src/CabalHelper/Compiletime/Compile.hs b/src/CabalHelper/Compiletime/Compile.hs
index 97adac2..c39a731 100644
--- a/src/CabalHelper/Compiletime/Compile.hs
+++ b/src/CabalHelper/Compiletime/Compile.hs
@@ -71,19 +71,19 @@ import Paths_cabal_helper (version)
data Compile
= CompileWithCabalSource
- { compCabalSourceDir :: CabalSourceDir
- , compCabalSourceVersion :: Version
+ { compCabalSourceDir :: !CabalSourceDir
+ , compCabalSourceVersion :: !Version
}
| CompileWithCabalPackage
- { compPackageSource :: GhcPackageSource
- , compCabalVersion :: ResolvedCabalVersion
- , compProductTarget :: CompilationProductScope
+ { compPackageSource :: !GhcPackageSource
+ , compCabalVersion :: !ResolvedCabalVersion
+ , compProductTarget :: !CompilationProductScope
}
data CompPaths = CompPaths
- { compBuildDir:: FilePath
- , compOutDir :: FilePath
- , compExePath :: FilePath
+ { compBuildDir:: !FilePath
+ , compOutDir :: !FilePath
+ , compExePath :: !FilePath
}
-- | The Helper executable we produce as a compilation product can either be
diff --git a/src/CabalHelper/Compiletime/Program/GHC.hs b/src/CabalHelper/Compiletime/Program/GHC.hs
index 4565a37..e21a258 100644
--- a/src/CabalHelper/Compiletime/Program/GHC.hs
+++ b/src/CabalHelper/Compiletime/Program/GHC.hs
@@ -49,15 +49,15 @@ data GhcPackageSource
| GPSPackageEnv !PackageEnvFile
data GhcInvocation = GhcInvocation
- { giOutDir :: FilePath
- , giOutput :: FilePath
- , giCPPOptions :: [String]
- , giIncludeDirs :: [FilePath]
- , giHideAllPackages :: Bool
- , giPackages :: [String]
- , giWarningFlags :: [String]
- , giInputs :: [String]
+ { giOutDir :: !FilePath
+ , giOutput :: !FilePath
+ , giCPPOptions :: ![String]
, giPackageSource :: !GhcPackageSource
+ , giIncludeDirs :: ![FilePath]
+ , giHideAllPackages :: !Bool
+ , giPackages :: ![String]
+ , giWarningFlags :: ![String]
+ , giInputs :: ![String]
}
newtype GhcVersion = GhcVersion { unGhcVersion :: Version }