From 95f5dffb70a06d84a6c05b4df2e17b29bd93942a Mon Sep 17 00:00:00 2001 From: Sebastian Wild Date: Sat, 17 Nov 2018 13:48:58 +0100 Subject: Implement behaviour for cabal new-* (#61) Add list of components to Unit data type to handle v2 based builds per cabal unit. --- src/CabalHelper/Compiletime/Program/Stack.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/CabalHelper/Compiletime/Program/Stack.hs') diff --git a/src/CabalHelper/Compiletime/Program/Stack.hs b/src/CabalHelper/Compiletime/Program/Stack.hs index 4f3680f..f4ada8f 100644 --- a/src/CabalHelper/Compiletime/Program/Stack.hs +++ b/src/CabalHelper/Compiletime/Program/Stack.hs @@ -36,7 +36,7 @@ import Prelude import CabalHelper.Compiletime.Types import CabalHelper.Compiletime.Types.RelativePath -getUnit :: QueryEnvI c 'Stack -> CabalFile -> IO Unit +getUnit :: QueryEnvI c 'Stack -> CabalFile -> IO (Unit 'Stack) getUnit qe cabal_file@(CabalFile cabal_file_path) = do let pkgdir = takeDirectory cabal_file_path let pkg_name = dropExtension $ takeFileName cabal_file_path @@ -47,6 +47,7 @@ getUnit qe cabal_file@(CabalFile cabal_file_path) = do , uPackageDir = pkgdir , uCabalFile = cabal_file , uDistDir = DistDirLib distdirv1 + , uImpl = UnitImplStack } -- TODO: patch ghc/ghc-pkg program paths like in ghc-mod when using stack so -- cgit v1.2.3