[Pkg-haskell-commits] [SCM] Debian package for MissingH branch, master, updated. debian/1.1.0.1-2-49-gdaefc69

[John Goerzen]

The following commit has been merged in the master branch:
commit b49b537d1d98795238dbd55ca302b12991b65d3e
Author: John Goerzen <jgoerzen at complete.org>
Date:   Fri Jun 5 10:56:16 2009 -0500

    Noted an alias for nub

diff --git a/src/Data/List/Utils.hs b/src/Data/List/Utils.hs
index 4c03f07..453579d 100644
--- a/src/Data/List/Utils.hs
+++ b/src/Data/List/Utils.hs
@@ -59,7 +59,7 @@ module Data.List.Utils(-- * Merging
                      -- sub,
                     ) where
 import Data.List(intersperse, concat, isPrefixOf, isSuffixOf, elemIndices,
-                elemIndex, elemIndices, tails, find, findIndex, isInfixOf)
+                elemIndex, elemIndices, tails, find, findIndex, isInfixOf, nub)
 import Control.Monad.State(State, get, put)
 import Data.Maybe(isJust)
 
@@ -473,10 +473,12 @@ For example:
 You should not rely on this function necessarily preserving order, though
 the current implementation happens to.
 
-This function is not compatible with infinite lists. -}
+This function is not compatible with infinite lists.
+
+This is presently an alias for Data.List.nub
+ -}
 uniq :: Eq a => [a] -> [a]
-uniq [] = []
-uniq (x:xs) = x : uniq (filter (/= x) xs)
+uniq = nub
 
 ----- same as
 --uniq (x:xs) = x : [y | y <- uniq xs, y /= x]

-- 
Debian package for MissingH