Commit 183f554e authored by ijones's avatar ijones
Browse files

allModules wasn't used.

parent 0d8ee7b8
......@@ -52,7 +52,6 @@ module Distribution.Package (
emptyBuildInfo,
Executable(..),
emptyExecutable,
allModules,
setupMessage,
withLib,
#ifdef DEBUG
......@@ -122,10 +121,10 @@ emptyPackageDescription
}
-- |Get all the module names from this package
allModules :: PackageDescription -> [String]
allModules PackageDescription{executables=execs, library=lib}
= (concatMap (\e -> modules $ buildInfo e) execs)
++ (maybe [] modules lib)
-- allModules :: PackageDescription -> [String]
-- allModules PackageDescription{executables=execs, library=lib}
-- = (concatMap (\e -> modules $ buildInfo e) execs)
-- ++ (maybe [] modules lib)
-- |Set the name for this package. Convenience function.
setPkgName :: String -> PackageDescription -> PackageDescription
......
** where are we using allModules, is this the right place?
* misc
** integrate w/ GHC distro
** what other preprocessors can't unlit?
** find a real test case that uses a preprocessor
** is cpp ever run yet?
** for a source tarball:?
......@@ -15,6 +17,7 @@
- allow foo.hsproj?
** grep for "FIX"
** Compatibility
*** add information for compiling w/ nhc
*** add install target for hugs & nhc
......@@ -90,7 +93,9 @@
** Get function from hmake that creates a directory based on arch.
** ./Setup test
- this may be something that's easy to break off and give to someone else.
- this may be something that's easy to break off and give to someone
else.
- give to John Goerzen?
** writePersistBuildConfig robustify + diagnostics
** elaborate command-line help text
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment