module Distribution.PackageDescription.Utils (
cabalBug, userBug
) where
userBug :: String -> a
userBug :: forall a. String -> a
userBug String
msg = forall a. HasCallStack => String -> a
error forall a b. (a -> b) -> a -> b
$ String
msg forall a. [a] -> [a] -> [a]
++ String
". This is a bug in your .cabal file."
cabalBug :: String -> a
cabalBug :: forall a. String -> a
cabalBug String
msg = forall a. HasCallStack => String -> a
error forall a b. (a -> b) -> a -> b
$ String
msg forall a. [a] -> [a] -> [a]
++ String
". This is possibly a bug in Cabal.\n"
forall a. [a] -> [a] -> [a]
++ String
"Please report it to the developers: "
forall a. [a] -> [a] -> [a]
++ String
"https://github.com/haskell/cabal/issues/new"