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/Compile.hs | |
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/Compile.hs')
-rw-r--r-- | src/CabalHelper/Compiletime/Compile.hs | 16 |
1 files changed, 8 insertions, 8 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 |