[commit: Cabal] master: Added deriving Show to all the types in Hackage.Types, useful for debugging. (fb91c35)
Ian Lynagh
igloo at earth.li
Fri Jun 24 01:47:45 CEST 2011
Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/fb91c35e33743855f97ac2636399aeba7f25d9aa
>---------------------------------------------------------------
commit fb91c35e33743855f97ac2636399aeba7f25d9aa
Author: bjorn <bjorn at bringert.net>
Date: Tue Oct 16 09:09:57 2007 +0000
Added deriving Show to all the types in Hackage.Types, useful for debugging.
>---------------------------------------------------------------
cabal-install/Hackage/Types.hs | 6 +++++-
1 files changed, 5 insertions(+), 1 deletions(-)
diff --git a/cabal-install/Hackage/Types.hs b/cabal-install/Hackage/Types.hs
index 6f2fa21..91e2575 100644
--- a/cabal-install/Hackage/Types.hs
+++ b/cabal-install/Hackage/Types.hs
@@ -25,6 +25,7 @@ data PkgInfo = PkgInfo {
pkgRepo :: Repo,
pkgDesc :: GenericPackageDescription
}
+ deriving (Show)
pkgInfoId :: PkgInfo -> PackageIdentifier
pkgInfoId = package . packageDescription . pkgDesc
@@ -37,7 +38,7 @@ data Action
| InfoCmd
| HelpCmd
| ListCmd
- deriving (Eq)
+ deriving (Show,Eq)
data Option = OptCompilerFlavor CompilerFlavor
| OptCompiler FilePath
@@ -68,6 +69,7 @@ data ConfigFlags = ConfigFlags {
configVerbose :: Verbosity,
configUserInstall :: Bool -- ^--user-install flag
}
+ deriving (Show)
data Repo = Repo {
repoName :: String,
@@ -78,6 +80,7 @@ data Repo = Repo {
data ResolvedPackage = Installed Dependency PackageIdentifier
| Available Dependency PkgInfo [String] [ResolvedPackage]
| Unavailable Dependency
+ deriving (Show)
fulfills :: ResolvedPackage -> Dependency
fulfills (Installed d _) = d
@@ -89,3 +92,4 @@ data UnresolvedDependency
{ dependency :: Dependency
, depOptions :: [String]
}
+ deriving (Show)
\ No newline at end of file
More information about the Cvs-libraries
mailing list