14 lines
528 B
Haskell
14 lines
528 B
Haskell
|
import Distribution.Verbosity
|
||
|
|
import Distribution.PackageDescription.Parse (readPackageDescription)
|
||
|
|
import Distribution.PackageDescription.Configuration (flattenPackageDescription)
|
||
|
|
import Distribution.PackageDescription
|
||
|
|
import Distribution.Package
|
||
|
|
import Distribution.Text
|
||
|
|
import Text.PrettyPrint
|
||
|
|
import System.Environment
|
||
|
|
|
||
|
|
main = do
|
||
|
|
[f] <- getArgs
|
||
|
|
pd <- flattenPackageDescription <$> readPackageDescription silent f
|
||
|
|
mapM_ putStrLn $ map (\(Dependency n v) -> unPackageName n ++ "\t" ++ render (disp v)) $ buildDepends pd
|