Fix bug in uniqList.

This commit is contained in:
Andres Loeh 2012-07-18 16:30:57 +02:00
parent bdc0530f93
commit 8984139215

View file

@ -165,7 +165,7 @@ rec {
then []
else let x = head xs;
y = if elem x acc then [] else [x];
in go (y ++ tail xs) (y ++ acc);
in y ++ go (tail xs) (y ++ acc);
in go inputList acc;
uniqListExt = {inputList, outputList ? [],