@@ -34,8 +34,8 @@ import Data.Aeson hiding (Error)
3434import Data.Bifunctor
3535import qualified Data.ByteString.Base16 as B16
3636import qualified Data.ByteString.Char8 as B
37- import Data.Default
3837import Data.Char (isLower )
38+ import Data.Default
3939import Data.Either.Extra
4040import Data.Function
4141import Data.Hashable
@@ -943,7 +943,7 @@ renderCradleError cradle nfp (CradleError _ _ec ms) =
943943
944944-- | Information included in Multi Cradle error messages
945945data MultiCradleErr = MultiCradleErr
946- { mcPwd :: FilePath
946+ { mcPwd :: FilePath
947947 , mcFilePath :: FilePath
948948 , mcPrefixes :: [(FilePath , String )]
949949 } deriving (Show )
@@ -978,15 +978,10 @@ parseMultiCradleErr ms = do
978978 guard (listToMaybe (reverse s) == Just end)
979979 pure $ drop 1 $ take (length s - 1 ) s
980980
981-
982-
983-
984-
985-
986981multiCradleErrMessage :: MultiCradleErr -> [String ]
987982multiCradleErrMessage e =
988- [ " Loading the module '" <> moduleFileName <> " ' failed. It seems that it is not listed in your .cabal file!"
989- , " Perhaps you need to add `" <> moduleName <> " ` to other-modules or exposed-modules" -- named 'example' in example.cabal ."
983+ [ " Loading the module '" <> moduleFileName <> " ' failed. It may not be listed in your .cabal file!"
984+ , " Perhaps you need to add `" <> moduleName <> " ` to other-modules or exposed-modules."
990985 , " For more information, visit: https://cabal.readthedocs.io/en/3.4/developing-packages.html#modules-included-in-the-package"
991986 , " "
992987 ] <> map prefix (mcPrefixes e)
@@ -997,11 +992,6 @@ multiCradleErrMessage e =
997992 isSourceFolder p = all isLower $ take 1 p
998993 prefix (f, r) = f <> " - " <> r
999994
1000-
1001-
1002-
1003-
1004-
1005995-- See Note [Multi Cradle Dependency Info]
1006996type DependencyInfo = Map. Map FilePath (Maybe UTCTime )
1007997type HieMap = Map. Map (Maybe FilePath ) (HscEnv , [RawComponentInfo ])
0 commit comments