[commit: ghc] type-nats: Remove tabs, again. (42186dd)
Iavor Diatchki
diatchki at galois.com
Mon Dec 19 03:37:56 CET 2011
Repository : ssh://darcs.haskell.org//srv/darcs/ghc
On branch : type-nats
http://hackage.haskell.org/trac/ghc/changeset/42186dd64c22f23bbdb15a27e608cb52ba7d617f
>---------------------------------------------------------------
commit 42186dd64c22f23bbdb15a27e608cb52ba7d617f
Author: Iavor S. Diatchki <iavor.diatchki at gmail.com>
Date: Sun Dec 18 18:37:27 2011 -0800
Remove tabs, again.
>---------------------------------------------------------------
compiler/utils/ListSetOps.lhs | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/compiler/utils/ListSetOps.lhs b/compiler/utils/ListSetOps.lhs
index 84e17cc..52415df 100644
--- a/compiler/utils/ListSetOps.lhs
+++ b/compiler/utils/ListSetOps.lhs
@@ -214,7 +214,7 @@ findDupsEq eq (x:xs) | null eq_xs = findDupsEq eq xs
where (eq_xs, neq_xs) = partition (eq x) xs
removeRedundant :: (a -> a -> Bool) -- True <=> discard the *second* argument
- -> [a] -> [a]
+ -> [a] -> [a]
-- Remove any element y for which
-- another element x is in the list
-- and (x `subsumes` y)
More information about the Cvs-ghc
mailing list