[commit: ghc] wip/nfs-locking: Remove splitArgs. (9133934)
git at git.haskell.org
git at git.haskell.org
Thu Oct 26 23:18:47 UTC 2017
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/nfs-locking
Link : http://ghc.haskell.org/trac/ghc/changeset/91339343449600edd26a8e427a246bee2ae63166/ghc
>---------------------------------------------------------------
commit 91339343449600edd26a8e427a246bee2ae63166
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date: Tue Jan 6 19:16:50 2015 +0000
Remove splitArgs.
>---------------------------------------------------------------
91339343449600edd26a8e427a246bee2ae63166
src/Base.hs | 5 +----
1 file changed, 1 insertion(+), 4 deletions(-)
diff --git a/src/Base.hs b/src/Base.hs
index 6bef5ba..9868528 100644
--- a/src/Base.hs
+++ b/src/Base.hs
@@ -9,7 +9,7 @@ module Base (
Stage (..),
Args, arg, args, ShowAction (..),
Condition (..),
- joinArgs, joinArgsSpaced, splitArgs,
+ joinArgs, joinArgsSpaced,
filterOut
) where
@@ -72,8 +72,5 @@ intercalateArgs s as = do
as' <- as
return [intercalate s as']
-splitArgs :: Args -> Args
-splitArgs = fmap (concatMap words)
-
filterOut :: Args -> [String] -> Args
filterOut as list = filter (`notElem` list) <$> as
More information about the ghc-commits
mailing list