diff options
| author | Iavor S. Diatchki <iavor.diatchki@gmail.com> | 2011-12-18 18:37:27 -0800 |
|---|---|---|
| committer | Iavor S. Diatchki <iavor.diatchki@gmail.com> | 2011-12-18 18:37:27 -0800 |
| commit | 42186dd64c22f23bbdb15a27e608cb52ba7d617f (patch) | |
| tree | 5c224a7741db8d66f6c8ad2c8c0db943462df085 | |
| parent | ca6a358a1668488502dca46fe20157a5950ebb25 (diff) | |
| download | haskell-42186dd64c22f23bbdb15a27e608cb52ba7d617f.tar.gz | |
Remove tabs, again.
| -rw-r--r-- | 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 84e17cc825..52415df353 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) |