Skip to content

Commit 2ccb3c7

Browse files
committed
refactor(cabal-install): add more HasCallstack
1 parent a4cc95d commit 2ccb3c7

File tree

1 file changed

+9
-5
lines changed

1 file changed

+9
-5
lines changed

cabal-install/src/Distribution/Client/ProjectPlanning.hs

Lines changed: 9 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -363,7 +363,8 @@ sanityCheckElaboratedPackage
363363
-- | Return the up-to-date project config and information about the local
364364
-- packages within the project.
365365
rebuildProjectConfig
366-
:: Verbosity
366+
:: HasCallStack
367+
=> Verbosity
367368
-> HttpTransport
368369
-> DistDirLayout
369370
-> ProjectConfig
@@ -706,7 +707,8 @@ See #9840 for more information about the problems surrounding the lossy
706707
-- dependencies of executables and setup scripts.
707708
--
708709
rebuildInstallPlan
709-
:: Verbosity
710+
:: HasCallStack
711+
=> Verbosity
710712
-> DistDirLayout
711713
-> CabalDirLayout
712714
-> ProjectConfig
@@ -957,7 +959,8 @@ rebuildInstallPlan
957959
-- version of the plan has the final nix-style hashed ids.
958960
--
959961
phaseElaboratePlan
960-
:: ProjectConfig
962+
:: HasCallStack
963+
=> ProjectConfig
961964
-> Staged Toolchain
962965
-> Staged (Maybe PkgConfigDb)
963966
-> SolverInstallPlan
@@ -1623,7 +1626,8 @@ planPackages
16231626
-- In theory should be able to make an elaborated install plan with a policy
16241627
-- matching that of the classic @cabal install --user@ or @--global@
16251628
elaborateInstallPlan
1626-
:: Verbosity
1629+
:: HasCallStack
1630+
=> Verbosity
16271631
-> Staged Toolchain
16281632
-> Staged (Maybe PkgConfigDb)
16291633
-> DistDirLayout
@@ -1676,7 +1680,7 @@ elaborateInstallPlan
16761680
)
16771681
f _ = Nothing
16781682

1679-
elaboratedInstallPlan :: LogProgress ElaboratedInstallPlan
1683+
elaboratedInstallPlan :: HasCallStack => LogProgress ElaboratedInstallPlan
16801684
elaboratedInstallPlan =
16811685
flip InstallPlan.fromSolverInstallPlanWithProgress solverPlan $ \mapDep planpkg ->
16821686
case planpkg of

0 commit comments

Comments
 (0)