diff options
author | Daniel Gröber <dxld@darkboxed.org> | 2018-12-16 01:47:41 +0100 |
---|---|---|
committer | Daniel Gröber <dxld@darkboxed.org> | 2019-01-22 03:06:51 +0100 |
commit | 6208bb73fef1a12874db0e2d9b9f25f5dadc2e29 (patch) | |
tree | c31632c5682f2c5fadc83c090a765b4d513fc34c /src/CabalHelper/Compiletime/Program | |
parent | 30591c394974aa282891e37a6cff2802b4f92773 (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.hs | 16 |
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 } |