aboutsummaryrefslogtreecommitdiff
path: root/src/CabalHelper/Compiletime/Program
diff options
context:
space:
mode:
authorDaniel Gröber <dxld@darkboxed.org>2018-12-16 01:47:41 +0100
committerDaniel Gröber <dxld@darkboxed.org>2019-01-22 03:06:51 +0100
commit6208bb73fef1a12874db0e2d9b9f25f5dadc2e29 (patch)
treec31632c5682f2c5fadc83c090a765b4d513fc34c /src/CabalHelper/Compiletime/Program
parent30591c394974aa282891e37a6cff2802b4f92773 (diff)
Make most record fields strict
This lets GHC give better error messages when forgetting to initialize a field when using the `let field = _ in DataType{..}` RecordWildcards syntax.
Diffstat (limited to 'src/CabalHelper/Compiletime/Program')
-rw-r--r--src/CabalHelper/Compiletime/Program/GHC.hs16
1 files changed, 8 insertions, 8 deletions
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 }